diff --git a/wip-duuqnd/user-side-compiler/high-level.lisp b/wip-duuqnd/user-side-compiler/high-level.lisp index 4814f57..e69d6b6 100644 --- a/wip-duuqnd/user-side-compiler/high-level.lisp +++ b/wip-duuqnd/user-side-compiler/high-level.lisp @@ -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*)))