Stacken/c64-livecoding
6
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Bind *LABEL-COUNTER* to 0 at the start of compiling

Browse source
This commit is contained in:
John Lorentzson 2025-05-08 19:33:31 +02:00
parent bcc039774b
commit 501da2341e
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
wip-duuqnd/user-side-compiler/high-level.lisp
View file

@ -112,7 +112,8 @@
(produce-instruction 'inst-tax-implied))) (produce-instruction 'inst-tax-implied)))
(defmethod compile-starting-at ((node node)) (defmethod compile-starting-at ((node node))
(let ((*compile-result* '())) (let ((*compile-result* '())
(*label-counter* 0))
(compile-node node) (compile-node node)
(nreverse *compile-result*))) (nreverse *compile-result*)))