diff --git a/src/toolsrc/codegen.pla b/src/toolsrc/codegen.pla
index 24498fa..d098aa0 100644
--- a/src/toolsrc/codegen.pla
+++ b/src/toolsrc/codegen.pla
@@ -180,7 +180,7 @@ def emit_select(tag)#0
 end
 def emit_caseblock(cnt, oflist, taglist)#0
     byte i
-    
+
     if not cnt or cnt > 256; exit_err(ERR_OVER|ERR_STATE); fin
     emit_pending_seq
     emit_byte(cnt)
@@ -534,7 +534,7 @@ def init_idglobal#0
     fixup_num   = FIXUPNUM
     globalbufsz = IDGLOBALSZ
     localbufsz  = IDLOCALSZ
-    if isult(heapavail, $4000)
+    if isult(heapavail, $6000)
         dfd_num     = DFDNUM/2
         tag_num     = TAGNUM/2
         fixup_num   = FIXUPNUM/2