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

Merge branch 'master' of http://ecls.sourceforge.net/git/ecl/

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2008-05-31 15:11:59 +02:00
commit 0ce0eaf8b1
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/c/load.d
View file

@ -314,6 +314,13 @@ 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. This is only
required when we use the dlopen wrappers. */
#ifndef GBC_BOEHM_GENGC
si_gc(Ct);
#endif
/* We need the full pathname */
filename = cl_namestring(cl_truename(filename));