unofficial mirror of guix-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH] gnu: autotools: Added autoconf-2.68 and turned autoconf-wrapper into a procedure
@ 2014-03-24 20:48 Manolis Ragkousis
  2014-03-24 23:02 ` Ludovic Courtès
  0 siblings, 1 reply; 2+ messages in thread
From: Manolis Ragkousis @ 2014-03-24 20:48 UTC (permalink / raw)
  To: Guix-devel, Ludovic Courtès


[-- Attachment #1.1: Type: text/plain, Size: 340 bytes --]

After I place the libpthread addon in the hurd glibc folder, I need to
rerun autoreconf. But I need exaclty the version 2.68, so I added it.
And because I use the autoconf-wrapper in my glibc/hurd recipe I  changed
it to a procedure that takes an 'autoconf-version' argument to decide which
one to use, so I won't have to duplicate things.

[-- Attachment #1.2: Type: text/html, Size: 391 bytes --]

[-- Attachment #2: add_autoconf-2.68_change_autoconf-wrapper.patch --]
[-- Type: text/x-patch, Size: 3323 bytes --]

From 27f0058e7842416b374d54cdd4f21c1c82433512 Mon Sep 17 00:00:00 2001
From: Manolis Ragkousis <manolis837@gmail.com>
Date: Mon, 24 Mar 2014 22:18:09 +0000
Subject: [PATCH] gnu: autotools: Added autoconf-2.68 and turned
 autoconf-wrapper into a procedure

* gnu/packages/autotools.scm (autoconf-2.68): Added autoconf-2.68 for use
with the Hurd glibc.
* gnu/packages/autotools.scm (autoconf-wrapper): Autoconf-wrapper takes
'autoconf-version' as an argument.
* gnu/packages/autotools.scm (automake): Modify inputs to use the new form.
---
 gnu/packages/autotools.scm | 27 +++++++++++++++++++++++----
 1 file changed, 23 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/autotools.scm b/gnu/packages/autotools.scm
index c2e4637..35fc3bf 100644
--- a/gnu/packages/autotools.scm
+++ b/gnu/packages/autotools.scm
@@ -27,7 +27,8 @@
   #:use-module (guix packages)
   #:use-module (guix download)
   #:use-module (guix build-system gnu)
-  #:use-module (guix build-system trivial))
+  #:use-module (guix build-system trivial)
+  #:use-module (ice-9 match))
 
 (define-public autoconf
   (package
@@ -59,11 +60,27 @@ scripts are self-contained and portable, freeing the user from needing to
 know anything about Autoconf or M4.")
     (license gpl3+))) ; some files are under GPLv2+
 
-(define-public autoconf-wrapper
+(define-public autoconf-2.68
+  ;; We need this version for the hurdish glibc
+  (package (inherit autoconf)
+    (version "2.68")
+    (source
+     (origin
+      (method url-fetch)
+      (uri (string-append "mirror://gnu/autoconf/autoconf-"
+                          version ".tar.xz"))
+      (sha256
+       (base32
+        "1fjm21k2na07f3vasf288a0zx66lbv0hd3l9bvv3q8p62s3pg569"))))))
+
+(define-public (autoconf-wrapper autoconf-version)
   ;; An Autoconf wrapper that generates `configure' scripts that use our
   ;; own Bash instead of /bin/sh in shebangs.  For that reason, it
   ;; should only be used internally---users should not end up
   ;; distributing `configure' files with a system-specific shebang.
+  ;; The "autoconf-version" is used to determine which version to use,
+  ;; in order to avoid duplication. If you want to use the latest version use
+  ;; ("autoconf" ,(autoconf-wrapper "autoconf")) as an input.
   (package (inherit autoconf)
     (location (source-properties->location (current-source-location)))
     (name (string-append (package-name autoconf) "-wrapper"))
@@ -72,7 +89,9 @@ know anything about Autoconf or M4.")
                ;; XXX: Kludge to hide the circular dependency.
                ,(module-ref (resolve-interface '(gnu packages guile))
                             'guile-2.0))
-              ("autoconf" ,autoconf)
+              ("autoconf" ,(match autoconf-version
+                             ("autoconf-2.68" autoconf-2.68)
+                             ("autoconf" autoconf)))
               ("bash" ,bash)))
     (arguments
      '(#:modules ((guix build utils))
@@ -144,7 +163,7 @@ exec ~a --no-auto-compile \"$0\" \"$@\"
               (list (search-patch "automake-skip-amhello-tests.patch")))))
     (build-system gnu-build-system)
     (inputs
-     `(("autoconf" ,autoconf-wrapper)
+     `(("autoconf" ,(autoconf-wrapper "autoconf"))
        ("perl" ,perl)))
     (native-search-paths
      (list (search-path-specification
-- 
1.9.0


^ permalink raw reply related	[flat|nested] 2+ messages in thread

* Re: [PATCH] gnu: autotools: Added autoconf-2.68 and turned autoconf-wrapper into a procedure
  2014-03-24 20:48 [PATCH] gnu: autotools: Added autoconf-2.68 and turned autoconf-wrapper into a procedure Manolis Ragkousis
@ 2014-03-24 23:02 ` Ludovic Courtès
  0 siblings, 0 replies; 2+ messages in thread
From: Ludovic Courtès @ 2014-03-24 23:02 UTC (permalink / raw)
  To: Manolis Ragkousis; +Cc: Guix-devel

Manolis Ragkousis <manolis837@gmail.com> skribis:

> From 27f0058e7842416b374d54cdd4f21c1c82433512 Mon Sep 17 00:00:00 2001
> From: Manolis Ragkousis <manolis837@gmail.com>
> Date: Mon, 24 Mar 2014 22:18:09 +0000
> Subject: [PATCH] gnu: autotools: Added autoconf-2.68 and turned
>  autoconf-wrapper into a procedure
>
> * gnu/packages/autotools.scm (autoconf-2.68): Added autoconf-2.68 for use
> with the Hurd glibc.
> * gnu/packages/autotools.scm (autoconf-wrapper): Autoconf-wrapper takes
> 'autoconf-version' as an argument.
> * gnu/packages/autotools.scm (automake): Modify inputs to use the new form.

Thanks, applied with small changes (see below.)

I adjusted the commit log to follow GNU conventions.

> +(define-public (autoconf-wrapper autoconf-version)
>    ;; An Autoconf wrapper that generates `configure' scripts that use our
>    ;; own Bash instead of /bin/sh in shebangs.  For that reason, it
>    ;; should only be used internally---users should not end up
>    ;; distributing `configure' files with a system-specific shebang.
> +  ;; The "autoconf-version" is used to determine which version to use,
> +  ;; in order to avoid duplication. If you want to use the latest version use
> +  ;; ("autoconf" ,(autoconf-wrapper "autoconf")) as an input.
>    (package (inherit autoconf)
>      (location (source-properties->location (current-source-location)))
>      (name (string-append (package-name autoconf) "-wrapper"))
> @@ -72,7 +89,9 @@ know anything about Autoconf or M4.")
>                 ;; XXX: Kludge to hide the circular dependency.
>                 ,(module-ref (resolve-interface '(gnu packages guile))
>                              'guile-2.0))
> -              ("autoconf" ,autoconf)
> +              ("autoconf" ,(match autoconf-version
> +                             ("autoconf-2.68" autoconf-2.68)
> +                             ("autoconf" autoconf)))

Passing a version string is quite inelegant and fragile, so I changed
‘autoconf-wrapper’ to instead take a package object.

So:

  (autoconf-wrapper)

returns a wrapper for the default ‘autoconf’ package, and:

  (autoconf-wrapper autoconf-2.68)

returns a wrapper for that particular version.

Thanks,
Ludo’.

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2014-03-24 23:03 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2014-03-24 20:48 [PATCH] gnu: autotools: Added autoconf-2.68 and turned autoconf-wrapper into a procedure Manolis Ragkousis
2014-03-24 23:02 ` Ludovic Courtès

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).