(unrolled-collect) ( quot into -- quot' )


Vocabulary
sequences.unrolled.private

Inputs
quotan object
intoan object


Outputs
quot'an object


Definition
USING: kernel sequences.private ;

IN: sequences.unrolled.private

: (unrolled-collect) ( quot into -- quot' )
'[ dup @ swap _ set-nth-unsafe ] ; inline