diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix memory leak in foreign code handling

Browse Source
This commit is contained in:
Vitor Santos Costa 2012-12-07 08:06:45 +00:00
parent a813a13412
commit c52d7a182c
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
C/load_dl.c
View File

@ -191,21 +191,27 @@ Yap_ShutdownLoadForeign(void)
f_code = ForeignCodeLoaded; f_code = ForeignCodeLoaded;
while (f_code != NULL) { while (f_code != NULL) {
StringList objs, libs; StringList objs, libs, old;
ForeignObj *of_code = f_code;
objs = f_code->objs; objs = f_code->objs;
while (objs != NULL) { while (objs != NULL) {
old = objs;
if (dlclose(objs->handle) != 0) if (dlclose(objs->handle) != 0)
return; /* ERROR */ return; /* ERROR */
objs = objs->next; objs = objs->next;
Yap_FreeCodeSpace(old);
} }
libs = f_code->libs; libs = f_code->libs;
while (libs != NULL) { while (libs != NULL) {
old = libs;
if (dlclose(libs->handle) != 0) if (dlclose(libs->handle) != 0)
return; /* ERROR */ return; /* ERROR */
objs = libs->next; libs = libs->next;
Yap_FreeCodeSpace(old);
} }
f_code = f_code->next; f_code = f_code->next;
Yap_FreeCodeSpace((ADDR)of_code);
} }
/* /*
make sure that we don't try to close foreign code several times, eg, make sure that we don't try to close foreign code several times, eg,