Skip to content
Snippets Groups Projects
Commit 6c764792 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

More tweaking test-run-program.

parent 1402852d
No related branches found
No related tags found
No related merge requests found
...@@ -242,8 +242,8 @@ Testing run-program ...@@ -242,8 +242,8 @@ Testing run-program
;; a basic smoke test ;; a basic smoke test
(assert-equal "ok" (dewindowize (run-program '("cmd" "/c" "echo" "ok") :output :line))) (assert-equal "ok" (dewindowize (run-program '("cmd" "/c" "echo" "ok") :output :line)))
#-clozure ;; http://trac.clozure.com/ccl/ticket/1118 (assert-equal "ok 1" (dewindowize (run-program "echo ok 1" :output :line)))
(assert-equal "ok 1" (dewindowize (run-program '("echo" "ok 1") :output :line))) ;; clozure: beware http://trac.clozure.com/ccl/ticket/1118
t) t)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment