core: fix stack effect and use new word

[factor.git] / core / sequences / sequences.factor

diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 8b3697ab9f488492e26a68448b951dadda0538d2..5e7b01ef5d3c5977ae199c239d47beb138085c57 100644 (file)
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -412,7 +412,7 @@ PRIVATE>
 : sequence-operator ( seq quot -- i n quot' )
     [ >underlying< [ nth-unsafe ] curry ] dip compose ; inline
 
-: length-iterator ( seq quot -- n quot' )
+: length-iterator ( seq -- n quot' )
     length-sequence [ nth-unsafe ] curry ; inline
 
 : length-operator ( seq quot -- n quot' )