01/02: ci: Don't cross compile to avr.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit 92e2de6fb400ff445106f2d7a4f5f5b1a009c87b
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Tue Dec 12 13:55:46 2023 +0200

    ci: Don't cross compile to avr.
    
    * gnu/ci.scm (cross-jobs)[pointless?]: Don't build any packages for avr.
    
    Change-Id: I1728727874d65461b82364e71b70c7d1fd050d90
---
 gnu/ci.scm | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/gnu/ci.scm b/gnu/ci.scm
index 279dd4d910..38dc4d1d5c 100644
--- a/gnu/ci.scm
+++ b/gnu/ci.scm
@@ -190,15 +190,16 @@ SYSTEM."
 
   (define (pointless? target)
     ;; Return #t if it makes no sense to cross-build to TARGET from SYSTEM.
-    (match system
-      ((or "x86_64-linux" "i686-linux")
-       (if (string-contains target "mingw")
-           (not (string=? "x86_64-linux" system))
-           #f))
-      (_
-       ;; Don't try to cross-compile from non-Intel platforms: this isn't
-       ;; very useful and these are often brittle configurations.
-       #t)))
+    (or (string=? target "avr") ; Nothing for AVR at this time.
+        (match system
+          ((or "x86_64-linux" "i686-linux")
+           (if (string-contains target "mingw")
+               (not (string=? "x86_64-linux" system))
+               #f))
+          (_
+           ;; Don't try to cross-compile from non-Intel platforms: this isn't
+           ;; very useful and these are often brittle configurations.
+           #t))))
 
   (define (either proc1 proc2 proc3)
     (lambda (x)