aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--etc/guix/system.scm19
1 files changed, 18 insertions, 1 deletions
diff --git a/etc/guix/system.scm b/etc/guix/system.scm
index 14d215f..3136b62 100644
--- a/etc/guix/system.scm
+++ b/etc/guix/system.scm
@@ -90,6 +90,23 @@ Seiko Epson Color Ink Jet Printers.")
license:lgpl2.1))))
+(define current-architecture
+ (car
+ (string-split %host-type
+ #\-)))
+
+(define desired-architectures
+ '("i386"
+ "x86_64"
+ "arm"
+ "aarch64"))
+
+(define platforms
+ (filter (lambda (name)
+ (not (equal? name current-architecture)))
+ desired-architectures))
+
+
(operating-system
(kernel ng.linux:linux)
(initrd ng.initrd:microcode-initrd)
@@ -173,7 +190,7 @@ Seiko Epson Color Ink Jet Printers.")
(service qemu-binfmt-service-type
(qemu-binfmt-configuration
(platforms
- (lookup-qemu-platforms "arm" "aarch64"))))
+ (apply lookup-qemu-platforms platforms))))
(service cups-service-type
(cups-configuration
(web-interface? #t)