change-nths ( ... indices seq quot: ( ... elt -- ... elt' ) -- ... )

Vocabulary

sequences.extras

Inputs

indices	an object
seq	a sequence
quot	a quotation

Outputs

None

Word description

Applies quot to the locations present in indices in sequence seq, modifying it in place.

Definition

USING: kernel sequences ;

IN: sequences.extras

: change-nths
    ( ... indices seq quot: ( ... elt -- ... elt' ) -- ... )
    [ change-nth ] 2curry each ; inline