compiler.tree.dead-code.simple: undo e1b22e0af4
(#1513)
This will likely cause some test failures. mac32 hopefully won't crash.char-rename
parent
9d1edc62c7
commit
5a0e583279
|
@ -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*
|
||||
|
|
Loading…
Reference in New Issue