math.polynomials: use <repetition> instead of <array>

2009-05-05 18:34:52 -05:00 · 2009-05-05 18:34:52 -05:00 · 4ee5815843
parent a4d80eb27b
commit 4ee5815843
1 changed files with 1 additions and 1 deletions
--- a/basis/math/polynomials/polynomials.factor
+++ b/basis/math/polynomials/polynomials.factor
@ -16,7 +16,7 @@ IN: math.polynomials
 PRIVATE>

 : powers ( n x -- seq )
-    <array> 1 [ * ] accumulate nip ;
+    <repetition> 1 [ * ] accumulate nip ;

 : p= ( p q -- ? ) pextend = ;