mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-21 01:26:43 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Revert "gnu: gcc-11: Adapt patching for hurd to not use gexp's."

Browse source 
This reverts commit 08acdd0765.

This change is now unnecessary now that gcc-boot0 uses
gexps (a795a02a9d).

* gnu/packages/gcc.scm (gcc-11)[arguments]: Use gexp for modify-phases.
[native-inputs]: Remove.
* gnu/packages/commencement.scm (gcc-boot0)[native-inputs]: Remove.
This commit is contained in:
Christopher Baines 2023-05-07 09:28:55 +01:00
parent fccb48d2ce
commit aad47b1b92
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
2 changed files with 10 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gnu/packages/commencement.scm
View file

@ -2453,10 +2453,7 @@ (define gcc-boot0
,@(alist-delete "libc" (%boot0-inputs))))
;; No need for the native-inputs to build the documentation at this stage.
(native-inputs
(if (target-hurd?)
`(("hurd-patch" ,(search-patch "gcc-11-libstdc++-hurd-libpthread.patch")))
'()))))
(native-inputs '())))
(define perl-boot0
(package

21
gnu/packages/gcc.scm
View file

@ -715,25 +715,22 @@ (define-public gcc-11
(snippet gcc-canadian-cross-objdump-snippet)))
(arguments
(substitute-keyword-arguments (package-arguments gcc-8)
((#:phases phases '%standard-phases)
((#:phases phases #~%standard-phases)
(if (target-hurd?)
`(modify-phases ,phases
(add-after 'unpack 'patch-hurd-libpthread
(lambda _
(invoke "patch" "--force" "-p1" "-i"
(assoc-ref %build-inputs "hurd-patch")))))
#~(modify-phases #$phases
(add-after 'unpack 'patch-hurd-libpthread
(lambda _
(define patch
#$(local-file
(search-patch "gcc-11-libstdc++-hurd-libpthread.patch")))
(invoke "patch" "--force" "-p1" "-i" patch))))
phases))))
(properties
`((compiler-cpu-architectures
("aarch64" ,@%gcc-11-aarch64-micro-architectures)
("armhf" ,@%gcc-11-armhf-micro-architectures)
("x86_64" ,@%gcc-11-x86_64-micro-architectures))
,@(package-properties gcc-8)))
(native-inputs
`(,@(if (target-hurd?)
`(("hurd-patch" ,(search-patch "gcc-11-libstdc++-hurd-libpthread.patch")))
'())
,@(package-native-inputs gcc-8)))))
,@(package-properties gcc-8)))))
(define-public gcc-12
(package