gnu: perl: Add support for cross-compilation

* gnu/packages/perl.scm (perl): use cross-libc when cross-compiling

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Raphaël Mélotte 2018-09-03 10:20:06 +02:00 committed by Ludovic Courtès
parent 38fe6449c0
commit 5108c18e7e
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 6 additions and 2 deletions

View File

@ -48,6 +48,7 @@
#:use-module (guix utils) ;substitute-keyword-arguments for perl-5.26.2
#:use-module (gnu packages base)
#:use-module (gnu packages compression)
#:use-module (gnu packages cross-base)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages perl-check)
#:use-module (gnu packages perl-web)
@ -79,7 +80,7 @@
"perl-reproducible-build-date.patch"))))
(build-system gnu-build-system)
(arguments
'(#:tests? #f
`(#:tests? #f
#:configure-flags
(let ((out (assoc-ref %outputs "out"))
(libc (assoc-ref %build-inputs "libc")))
@ -128,7 +129,10 @@
(add-after 'install 'remove-extra-references
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(libc (assoc-ref inputs "libc"))
(libc (assoc-ref inputs
(if ,(%current-target-system)
"cross-libc"
"libc")))
(config1 (car (find-files (string-append out "/lib/perl5")
"^Config_heavy\\.pl$")))
(config2 (find-files (string-append out "/lib/perl5")