z572 pushed a commit to branch master
in repository guix.
commit ce7b546848a90772ccfeb734b813acebe10483c3
Author: Zheng Junjie <[email protected]>
AuthorDate: Tue Dec 24 01:08:00 2024 +0800
utils: Add target-loongarch64?.
* guix/utils.scm (target-loongarch64): New procedure.
Change-Id: I8d21bcf04d479937039f6f507b5460bb560fd8ec
---
guix/utils.scm | 5 +++++
1 file changed, 5 insertions(+)
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))
