bootstrap: perl-boot0: Disable validate-runpath?.

* gnu/packages/commencement.scm (perl-boot0): Add disable validate-runpath? to
args, and actually pass args.
This commit is contained in:
Jan Nieuwenhuizen 2018-09-18 23:04:57 +02:00
parent 56f45b7c78
commit cffe966dd5
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 18 additions and 16 deletions

View File

@ -1820,23 +1820,25 @@ exec " gcc "/bin/" program
(name "perl-boot0") (name "perl-boot0")
(arguments (arguments
;; At the very least, this must not depend on GCC & co. ;; At the very least, this must not depend on GCC & co.
(let ((args `(#:disallowed-references (let ((args `(#:validate-runpath? #f
#:disallowed-references
,(list %bootstrap-binutils)))) ,(list %bootstrap-binutils))))
(substitute-keyword-arguments (package-arguments perl) `(,@args
((#:phases phases) ,@(substitute-keyword-arguments (package-arguments perl)
`(modify-phases ,phases ((#:phases phases)
;; Pthread support is missing in the bootstrap compiler `(modify-phases ,phases
;; (broken spec file), so disable it. ;; Pthread support is missing in the bootstrap compiler
(add-before 'configure 'disable-pthreads ;; (broken spec file), so disable it.
(lambda _ (add-before 'configure 'disable-pthreads
(substitute* "Configure" (lambda _
(("^libswanted=(.*)pthread" _ before) (substitute* "Configure"
(string-append "libswanted=" before))) (("^libswanted=(.*)pthread" _ before)
#t)))) (string-append "libswanted=" before)))
;; Do not configure with '-Dusethreads' since pthread #t))))
;; support is missing. ;; Do not configure with '-Dusethreads' since pthread
((#:configure-flags configure-flags) ;; support is missing.
`(delete "-Dusethreads" ,configure-flags)))))))) ((#:configure-flags configure-flags)
`(delete "-Dusethreads" ,configure-flags)))))))))
(package-with-bootstrap-guile (package-with-bootstrap-guile
(package-with-explicit-inputs perl (package-with-explicit-inputs perl
%boot0-inputs %boot0-inputs