3append-as ( seq1 seq2 seq3 exemplar -- newseq )
Factor handbook » The language » Collections » Sequence operations » Appending sequences

Prev:	3append ( seq1 seq2 seq3 -- newseq )
Next:	surround ( seq1 seq2 seq3 -- newseq )

Vocabulary
sequences

Inputs

seq1	a sequence
seq2	a sequence
seq3	a sequence
exemplar	a sequence

Outputs

newseq

a sequence

Word description
Outputs a new sequence consisting of the elements of seq1, seq2 and seq3 in turn of the same type as exemplar.

Errors
Throws an error if seq1, seq2, or seq3 contain elements not permitted in sequences of the same class as exemplar.

Examples

USING: prettyprint sequences ; "a" "b" "c" SBUF" " 3append-as .
SBUF" abc"

See also
append, append-as, append!, 3append, push-all

Definition

USING: kernel math sequences.private ;

IN: sequences

: 3append-as ( seq1 seq2 seq3 exemplar -- newseq )
    [ 3dup 3length + + ] dip
    [ [ [ 2over 2length + ] dip copy-unsafe ] [ (append) ] bi ]
    new-like ; inline