From e379feeb459175648b8ff623d507b71e5bc343dc Mon Sep 17 00:00:00 2001
From: Alex Vondrak <ajvondrak@csupomona.edu>
Date: Mon, 27 Jun 2011 17:59:48 -0700
Subject: [PATCH] compiler.cfg.gvn.expressions: ##phis in different blocks
 should not be congruent

---
 extra/compiler/cfg/gvn/expressions/expressions.factor | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/extra/compiler/cfg/gvn/expressions/expressions.factor b/extra/compiler/cfg/gvn/expressions/expressions.factor
index c656d4ccc0..52b813012b 100644
--- a/extra/compiler/cfg/gvn/expressions/expressions.factor
+++ b/extra/compiler/cfg/gvn/expressions/expressions.factor
@@ -3,6 +3,7 @@
 USING: assocs accessors arrays classes classes.algebra
 combinators fry generic.parser kernel math namespaces
 quotations sequences slots words make sets
+compiler.cfg
 compiler.cfg.instructions
 compiler.cfg.instructions.syntax
 compiler.cfg.gvn.graph ;
@@ -88,4 +89,6 @@ M: ##load-reference >expr obj>> <reference-expr> ;
 ! phi equivalences
 
 M: ##phi >expr
-    inputs>> values [ vreg>vn ] map \ ##phi prefix ;
+    inputs>> values [ vreg>vn ] map
+    basic-block get number>> prefix
+    \ ##phi prefix ;