compiler.cfg.ssa.construction.tests: fix tc broken by previous commit

2014-12-10 23:33:07 +01:00 · 2014-12-10 23:33:07 +01:00 · e371327ec4
parent befbe0bb59
commit e371327ec4
1 changed files with 1 additions and 2 deletions
--- a/basis/compiler/cfg/ssa/construction/construction-tests.factor
+++ b/basis/compiler/cfg/ssa/construction/construction-tests.factor
@ -14,8 +14,7 @@ IN: compiler.cfg.ssa.construction.tests
 : test-ssa ( -- )
    0 get block>cfg
    dup cfg set
-    construct-ssa
-    drop ;
+    construct-ssa ;

 : clean-up-phis ( insns -- insns' )
    [ dup ##phi? [ [ [ [ number>> ] dip ] assoc-map ] change-inputs ] when ] map ;