sage
/
pebblisp
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix deleteEnv null-pointer bug.

This commit is contained in:
Sage Vaillancourt 2021-12-15 14:25:47 -05:00 committed by Sage Vaillancourt
parent c0ad4481bd
commit d73247a471
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/env.c
View File

@ -180,17 +180,19 @@ void addFunc(const char *name, Object (*func)(Object, Object, struct Environment
void deleteEnv(struct Environment *e) void deleteEnv(struct Environment *e)
{ {
int i = 0; if (e->strings) {
while(e->strings[i]) { int i = 0;
free(e->strings[i]); while(e->strings[i]) {
cleanObject(&e->objects[i]); free(e->strings[i]);
i++; cleanObject(&e->objects[i]);
} i++;
free(e->strings); }
e->strings = NULL; free(e->strings);
e->strings = NULL;
free(e->objects); free(e->objects);
e->objects = NULL; e->objects = NULL;
}
} }
struct symFunc { struct symFunc {