commit | 16156be5a740f7b4a075d9f15363b4fef9834043 | [log] [tgz] |
---|---|---|
author | swissChili <swisschili@fastmail.com> | Sun Jul 31 21:14:02 2022 -0700 |
committer | swissChili <swisschili@fastmail.com> | Sun Jul 31 21:14:02 2022 -0700 |
tree | c0a5dcecae1a9a85d0613394a36ab9fe41ee5f81 | |
parent | 805603169183196a09d3fdcbe7a365c8665aa703 [diff] [blame] |
Fix memory leaks revealed by GC segments
diff --git a/src/lisp/compiler.dasc b/src/lisp/compiler.dasc index e0e4eff..6549ecc 100644 --- a/src/lisp/compiler.dasc +++ b/src/lisp/compiler.dasc
@@ -554,6 +554,9 @@ value_t (*f)() = link_program(&d); + dasm_free(&d); + free(args); + gc_prepare_call(0); value_t val = f();