mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 13:58:15 -05:00
utils: Define target-ppc64le? predicate.
* guix/utils.scm (target-ppc64le?): New predicate.
This commit is contained in:
parent
3567b916d3
commit
ab18997f1c
1 changed files with 5 additions and 0 deletions
|
@ -95,6 +95,7 @@ (define-module (guix utils)
|
|||
target-aarch64?
|
||||
target-arm?
|
||||
target-ppc32?
|
||||
target-ppc64le?
|
||||
target-powerpc?
|
||||
target-64bit?
|
||||
cc-for-target
|
||||
|
@ -695,6 +696,10 @@ (define* (target-ppc32? #:optional (target (or (%current-target-system)
|
|||
(%current-system))))
|
||||
(string-prefix? "powerpc-" target))
|
||||
|
||||
(define* (target-ppc64le? #:optional (target (or (%current-target-system)
|
||||
(%current-system))))
|
||||
(string-prefix? "powerpc64le-" target))
|
||||
|
||||
(define* (target-powerpc? #:optional (target (or (%current-target-system)
|
||||
(%current-system))))
|
||||
(string-prefix? "powerpc" target))
|
||||
|
|
Loading…
Reference in a new issue