(appender-for) ( quot length exemplar -- appender accum )

Vocabulary

sequences.extras.private

Inputs

quot	an object
length	an object
exemplar	an object

Outputs

appender	an object
accum	an object

Definition

USING: kernel sequences ;

IN: sequences.extras.private

: (appender-for) ( quot length exemplar -- appender accum )
    new-resizable [ [ push-all ] curry compose ] keep ; inline