map-index! ( ... seq quot: ( ... elt index -- ... newelt ) -- ... seq )

Vocabulary

sequences.extras

Inputs

seq	a sequence
quot	a quotation

Outputs

seq	a sequence

Word description

A version of map-index which modifies seq in place.

Definition

USING: kernel sequences.private ;

IN: sequences.extras

: map-index!
    ( ... seq quot: ( ... elt index -- ... newelt ) -- ... seq )
    over [ [ sequence-index-operator ] dip collect ] keep ;
    inline