mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 15:43:01 +00:00
Code Issues 1 Releases Wiki Activity

Fix memory leaks in marsh.c - missing frees.

Browse Source
This commit is contained in:
Calvin Rose
2018-10-04 17:33:44 -04:00
parent e8a4e83a0d
commit ba82290bae
1 changed files with 4 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/core/marsh.c
View File

@@ -427,6 +427,8 @@ int janet_marshal(JanetBuffer *buf, Janet x, int flags) {
if (!(status = setjmp(st.err)))
marshal_one(&st, x, flags);
janet_table_deinit(&st.seen);
janet_v_free(st.seen_envs);
janet_v_free(st.seen_defs);
return status;
}
@@ -1015,6 +1017,8 @@ int janet_unmarshal(
if (next) *next = nextbytes;
}
janet_array_deinit(&st.lookup);
janet_v_free(st.lookup_defs);
janet_v_free(st.lookup_envs);
return status;
}