Revert "compiler.tree.dead-code.simple: undo e1b22e0af4 (#1513)"

This reverts commit 5a0e583279.
2016-11-11 13:18:10 +01:00 · 2016-11-11 13:18:10 +01:00 · e9f9903393
parent 5f1400bd0c
commit e9f9903393
1 changed files with 3 additions and 3 deletions
--- a/basis/compiler/tree/dead-code/simple/simple.factor
+++ b/basis/compiler/tree/dead-code/simple/simple.factor
@ -9,10 +9,10 @@ IN: compiler.tree.dead-code.simple

 : flushable-call? ( #call -- ? )
    dup word>> dup flushable? [
-        "input-classes" word-prop dup [
+        word>input-infos [
            [ node-input-infos ] dip
-            [ [ class>> ] dip class<= ] 2all?
-        ] [ 2drop t ] if
+            [ value-info<= ] 2all?
+        ] [ drop t ] if*
    ] [ 2drop f ] if ;

 M: #call mark-live-values*