mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-14 05:12:38 -08:00
Code Issues Projects Releases Packages Wiki Activity

Protect sysfun.lsp from a nasty user that changes the readtable.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-07-02 00:13:21 +02:00
parent 8d06d5b7fa
commit 70a281909a
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/cmp/cmpmain.lsp
View file

@ -867,6 +867,7 @@ from the C language code. NIL means \"do not create the file\"."
(si::package-lock "CL" nil)
#-ecl-min
(load "sys:sysfun")
(with-standard-io-syntax
(load "sys:sysfun"))
(provide 'cmp)