ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 07:26:13 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

monads: Add 'imported-modules' and 'compiled-modules'.

Browse source 
* guix/monads.scm (package-file): Fix typo.
  (imported-modules, compiled-modules): New procedures.
This commit is contained in:
Ludovic Courtès 2014-01-29 13:04:48 +01:00
parent b0dd47a8d0
commit 413d5351aa
1 changed files with 11 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
guix/monads.scm
View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -57,7 +57,9 @@ (define-module (guix monads)
package->derivation
built-derivations
derivation-expression
lower-inputs))
lower-inputs)
#:replace (imported-modules
compiled-modules))
;;; Commentary:
;;;
@ -310,7 +312,7 @@ (define* (text-file name text)
(define* (package-file package
#:optional file
#:key (system (%current-system)) (output "out"))
"Return as a monadic value in the absolute file name of FILE within the
"Return as a monadic value the absolute file name of FILE within the
OUTPUT directory of PACKAGE. When FILE is omitted, return the name of the
OUTPUT directory of PACKAGE."
(lambda (store)
@ -342,6 +344,12 @@ (define derivation-expression
(define package->derivation
(store-lift package-derivation))
(define imported-modules
(store-lift (@ (guix derivations) imported-modules)))
(define compiled-modules
(store-lift (@ (guix derivations) compiled-modules)))
(define built-derivations
(store-lift build-derivations))