From c86d92a219317c73371c6ee99d45da77883c995e Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Wed, 14 Dec 2011 12:51:12 -0800
Subject: [PATCH] fix compiler.codegen tests

---
 basis/compiler/codegen/codegen.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 )