mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-11-06 18:43:04 +00:00
Code Issues 1 Releases Wiki Activity

Address #1263

Browse Source 
Fix reference counting when cleaning up unused abstract types
per-thread.
This commit is contained in:
Calvin Rose
2023-08-20 14:53:25 -05:00
parent ca4c1e4259
commit b7f8224588
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/core/gc.c
View File

@@ -370,14 +370,15 @@ void janet_sweep() {
if (head->type->gc) { if (head->type->gc) {
janet_assert(!head->type->gc(head->data, head->size), "finalizer failed"); janet_assert(!head->type->gc(head->data, head->size), "finalizer failed");
} }
/* Free memory */
janet_free(janet_abstract_head(abst));
}
/* Mark as tombstone in place */ /* Mark as tombstone in place */
items[i].key = janet_wrap_nil(); items[i].key = janet_wrap_nil();
items[i].value = janet_wrap_false(); items[i].value = janet_wrap_false();
janet_vm.threaded_abstracts.deleted++; janet_vm.threaded_abstracts.deleted++;
janet_vm.threaded_abstracts.count--; janet_vm.threaded_abstracts.count--;
/* Free memory */
janet_free(janet_abstract_head(abst));
}
} }
/* Reset for next sweep */ /* Reset for next sweep */