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

This will likely cause some test failures. mac32 hopefully won't crash.
2016-11-11 00:18:27 +01:00 · 2016-11-11 00:18:27 +01:00 · 5a0e583279
parent 9d1edc62c7
commit 5a0e583279
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? [
-        word>input-infos [
+        "input-classes" word-prop dup [
            [ node-input-infos ] dip
-            [ value-info<= ] 2all?
-        ] [ drop t ] if*
+            [ [ class>> ] dip class<= ] 2all?
+        ] [ 2drop t ] if
    ] [ 2drop f ] if ;

 M: #call mark-live-values*