summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/utils.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/guix/utils.scm b/guix/utils.scm
index 2d82329cb7..b0712aaac3 100644
--- a/guix/utils.scm
+++ b/guix/utils.scm
@@ -113,6 +113,7 @@
target-ppc64le?
target-powerpc?
target-riscv64?
+ target-loongarch64?
target-mips64el?
target-64bit?
target-little-endian?
@@ -810,6 +811,10 @@ architecture (x86_64) using 32-bit data types?"
"Is the architecture of TARGET a variant of Microchip's AVR architecture?"
(or (string=? target "avr") (string-prefix? "avr-" target)))
+(define* (target-loongarch64? #:optional (target (or (%current-target-system)
+ (%current-system))))
+ (string-prefix? "loongarch64-" target))
+
(define* (target-ppc32? #:optional (target (or (%current-target-system)
(%current-system))))
(string-prefix? "powerpc-" target))