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".
2018-01-09 09:26:27 +01:00 · 2018-01-09 09:26:27 +01:00 · 16d78a8f72
parent 20abb8c408
commit 16d78a8f72
1 changed files with 8 additions and 0 deletions
--- a/gnu/tests.scm
+++ b/gnu/tests.scm
@ -172,6 +172,14 @@ marionette service in the guest is started after the Shepherd services listed
 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)