Skip to content
Snippets Groups Projects
Unverified Commit 8ac31806 authored by Ludovic Courtès's avatar Ludovic Courtès
Browse files

services: hurd-vm: Check whether /dev/kvm exists at run time.

This change allows a childhurd to run within Guix System in a VM.

* gnu/services/virtualization.scm (hurd-vm-shepherd-service)[vm-command]:
Stage the 'file-exists?' call.
parent 118b6dbb
No related branches found
No related tags found
No related merge requests found
......@@ -937,13 +937,14 @@ (define (hurd-vm-shepherd-service config)
(provisions '(hurd-vm childhurd)))
(define vm-command
#~(list
(string-append #$qemu "/bin/qemu-system-i386")
#$@(if (file-exists? "/dev/kvm") '("--enable-kvm") '())
"-m" (number->string #$memory-size)
#$@net-options
#$@options
"--hda" #+image))
#~(append (list #$(file-append qemu "/bin/qemu-system-i386")
"-m" (number->string #$memory-size)
#$@net-options
#$@options
"--hda" #+image)
(if (file-exists? "/dev/kvm")
'("--enable-kvm")
'())))
(list
(shepherd-service
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment