mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
vm: Add #:memory-size parameter for 'expression->derivation-in-linux-vm'.
* gnu/system/vm.scm (expression->derivation-in-linux-vm): Add #:memory-size parameter, defaulting to 256 (QEMU defaults to 128.)
This commit is contained in:
parent
4d9a80ba75
commit
defa1b9bee
1 changed files with 4 additions and 1 deletions
|
@ -78,12 +78,14 @@ (define* (expression->derivation-in-linux-vm name exp
|
|||
|
||||
(make-disk-image? #f)
|
||||
(references-graphs #f)
|
||||
(memory-size 256)
|
||||
(disk-image-size
|
||||
(* 100 (expt 2 20))))
|
||||
"Evaluate EXP in a QEMU virtual machine running LINUX with INITRD (a
|
||||
derivation). In the virtual machine, EXP has access to all of INPUTS from the
|
||||
store; it should put its output files in the `/xchg' directory, which is
|
||||
copied to the derivation's output when the VM terminates.
|
||||
copied to the derivation's output when the VM terminates. The virtual machine
|
||||
runs with MEMORY-SIZE MiB of memory.
|
||||
|
||||
When MAKE-DISK-IMAGE? is true, then create a QEMU disk image of
|
||||
DISK-IMAGE-SIZE bytes and return it.
|
||||
|
@ -157,6 +159,7 @@ (define builder
|
|||
|
||||
(and (zero?
|
||||
(system* qemu "-enable-kvm" "-nographic" "-no-reboot"
|
||||
"-m" ,(number->string memory-size)
|
||||
"-net" "nic,model=virtio"
|
||||
"-virtfs"
|
||||
,(string-append "local,id=store_dev,path=" (%store-prefix)
|
||||
|
|
Loading…
Reference in a new issue