mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2025-12-06 02:40:26 -08:00
Code Issues Projects Releases Packages Wiki Activity

bytecmp.lisp: allow T for :output-file in bc-compile-file. Fixes #393

Browse source
This commit is contained in:
Marius Gerbershagen 2017-11-03 20:29:09 +01:00
parent e45b808aa8
commit c279138bb2
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
contrib/bytecmp/bytecmp.lsp
View file

@ -79,7 +79,7 @@
(external-format :default)
(output-file nil output-file-p)
&allow-other-keys &aux foo)
(setf output-file (if output-file-p
(setf output-file (if (and output-file-p (not (eql output-file t)))
(pathname output-file)
(bc-compile-file-pathname input)))
(when *compile-verbose*