diff options
| author | Zheng Junjie <[email protected]> | 2024-12-24 01:08:00 +0800 |
|---|---|---|
| committer | Zheng Junjie <[email protected]> | 2025-01-25 01:05:26 +0800 |
| commit | ce7b546848a90772ccfeb734b813acebe10483c3 (patch) | |
| tree | 609248c80dd24cd43f8adbb4ab1924a3b6a983b3 | |
| parent | 7d43134dabbf270a697459de697e899e419719f6 (diff) | |
utils: Add target-loongarch64?.
* guix/utils.scm (target-loongarch64): New procedure.
Change-Id: I8d21bcf04d479937039f6f507b5460bb560fd8ec
| -rw-r--r-- | guix/utils.scm | 5 |
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)) |