Bind *LABEL-COUNTER* to 0 at the start of compiling
This commit is contained in:
parent
bcc039774b
commit
501da2341e
1 changed files with 2 additions and 1 deletions
|
@ -112,7 +112,8 @@
|
|||
(produce-instruction 'inst-tax-implied)))
|
||||
|
||||
(defmethod compile-starting-at ((node node))
|
||||
(let ((*compile-result* '()))
|
||||
(let ((*compile-result* '())
|
||||
(*label-counter* 0))
|
||||
(compile-node node)
|
||||
(nreverse *compile-result*)))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue