From: John Benediktsson Date: Wed, 26 Jan 2022 17:50:16 +0000 (-0800) Subject: sequences.extras: using (each-index) X-Git-Tag: 0.99~1629 X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=2ebb23543634db7117c43d21a44d6452bd399cd6 sequences.extras: using (each-index) --- diff --git a/extra/sequences/extras/extras.factor b/extra/sequences/extras/extras.factor index cc19f1e883..27d3b82653 100644 --- a/extra/sequences/extras/extras.factor +++ b/extra/sequences/extras/extras.factor @@ -359,7 +359,7 @@ PRIVATE> ] [ 3drop f ] if ; inline : map-index! ( ... seq quot: ( ... elt index -- ... newelt ) -- ... seq ) - over [ [ (map-each-index) ] dip collect ] keep ; inline + over [ [ (each-index) ] dip collect ] keep ; inline