mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-20 19:42:30 -08:00
Code Issues Projects Releases Packages Wiki Activity

bytecmp: fix bugs in handling output-file option for compile-file

Browse source 
Always load the output file with the bytecodes loader and (as
specified) return the truename of the output-file.
This commit is contained in:
Marius Gerbershagen 2024-03-10 17:28:00 +01:00
parent 9e7d981b56
commit 4ddfd0c5e3
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
contrib/bytecmp/bytecmp.lsp
View file

@ -122,8 +122,8 @@
(write binary :stream sout :circle t :escape t :readably t :pretty nil))
(terpri sout)))))
(when load
(load output-file :verbose *compile-verbose*))
(values output-file nil nil))
(si::load-bytecodes output-file *compile-verbose* *load-print* :default))
(values (truename output-file) nil nil))
(defun install-bytecodes-compiler ()
(ext::package-lock (find-package :cl) nil)