diff --git a/uiop/run-program.lisp b/uiop/run-program.lisp index 33263606c85590e363df27d5c68e9562abe4b33b..395926a7fb99cda45f5a6810771c0838d6f84065 100644 --- a/uiop/run-program.lisp +++ b/uiop/run-program.lisp @@ -923,7 +923,7 @@ or an indication of failure via the EXIT-CODE of the process" #+clisp (member error-output '(:interactive :output)) ;; A race condition in ECL <= 16.0.0 prevents using ext:run-program #+ecl #.(if-let (ver (parse-version (lisp-implementation-version))) - (lexicographic<= ver '(16 0 1))) + (lexicographic<= '< ver '(16 0 1))) #+(and lispworks os-unix) (%interactivep input output error-output) #+(or abcl cormanlisp gcl (and lispworks os-windows) mcl xcl) t) '%use-system '%use-run-program)