me/guix
Archived
1
0
Fork 0
Code Activity

build: vm: Fix qemu-command procedure.

Browse source 
* gnu/build/vm.scm (qemu-command): When system is "armhf-linux", use "arm" as
qemu cpu prefix.
This commit is contained in:
Mathieu Othacehe 2019-12-01 16:46:00 +01:00
parent 2c5dd47cef
commit c6d130630a
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gnu/build/vm.scm
View file

@ -70,9 +70,10 @@
(let ((cpu (substring system 0 (let ((cpu (substring system 0
(string-index system #\-)))) (string-index system #\-))))
(string-append "qemu-system-" (string-append "qemu-system-"
(if (string-match "^i[3456]86$" cpu) (cond
"i386" ((string-match "^i[3456]86$" cpu) "i386")
cpu)))) ((string-match "armhf" cpu) "arm")
(else cpu)))))
(define* (load-in-linux-vm builder (define* (load-in-linux-vm builder
#:key #:key