Browse Source

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".
wip-ipfs
Chris Marusich 4 years ago
parent
commit
4dd53a83b5
No known key found for this signature in database GPG Key ID: DD409A15D822469D
  1. 3
      gnu/build/marionette.scm

3
gnu/build/marionette.scm

@ -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…
Cancel
Save