mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-11 13:49:23 -05:00
utils: Add 'cxx-for-target'.
* guix/utils.scm (cxx-for-target): New procedure.
This commit is contained in:
parent
cbd104bf6f
commit
b720cf90e7
1 changed files with 6 additions and 0 deletions
|
@ -78,6 +78,7 @@ (define-module (guix utils)
|
|||
target-arm?
|
||||
target-64bit?
|
||||
cc-for-target
|
||||
cxx-for-target
|
||||
|
||||
version-compare
|
||||
version>?
|
||||
|
@ -542,6 +543,11 @@ (define* (cc-for-target #:optional (target (%current-target-system)))
|
|||
(string-append target "-gcc")
|
||||
"gcc"))
|
||||
|
||||
(define* (cxx-for-target #:optional (target (%current-target-system)))
|
||||
(if target
|
||||
(string-append target "-g++")
|
||||
"g++"))
|
||||
|
||||
(define version-compare
|
||||
(let ((strverscmp
|
||||
(let ((sym (or (dynamic-func "strverscmp" (dynamic-link))
|
||||
|
|
Loading…
Reference in a new issue