marionette: Add support for QEMU's "quit" command.
* gnu/build/marionette.scm (marionette-control): Don't wait for the monitor prompt when the command was "quit".
This commit is contained in:
parent
d973915e48
commit
4dd53a83b5
|
@ -222,7 +222,8 @@ pcsys_monitor\")."
|
|||
(($ <marionette> _ _ monitor)
|
||||
(display command monitor)
|
||||
(newline monitor)
|
||||
(wait-for-monitor-prompt monitor))))
|
||||
;; The "quit" command terminates QEMU immediately, with no output.
|
||||
(unless (string=? command "quit") (wait-for-monitor-prompt monitor)))))
|
||||
|
||||
(define* (marionette-screen-text marionette
|
||||
#:key
|
||||
|
|
Loading…
Reference in New Issue