diff options
Diffstat (limited to 'gnu/packages/gcc.scm')
| -rw-r--r-- | gnu/packages/gcc.scm | 78 |
1 files changed, 39 insertions, 39 deletions
diff --git a/gnu/packages/gcc.scm b/gnu/packages/gcc.scm index 47fb443155..1b444c2b02 100644 --- a/gnu/packages/gcc.scm +++ b/gnu/packages/gcc.scm @@ -1043,18 +1043,18 @@ as the 'native-search-paths' field." (srfi srfi-26) (ice-9 regex))) ((#:configure-flags flags) - `(cons (string-append "--enable-languages=" - ,(string-join languages ",")) - (remove (cut string-match "--enable-languages.*" <>) - ,flags))) + #~(cons (string-append "--enable-languages=" + #$(string-join languages ",")) + (remove (cut string-match "--enable-languages.*" <>) + #$flags))) ((#:phases phases) - `(modify-phases ,phases - (add-after 'install 'remove-broken-or-conflicting-files - (lambda* (#:key outputs #:allow-other-keys) - (for-each - delete-file - (find-files (string-append (assoc-ref outputs "out") "/bin") - ".*(c\\+\\+|cpp|g\\+\\+|gcov|gcc|lto)(-.*)?$")))))))))) + #~(modify-phases #$phases + (add-after 'install 'remove-broken-or-conflicting-files + (lambda* (#:key outputs #:allow-other-keys) + (for-each + delete-file + (find-files (string-append (assoc-ref outputs "out") "/bin") + ".*(c\\+\\+|cpp|g\\+\\+|gcov|gcc|lto)(-.*)?$")))))))))) (define %generic-search-paths ;; This is the language-neutral search path for GCC. Entries in $CPATH are @@ -1156,34 +1156,34 @@ provides the GNU compiler for the Go programming language.") (arguments (substitute-keyword-arguments (package-arguments gccgo) ((#:phases phases) - `(modify-phases ,phases - (add-after 'install 'wrap-go-with-tool-path - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (exedir (string-append out "/libexec/gcc")) - (tooldir (dirname (car (find-files exedir "^cgo$"))))) - (wrap-program (string-append out "/bin/go") - `("GCCGOTOOLDIR" = - (,(string-append "${GCCGOTOOLDIR:-" tooldir "}"))) - `("GOROOT" = - (,(string-append "${GOROOT:-" out "}"))))))) - (add-before 'configure 'fix-gotools-runpath - (lambda _ - (substitute* "gotools/Makefile.in" - (("AM_LDFLAGS =" all) - (string-append all " -Wl,-rpath=$(libdir) "))))) - (add-before 'configure 'remove-tool-reference-from-libgo - (lambda _ - (substitute* "libgo/Makefile.in" - (("(GccgoToolDir = \\\")[^\\\"]+" _ start) - (string-append start "/nonexistent")) - ,@(if (version>=? (package-version gccgo) "12.0") - '((("(defaultGOROOT = `)[^`]+" _ start) - (string-append start "/nonexistent"))) - '((("(DefaultGoroot = \\\")[^\\\"]+" _ start) - (string-append start "/nonexistent")))) - (("(defaultGOROOTValue.*?return `)[^`]+" _ start) - (string-append start "/nonexistent")))))))))))) + #~(modify-phases #$phases + (add-after 'install 'wrap-go-with-tool-path + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (exedir (string-append out "/libexec/gcc")) + (tooldir (dirname (car (find-files exedir "^cgo$"))))) + (wrap-program (string-append out "/bin/go") + `("GCCGOTOOLDIR" = + (,(string-append "${GCCGOTOOLDIR:-" tooldir "}"))) + `("GOROOT" = + (,(string-append "${GOROOT:-" out "}"))))))) + (add-before 'configure 'fix-gotools-runpath + (lambda _ + (substitute* "gotools/Makefile.in" + (("AM_LDFLAGS =" all) + (string-append all " -Wl,-rpath=$(libdir) "))))) + (add-before 'configure 'remove-tool-reference-from-libgo + (lambda _ + (substitute* "libgo/Makefile.in" + (("(GccgoToolDir = \\\")[^\\\"]+" _ start) + (string-append start "/nonexistent")) + #$@(if (version>=? (package-version gccgo) "12.0") + '((("(defaultGOROOT = `)[^`]+" _ start) + (string-append start "/nonexistent"))) + '((("(DefaultGoroot = \\\")[^\\\"]+" _ start) + (string-append start "/nonexistent")))) + (("(defaultGOROOTValue.*?return `)[^`]+" _ start) + (string-append start "/nonexistent")))))))))))) (define-public gccgo-4.9 (custom-gcc (package |