[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Toward 0.2
From: |
Nikita Karetnikov |
Subject: |
Re: Toward 0.2 |
Date: |
Tue, 26 Feb 2013 05:43:31 -0500 |
I'm attaching a patch.
It's a separate file; if I add these lines
#:use-module (guix packages)
#:use-module (guix store)
to 'guix/build/utils.scm', they will raise the following error on
'make'.
Backtrace:
In ice-9/eval.scm:
400: 19 [eval # ()]
In ice-9/boot-9.scm:
2681: 18 [define-module* (guix utils) #:filename ...]
2656: 17 [resolve-imports (((guix config)) ((guix packages)) ((guix store))
...)]
2594: 16 [resolve-interface (guix packages) #:select ...]
2519: 15 [#<procedure 8fee7a0 at ice-9/boot-9.scm:2507:4 (name #:optional
autoload version #:key ensure)> # ...]
2786: 14 [try-module-autoload (guix packages) #f]
2131: 13 [save-module-excursion #<procedure 92a4eb8 at ice-9/boot-9.scm:2787:17
()>]
2797: 12 [#<procedure 92a4eb8 at ice-9/boot-9.scm:2787:17 ()>]
In unknown file:
?: 11 [primitive-load-path "guix/packages" #f]
In guix/packages.scm:
19: 10 [#<procedure 92cece0 ()>]
In ice-9/boot-9.scm:
2681: 9 [define-module* (guix packages) #:filename ...]
2656: 8 [resolve-imports (((guix utils)) ((guix store)) ((guix base32)) ...)]
2594: 7 [resolve-interface (guix derivations) #:select ...]
2519: 6 [#<procedure 8fee7a0 at ice-9/boot-9.scm:2507:4 (name #:optional
autoload version #:key ensure)> # ...]
2786: 5 [try-module-autoload (guix derivations) #f]
2131: 4 [save-module-excursion #<procedure 93f87c8 at ice-9/boot-9.scm:2787:17
()>]
2797: 3 [#<procedure 93f87c8 at ice-9/boot-9.scm:2787:17 ()>]
In unknown file:
?: 2 [primitive-load-path "guix/derivations" #f]
In guix/derivations.scm:
317: 1 [#<procedure 9439920 ()>]
In ice-9/boot-9.scm:
106: 0 [#<procedure 913a8c0 at ice-9/boot-9.scm:97:6 (thrown-k . args)>
unbound-variable ...]
ice-9/boot-9.scm:106:20: In procedure #<procedure 913a8c0 at
ice-9/boot-9.scm:97:6 (thrown-k . args)>:
ice-9/boot-9.scm:106:20: In procedure module-lookup: Unbound variable: memoize
make[2]: *** [guix/utils.go] Error 1
make[2]: Leaving directory `/home/guix-savannah'
make[1]: *** [all-recursive] Error 1
make[1]: Leaving directory `/home/guix-savannah'
make: *** [all] Error 2
I don't think that 'store-location' is really needed. I added it
because I hadn't found a procedure that can return something like
'/nix/store/*-wget-1.14/bin/wget'.
Also, 'bin-location' and 'chmod' are not safe. It can be solved with
'file-exists?', but I decided not to use it because I want to rewrite
the whole thing. Any suggestions?
Example:
scheme@(guile-user)> ,use (gnu packages wget) (gnu packages gawk)
scheme@(guile-user)> ,use (wrap-program)
scheme@(guile-user)> (wrap-program wget #t "PATH" (store-location gawk "out"
"/bin"))
#!/bin/sh
export PATH="/nix/store/l5gkkxbjrlhddpxyxl6glhyczvh0gggw-gawk-4.0.0/bin:$PATH"
exec ./.wget-real "$@"
wrap-program.scm
Description: Text document
pgpUicEL31jpa.pgp
Description: PGP signature
- Toward 0.2, Ludovic Courtès, 2013/02/17
- Re: Toward 0.2, Nikita Karetnikov, 2013/02/17
- Re: Toward 0.2, Ludovic Courtès, 2013/02/18
- Re: Toward 0.2, Nikita Karetnikov, 2013/02/19
- Re: Toward 0.2, Ludovic Courtès, 2013/02/20
- Re: Toward 0.2, Nikita Karetnikov, 2013/02/21
- Re: Toward 0.2, Ludovic Courtès, 2013/02/22
- Re: Toward 0.2,
Nikita Karetnikov <=
- Re: Toward 0.2, Mark H Weaver, 2013/02/26
- Re: Toward 0.2, Ludovic Courtès, 2013/02/26
- Re: Toward 0.2, Nikita Karetnikov, 2013/02/28
Re: Toward 0.2, Andreas Enge, 2013/02/20