From fc0e0f19245f522e7064dcf7e12bc0540bb97432 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Thu, 16 Jul 2009 05:50:44 -0500 Subject: [PATCH] compiler.cfg.block-joining: relax join heuristic --- basis/compiler/cfg/block-joining/block-joining.factor | 1 - 1 file changed, 1 deletion(-) diff --git a/basis/compiler/cfg/block-joining/block-joining.factor b/basis/compiler/cfg/block-joining/block-joining.factor index 39d9a64c41..982f0866e6 100644 --- a/basis/compiler/cfg/block-joining/block-joining.factor +++ b/basis/compiler/cfg/block-joining/block-joining.factor @@ -20,7 +20,6 @@ IN: compiler.cfg.block-joining : join-block? ( bb -- ? ) { - [ kill-vreg-block? not ] [ predecessors>> length 1 = ] [ predecessor kill-vreg-block? not ] [ predecessor successors>> length 1 = ]