Found a place to use the locals in literals feature

2008-09-13 04:43:29 -05:00 · 2008-09-13 04:43:29 -05:00 · a211e44bb9
parent 8779784798
commit a211e44bb9
1 changed files with 1 additions and 1 deletions
--- a/basis/compiler/tree/dead-code/recursive/recursive.factor
+++ b/basis/compiler/tree/dead-code/recursive/recursive.factor
@ -84,7 +84,7 @@ M:: #recursive remove-dead-code* ( node -- nodes )
            drop-outputs [ node drop-recursive-outputs ] |
         node [ (remove-dead-code) ] change-child 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* ;