core: Better names for (each) etc

[factor.git] / core / growable / growable.factor

diff --git a/core/growable/growable.factor b/core/growable/growable.factor
index f2662ddfe74db5a52b2143f491879729ccd39c90..c248aff20890a574dbd7ff96f7a9b4d009423099 100644 (file)
--- a/core/growable/growable.factor
+++ b/core/growable/growable.factor
@@ -21,7 +21,7 @@ M: growable set-nth-unsafe underlying>> set-nth-unsafe ; inline
 
 : push-all-unsafe ( from to src dst -- )
     [ over - swap ] 2dip pickd [ length integer>fixnum-strict ] keep
-    [ [ fixnum+fast ] dip length<< ] 2keep <copy> (copy) drop ; inline
+    [ [ fixnum+fast ] dip length<< ] 2keep <copier> (copy) drop ; inline
 
 PRIVATE>