mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
tests: marionette-operating-system: Add initrd parameter and kernel-arguments.
* gnu/tests.scm (marionette-operating-system): Use initrd parameter "on-error" and kernel-arguments "panic".
This commit is contained in:
parent
20abb8c408
commit
16d78a8f72
1 changed files with 8 additions and 0 deletions
|
@ -172,6 +172,14 @@ (define* (marionette-operating-system os
|
|||
in REQUIREMENTS."
|
||||
(operating-system
|
||||
(inherit os)
|
||||
;; Make sure the guest dies on error.
|
||||
(kernel-arguments (cons "panic=1"
|
||||
(operating-system-user-kernel-arguments os)))
|
||||
;; Make sure the guest doesn't hang in the REPL on error.
|
||||
(initrd (lambda (fs . rest)
|
||||
(apply (operating-system-initrd os) fs
|
||||
#:on-error 'backtrace
|
||||
rest)))
|
||||
(services (cons (service marionette-service-type
|
||||
(marionette-configuration
|
||||
(requirements requirements)
|
||||
|
|
Loading…
Reference in a new issue