From 064248d25bdfdab2703fd1dff0e850555d681b09 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Mon, 27 Jul 2009 22:28:13 -0500 Subject: [PATCH] compiler.cfg.debugger: reset vreg counters --- basis/compiler/cfg/debugger/debugger.factor | 2 ++ 1 file changed, 2 insertions(+) diff --git a/basis/compiler/cfg/debugger/debugger.factor b/basis/compiler/cfg/debugger/debugger.factor index 18f1b3be76..3c6ea1f0e4 100644 --- a/basis/compiler/cfg/debugger/debugger.factor +++ b/basis/compiler/cfg/debugger/debugger.factor @@ -14,9 +14,11 @@ IN: compiler.cfg.debugger GENERIC: test-cfg ( quot -- cfgs ) M: callable test-cfg + 0 vreg-counter set-global build-tree optimize-tree gensym build-cfg ; M: word test-cfg + 0 vreg-counter set-global [ build-tree optimize-tree ] keep build-cfg ; : test-mr ( quot -- mrs )