Found a place to use the locals in literals feature
parent
8779784798
commit
a211e44bb9
|
@ -84,7 +84,7 @@ M:: #recursive remove-dead-code* ( node -- nodes )
|
||||||
drop-outputs [ node drop-recursive-outputs ] |
|
drop-outputs [ node drop-recursive-outputs ] |
|
||||||
node [ (remove-dead-code) ] change-child drop
|
node [ (remove-dead-code) ] change-child drop
|
||||||
node label>> [ filter-live ] change-enter-out drop
|
node label>> [ filter-live ] change-enter-out drop
|
||||||
drop-inputs node drop-outputs 3array
|
{ drop-inputs node drop-outputs }
|
||||||
] ;
|
] ;
|
||||||
|
|
||||||
M: #return-recursive remove-dead-code* ;
|
M: #return-recursive remove-dead-code* ;
|
||||||
|
|
Loading…
Reference in New Issue