diff --git a/basis/compiler/codegen/codegen.factor b/basis/compiler/codegen/codegen.factor index 2d35a3ca01..fb70a580a4 100755 --- a/basis/compiler/codegen/codegen.factor +++ b/basis/compiler/codegen/codegen.factor @@ -107,7 +107,7 @@ M: ##dispatch generate-insn label-table get ] B{ } make dup check-fixup - cfg get stack-frame>> [ total-size>> ] [ 0 ] if* + cfg get [ stack-frame>> [ total-size>> ] [ 0 ] if* ] [ 0 ] if* ] call 6 narray ; inline : generate ( cfg -- code )