6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-01-21 17:31:31 +00:00
Code Issues Projects Releases Wiki Activity

Reset assoc_list and sweep_stack in eval_quote

Browse Source
This commit is contained in:
David Schmenk 2024-08-02 15:38:00 -07:00
parent 31a716062e
commit 3e258bf622
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
images/apple/DRAWL.po
View File

Binary file not shown.

2
src/lisp/s-expr.pla
View File

@ -1019,6 +1019,8 @@ export def eval_expr(expr)#1
end end
export def eval_quote(expr)#1 export def eval_quote(expr)#1
assoc_list = NULL
sweep_stack_top = 0
push_sweep_stack(expr) // Keep expr from being GC'ed push_sweep_stack(expr) // Keep expr from being GC'ed
expr = eval_expr(expr) expr = eval_expr(expr)
pop_sweep_stack pop_sweep_stack