diff --git a/test/test-run-program.script b/test/test-run-program.script index 26d04d7fb53d3011ef9c66dbb5bfaac45b220aac..c43bcd3923e1f73393af5e5d7e8581d9c61f876a 100644 --- a/test/test-run-program.script +++ b/test/test-run-program.script @@ -25,11 +25,9 @@ #+(and sbcl os-windows) (leave-test "SBCL won't let us pass unquoted arguments to cmd.exe" 0) -#-(and sbcl os-windows) -(progn - (DBG "Testing echo ok 1 via run-program as a string") - (assert-equal "ok 1" - (dewindowize (run-program "echo ok 1" :output '(:string :stripped t))))) +(DBG "Testing echo ok 1 via run-program as a string") +(assert-equal "ok 1" + (dewindowize (run-program "echo ok 1" :output '(:string :stripped t)))) ;;; test asdf run-shell-command function (setf *verbose-out* nil)