diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-11-19 16:56:47 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-11-19 18:44:53 +0100 |
commit | 713335fa610713dc9491fc4848f5f5842423b143 (patch) | |
tree | 847513fe3cf72de59b0695b0aa068a6415aa9e0c | |
parent | 18675264c69dfc68b869d066551c444da2f47566 (diff) | |
download | guix-713335fa610713dc9491fc4848f5f5842423b143.tar.gz |
derivations: Add 'raw-derivation'.
* guix/derivations.scm (raw-derivation): New procedure. * guix/download.scm (raw-derivation): Remove. * guix/gexp.scm (raw-derivation): Remove.
-rw-r--r-- | guix/derivations.scm | 4 | ||||
-rw-r--r-- | guix/download.scm | 3 | ||||
-rw-r--r-- | guix/gexp.scm | 3 |
3 files changed, 4 insertions, 6 deletions
diff --git a/guix/derivations.scm b/guix/derivations.scm index e378a7cb03..7ed9bd61d3 100644 --- a/guix/derivations.scm +++ b/guix/derivations.scm @@ -86,6 +86,7 @@ derivation-path->output-path derivation-path->output-paths derivation + raw-derivation map-derivation @@ -1306,3 +1307,6 @@ ALLOWED-REFERENCES, DISALLOWED-REFERENCES, LOCAL-BUILD?, and SUBSTITUTABLE?." (define built-derivations (store-lift build-derivations)) + +(define raw-derivation + (store-lift derivation)) diff --git a/guix/download.scm b/guix/download.scm index 64a1d2f084..e2e5cee777 100644 --- a/guix/download.scm +++ b/guix/download.scm @@ -322,9 +322,6 @@ the daemon." result)) store))))) -(define raw-derivation - (store-lift derivation)) - (define* (built-in-download file-name url #:key system hash-algo hash mirrors content-addressed-mirrors diff --git a/guix/gexp.scm b/guix/gexp.scm index 05178a5ecc..fd5dc49233 100644 --- a/guix/gexp.scm +++ b/guix/gexp.scm @@ -453,9 +453,6 @@ whether this should be considered a \"native\" input or not." '())) (gexp-references gexp))))) -(define raw-derivation - (store-lift derivation)) - (define* (lower-inputs inputs #:key system target) "Turn any package from INPUTS into a derivation for SYSTEM; return the |