Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
user avatar
rtoy authored
  (delete-file (open "/tmp/tmp-file" :direction :output
                     :if-does-not-exist :create :if-exists :supersede))

signals an error because delete-file is unlinking the file twice,
because CLOSE is called with the option :ABORT T.

Don't do that, so that any reversion of the file isn't done, and we
file is deleted.
70cf5703
History
Name Last commit Last update