diff --git a/test/test-run-program.script b/test/test-run-program.script index 55c76895b3b7742512c35318363b640ff38bc218..6ec9935f7ef3d2fe63ed39abc8de504a31173920 100644 --- a/test/test-run-program.script +++ b/test/test-run-program.script @@ -37,6 +37,7 @@ (run-program "cat ; echo bar baz >&2 ; exit 42" :input '("foo") :output :string :error-output '(:string :stripped t) :ignore-error-status t))) + #-abcl (assert-equal '(("foo" "bar" "baz" "quux") nil 0) (multiple-value-list