diff --git a/guix/utils.scm b/guix/utils.scm index 32fcff72ea..3f253d6cd8 100644 --- a/guix/utils.scm +++ b/guix/utils.scm @@ -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))