derivations: Add 'raw-derivation'.

* guix/derivations.scm (raw-derivation): New procedure.
* guix/download.scm (raw-derivation): Remove.
* guix/gexp.scm (raw-derivation): Remove.
This commit is contained in:
Ludovic Courtès 2016-11-19 16:56:47 +01:00
parent 18675264c6
commit 713335fa61
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
3 changed files with 4 additions and 6 deletions

View File

@ -86,6 +86,7 @@
derivation-path->output-path derivation-path->output-path
derivation-path->output-paths derivation-path->output-paths
derivation derivation
raw-derivation
map-derivation map-derivation
@ -1306,3 +1307,6 @@ ALLOWED-REFERENCES, DISALLOWED-REFERENCES, LOCAL-BUILD?, and SUBSTITUTABLE?."
(define built-derivations (define built-derivations
(store-lift build-derivations)) (store-lift build-derivations))
(define raw-derivation
(store-lift derivation))

View File

@ -322,9 +322,6 @@ the daemon."
result)) result))
store))))) store)))))
(define raw-derivation
(store-lift derivation))
(define* (built-in-download file-name url (define* (built-in-download file-name url
#:key system hash-algo hash #:key system hash-algo hash
mirrors content-addressed-mirrors mirrors content-addressed-mirrors

View File

@ -453,9 +453,6 @@ whether this should be considered a \"native\" input or not."
'())) '()))
(gexp-references gexp))))) (gexp-references gexp)))))
(define raw-derivation
(store-lift derivation))
(define* (lower-inputs inputs (define* (lower-inputs inputs
#:key system target) #:key system target)
"Turn any package from INPUTS into a derivation for SYSTEM; return the "Turn any package from INPUTS into a derivation for SYSTEM; return the