~ruther/guix-local

725960c9badb712acf791746bf88b801b1ef6acd — Maxime Devos 5 years ago e3178b0
build-system: python: Add allowed/disallowed keyword arguments.

* gnu/build-system/python.scm (python-build) Add ALLOWED-REFERENCES and
DISALLOWED-REFERENCES keywords.

Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Modified-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Change-Id: I80bfe8e23b8475a8ca277cddd4275f1e757db8c3
1 files changed, 6 insertions(+), 3 deletions(-)

M guix/build-system/python.scm
M guix/build-system/python.scm => guix/build-system/python.scm +6 -3
@@ 179,7 179,9 @@ pre-defined variants."
                       (guile #f)
                       (imported-modules %python-build-system-modules)
                       (modules '((guix build python-build-system)
                                  (guix build utils))))
                                  (guix build utils)))
                       allowed-references
                       disallowed-references)
  "Build SOURCE using PYTHON, and with INPUTS.  This assumes that SOURCE
provides a 'setup.py' file as its build system."
  (define build


@@ 204,14 206,15 @@ provides a 'setup.py' file as its build system."
                                                      search-paths))
                              #:inputs %build-inputs)))))


  (mlet %store-monad ((guile (package->derivation (or guile (default-guile))
                                                  system #:graft? #f)))
    (gexp->derivation name build
                      #:system system
                      #:graft? #f                 ;consistent with 'gnu-build'
                      #:target #f
                      #:guile-for-build guile)))
                      #:guile-for-build guile
                      #:allowed-references allowed-references
                      #:disallowed-references disallowed-references)))

(define python-build-system
  (build-system