compiler.cfg.gvn.comparisons: missed a spot for with-available-uses?

diff --git a/extra/compiler/cfg/gvn/comparisons/comparisons.factor b/extra/compiler/cfg/gvn/comparisons/comparisons.factor
index b84126419c4858395fe5de1777be8612f1539f90..3b86a0159315d2f390c861f5639df031406f1c5b 100644 (file)
--- a/extra/compiler/cfg/gvn/comparisons/comparisons.factor
+++ b/extra/compiler/cfg/gvn/comparisons/comparisons.factor
@@ -80,7 +80,7 @@ UNION: general-compare-insn scalar-compare-insn ##test-vector ;
 
 : rewrite-boolean-comparison? ( insn -- ? )
     {
-        [ src1>> vreg>insn general-compare-insn? ]
+        [ src1>> vreg>insn [ general-compare-insn? ] with-available-uses? ]
         [ src2>> not ]
         [ cc>> cc/= eq? ]
     } 1&& ; inline