ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-27 14:52:05 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: libcxx+libcxxabi: Use G-expressions.

Browse source 
* gnu/packages/llvm.scm (libcxx+libcxxabi-6)[arguments]: Use G-expressions.
<#:configure-flags>: Use "this-package-native-input".

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Zhu Zihao 2022-10-27 16:33:30 +08:00 committed by Ludovic Courtès
parent 1bb3a3ea4e
commit a60dc46c2b
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 23 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/packages/llvm.scm
View file

@ -1677,13 +1677,14 @@ (define-public libcxx+libcxxabi-6
(name "libcxx+libcxxabi") (name "libcxx+libcxxabi")
(version (package-version libcxx-6)) (version (package-version libcxx-6))
(arguments (arguments
`(#:configure-flags (list
(list "-DLIBCXX_CXX_ABI=libcxxabi" #:configure-flags
#~(list "-DLIBCXX_CXX_ABI=libcxxabi"
(string-append "-DLIBCXX_CXX_ABI_INCLUDE_PATHS=" (string-append "-DLIBCXX_CXX_ABI_INCLUDE_PATHS="
(assoc-ref %build-inputs "libcxxabi") #$(this-package-native-input "libcxxabi")
"/include")) "/include"))
#:phases #:phases
(modify-phases (@ (guix build cmake-build-system) %standard-phases) #~(modify-phases (@ (guix build cmake-build-system) %standard-phases)
(add-after 'set-paths 'adjust-CPLUS_INCLUDE_PATH (add-after 'set-paths 'adjust-CPLUS_INCLUDE_PATH
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((gcc (assoc-ref inputs "gcc"))) (let ((gcc (assoc-ref inputs "gcc")))
@ -1695,7 +1696,8 @@ (define-public libcxx+libcxxabi-6
(string-split (getenv "CPLUS_INCLUDE_PATH") (string-split (getenv "CPLUS_INCLUDE_PATH")
#\:)) #\:))
":")) ":"))
(format #true (format
#true
"environment variable `CPLUS_INCLUDE_PATH' changed to ~a~%" "environment variable `CPLUS_INCLUDE_PATH' changed to ~a~%"
(getenv "CPLUS_INCLUDE_PATH")))))))) (getenv "CPLUS_INCLUDE_PATH"))))))))
(native-inputs (native-inputs