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

Avoid segmentation fault when module is :DEFAULT and the symbol is not found.

Browse source
This commit is contained in:
goffioul 2005-10-24 09:06:21 +00:00
parent 9d3fc0362e
commit bffae25f2f
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/ffi.d
View file

@ -427,7 +427,7 @@ cl_object
si_find_foreign_symbol(cl_object var, cl_object module, cl_object type, cl_object size)
{
cl_object block;
cl_object output;
cl_object output = Cnil;
void *sym;
block = (module == @':default' ? module : si_load_foreign_module(module));