mirror of
https://gitlab.com/embeddable-common-lisp/ecl.git
synced 2026-01-08 10:13:36 -08:00
Seems we need to call the garbage collector in order to stabilize loading of binary files
This commit is contained in:
parent
263c837285
commit
d93be391f9
2 changed files with 5 additions and 1 deletions
|
|
@ -314,6 +314,10 @@ si_load_binary(cl_object filename, cl_object verbose, cl_object print)
|
|||
cl_object prefix;
|
||||
cl_object output;
|
||||
|
||||
/* A full garbage collection enables us to detect unused code
|
||||
and leave space for the library to be loaded. */
|
||||
si_gc(Ct);
|
||||
|
||||
/* We need the full pathname */
|
||||
filename = cl_namestring(cl_truename(filename));
|
||||
|
||||
|
|
|
|||
|
|
@ -46,7 +46,7 @@ Returns, as a string, the location of the machine on which ECL runs."
|
|||
(defun lisp-implementation-version ()
|
||||
"Args:()
|
||||
Returns the version of your ECL as a string."
|
||||
"@PACKAGE_VERSION@ (CVS 2008-05-30 19:03)")
|
||||
"@PACKAGE_VERSION@ (CVS 2008-05-30 23:00)")
|
||||
|
||||
(defun machine-type ()
|
||||
"Args: ()
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue