diff options
| author | Liliana Marie Prikler <liliana.prikler@gmail.com> | 2023-12-18 03:58:23 +0100 |
|---|---|---|
| committer | Liliana Marie Prikler <liliana.prikler@gmail.com> | 2023-12-18 03:58:23 +0100 |
| commit | 256d5b3598fa2162e9712fc98781d2cb4ceda31e (patch) | |
| tree | 0e7f7051a59aad879561b5c4ee885e24d3c04bc6 /tests/utils.scm | |
| parent | 9f6210cc5c114310a38ad1cc0ff5900409a7e7cc (diff) | |
| parent | 1a9f267f51f97b8ca7049aa72763ddd64aad5b62 (diff) | |
| download | guix-256d5b3598fa2162e9712fc98781d2cb4ceda31e.tar.gz | |
Merge branch 'master' into wip-webkit
Diffstat (limited to 'tests/utils.scm')
| -rw-r--r-- | tests/utils.scm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/utils.scm b/tests/utils.scm index 648e91f242..5664165c85 100644 --- a/tests/utils.scm +++ b/tests/utils.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org> ;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com> ;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be> +;;; Copyright © 2023 Foundation Devices, Inc. <hello@foundationdevices.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -329,6 +330,17 @@ skip these tests." ;; However, it isn't 32-bit. ,(format #f "x86_~a-linux-gnu" (expt 2 109))))) +(test-equal "target-avr?" + '(#t #t #t #f #f) + (map target-avr? + '("avr" "avr-unknown-none" + ;; In addition LLVM also uses this form. + "avr-unknown-unknown" + ;; The AVR32 architecture also was made by Atmel/Microchip but it + ;; does not resemble the AVR family, they aren't compatible in any + ;; way. + "avr32" "avr32-unknown-none"))) + (test-end) (false-if-exception (delete-file temp-file)) |