tests: add regression test for run-program

Dummy one checking if external-process-status simply finishes.
This commit is contained in:
Daniel Kochmanski 2017-07-21 15:39:43 +02:00
parent 2d88ee6ce1
commit c6b2fb658e

View file

@ -104,6 +104,7 @@
(sleep 1)
#-windows(is-eql :signaled (ext:external-process-wait process nil))
#+windows(is-eql :exited (ext:external-process-wait process nil))
(finishes (ext:external-process-status process))
(finishes (ext:terminate-process process t)))))
;;; We may want to craft it into an interface. Suspend/Resume *is* possible on Windows: