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

cmp: correctly restore compile-file(-pathname) in ext:install-c-compiler

Browse source 
After a call to ext:install-c-compiler while the bytecodes compiler
    is installed, compile-file and compile-file-pathname still point
    to bc-compile-file and bc-compile-file-pathname. Reported and
    fixed by gitlab user pouar. Fixes #444.
This commit is contained in:
Marius Gerbershagen 2018-07-08 17:30:53 +02:00
parent aad6d252d6
commit a3e1cf7c78
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/cmp/cmpmain.lsp
View file

@ -981,8 +981,8 @@ from the C language code. NIL means \"do not create the file\"."
(setf *features* (delete :ecl-bytecmp *features*))
(setf (fdefinition 'disassemble) disassemble
(fdefinition 'compile) compile
(fdefinition 'compile-file) #'compile-file
(fdefinition 'compile-file-pathname) #'compile-file-pathname)
(fdefinition 'compile-file) compile-file
(fdefinition 'compile-file-pathname) compile-file-pathname)
(ext::package-lock (find-package :cl) t)))
(provide 'cmp)