diff options
Diffstat (limited to 'gnu/packages/gcc.scm')
| -rw-r--r-- | gnu/packages/gcc.scm | 21 |
1 files changed, 9 insertions, 12 deletions
diff --git a/gnu/packages/gcc.scm b/gnu/packages/gcc.scm index d1c79b8dc2..bdcc3f0508 100644 --- a/gnu/packages/gcc.scm +++ b/gnu/packages/gcc.scm @@ -715,25 +715,22 @@ It also includes runtime support libraries for these languages.") (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 |