Commit 3b8b6cad authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

More tweaking of test-run-program for Windows.

parent 22fec1a2
......@@ -77,8 +77,7 @@
;; NB1: run-shell-command is deprecated. Use run-program instead.
;; NB2: we do NOT support stderr capture to *verbose-out* anymore in run-shell-command.
;; If you want 2>&1 redirection, you know where to find it.
#-(and clozure os-windows) ;; http://trac.clozure.com/ccl/ticket/1118
(assert-equal '(:ok 1) (run-program '("echo" ":ok 1") :output :forms))
(assert-equal '(:ok 1) (run-program '("echo :ok 1") :output :forms))
(assert-equal "ok" (dewindowize (stripln
(with-output-to-string (*standard-output*)
(run-program "echo ok" :output t :error-output :output)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment