Commit 7e0aec2d authored by Elias Pipping's avatar Elias Pipping

Bug fix: Pass :if-*-exists on to Allegro CL

Prior to this, %run-command would generate errors such as

  File #P"/dev/null" already exists.: File exists [errno=17].

Tested with acl-10.0-linux-x86.
parent 8a27eb6b
......@@ -466,10 +466,11 @@ It returns a process-info plist with possible keys:
#-clisp `(#+(or allegro lispworks) :error-output #-(or allegro lispworks) :error
,%error-output)
#+(and allegro os-windows) `(:show-window ,(if interactive nil :hide))
#+(or clozure cmu ecl lispworks mkcl sbcl scl)
#+(or allegro clozure cmu ecl lispworks mkcl sbcl scl)
`(:if-input-does-not-exist ,if-input-does-not-exist
:if-output-exists ,if-output-exists
#-lispworks :if-error-exists #+lispworks :if-error-output-exists
#-(or allegro lispworks) :if-error-exists
#+(or allegro lispworks) :if-error-output-exists
,if-error-output-exists)
#+lispworks `(:save-exit-status t)
#+mkcl `(:directory ,(native-namestring directory))
......
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