compiler.codegen: instruction counter is a global.

diff --git a/basis/compiler/codegen/codegen.factor b/basis/compiler/codegen/codegen.factor
index fb70a580a4a3f048f3386073f455b2dccd9d7384..3d6ab00d49a2d081fc664f344cf6c54e94570b6d 100755 (executable)
--- a/basis/compiler/codegen/codegen.factor
+++ b/basis/compiler/codegen/codegen.factor
@@ -78,7 +78,7 @@ M: ##dispatch generate-insn
     [ lookup-label resolve-label ]
     [
         instructions>> [
-            [ class-of insn-counts get inc-at ]
+            [ class-of insn-counts get-global inc-at ]
             [ generate-insn ]
             bi
         ] each