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


Vocabulary
sequences.extras.private

Inputs
quotan object
lengthan object
exemplaran object


Outputs
appenderan object
accuman object


Definition
USING: kernel sequences ;

IN: sequences.extras.private

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