math.extras: .. and ... are cool but not used and can come back soon.

diff --git a/extra/math/extras/extras.factor b/extra/math/extras/extras.factor
index c8dee82c93ec33c14a76043b8d5a1e74b8bcac86..1808e1c03106702e481a8ab7c204c4422ec833af 100644 (file)
--- a/extra/math/extras/extras.factor
+++ b/extra/math/extras/extras.factor
@@ -304,9 +304,8 @@ PRIVATE>
     [ 0.0 0.0 ] 2dip [ 2dip rot kahan+ ] curry
     [ -rot ] prepose each nip ; inline
 
-SYNTAX: .. dup pop scan-object [a,b) suffix! ;
-
-SYNTAX: ... dup pop scan-object [a,b] suffix! ;
+! SYNTAX: .. dup pop scan-object [a,b) suffix! ;
+! SYNTAX: ... dup pop scan-object [a,b] suffix! ;
 
 GENERIC: sum-squares ( seq -- n )
 M: object sum-squares [ sq ] map-sum ;