factor: Final rename of ranges words and fix up some using lists

[factor.git] / extra / picomath / picomath-tests.factor

diff --git a/extra/picomath/picomath-tests.factor b/extra/picomath/picomath-tests.factor
index a7c01c0eb3f8d7aabbb783e2f418d142c1a31ef7..4e1bb81c19485df4619883d83c9ecc32e6d9cbd2 100644 (file)
--- a/extra/picomath/picomath-tests.factor
+++ b/extra/picomath/picomath-tests.factor
@@ -39,7 +39,7 @@ IN: picomath
     supremum 1e-3 <
 ] unit-test
 
-: factorial ( n -- n! ) [ 1 ] [ [1,b] 1 [ * ] reduce ] if-zero ;
+: factorial ( n -- n! ) [ 1 ] [ [1..b] 1 [ * ] reduce ] if-zero ;
 
 { t } [
     { 0 1 10 100 1000 10000 } [