Commit 2148e851 authored by Elias Pipping's avatar Elias Pipping

Remove artifact: launch-program :wait t

launch-program no longer accepts a parameter :wait; since
the call is surrounded by (wait-process ...), it would be
superfluous anyway.
parent dab656d9
......@@ -1019,7 +1019,7 @@ or :error-output."
(%handle-if-exists error-output if-error-output-exists)
#+(or allegro clozure cmucl (and lispworks os-unix) sbcl scl)
(wait-process
(apply 'launch-program (%normalize-system-command command) :wait t keys))
(apply 'launch-program (%normalize-system-command command) keys))
#+(or abcl clasp clisp cormanlisp ecl gcl genera (and lispworks os-windows) mkcl xcl)
(let ((%command (%redirected-system-command command input output error-output directory)))
#+(and lispworks os-windows)
......
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