Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • emarsden's avatar
    866f3cc2
    Fix a bug in RUN-PROGRAM's handling of the :append argument to · 866f3cc2
    emarsden authored
    :if-output-exists and :if-error-exists. The two forms below currently signal
    errors if the file /tmp/inexist does not exist, due to the defaulting value
    of the :if-exists argument to OPEN. With this change, the output/error file
    is created if it does not already exist.
    
      (ext:run-program "ls" '("/tmp") :output "/tmp/inexist" :if-output-exists :append)
    
      (ext:run-program "ls" '("/zob") :error "/tmp/inexist" :if-error-exists :append)
    866f3cc2
    History
    Fix a bug in RUN-PROGRAM's handling of the :append argument to
    emarsden authored
    :if-output-exists and :if-error-exists. The two forms below currently signal
    errors if the file /tmp/inexist does not exist, due to the defaulting value
    of the :if-exists argument to OPEN. With this change, the output/error file
    is created if it does not already exist.
    
      (ext:run-program "ls" '("/tmp") :output "/tmp/inexist" :if-output-exists :append)
    
      (ext:run-program "ls" '("/zob") :error "/tmp/inexist" :if-error-exists :append)