bartronx7/guix
1
0
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2026-01-25 03:55:08 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: musl-boot0: Improve the install phase.

Browse source 
* gnu/packages/commencement.scm (musl-boot0)[arguments]: Adjust the
custom 'install phase to support more architectures.

Change-Id: I86759eb5813441fa3ebff1222de2fe8ffa69e8ba
This commit is contained in:
Efraim Flashner 2024-11-24 10:15:32 +02:00
parent 2fe393c4f9
commit 5af61ad937
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 12 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

30
gnu/packages/commencement.scm
View file

@ -966,7 +966,16 @@ MesCC-Tools), and finally M2-Planet.")
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))
(lib (string-append out "/lib"))
(incl (string-append out "/include")))
(incl (string-append out "/include"))
;; Taken from the ARCH variable in configure.
(arch #$(cond
((target-x86-32?) "i386")
((target-x32?) "x32")
((target-arm32?) "arm")
((target-ppc64le?) "powerpc64")
(#t (string-take
(%current-system)
(string-index (%current-system) #\-))))))
(for-each (lambda (file)
(when (file-exists? file)
(install-file file bin)))
@ -982,27 +991,12 @@ MesCC-Tools), and finally M2-Planet.")
(for-each (lambda (file)
(install-file file (string-append incl "/bits")))
(append
(find-files
(string-append "arch/"
#$(cond
((target-x86-32?) "x86")
((target-x86-64?) "x86_64")
((target-aarch64?) "aarch64")
((target-riscv64?) "riscv64")
(#t ""))
"/bits"))
(find-files (string-append "arch/" arch "/bits"))
(find-files "arch/generic/bits")
(find-files "obj/include/bits")))
(when (file-exists? (string-append lib "/libc.so"))
(symlink "libc.so"
(string-append lib "/ld-musl-"
#$(cond
((target-x86-32?) "x86")
((target-x86-64?) "x86_64")
((target-aarch64?) "aarch64")
((target-riscv64?) "riscv64")
(#t ""))
".so.1")))))))))))
(string-append lib "/ld-musl-" arch ".so.1")))))))))))
(define tcc-boot-musl
(package