r-next ( merge -- )

Vocabulary

sorting.private

Inputs

merge

an object

Outputs

None

Definition

USING: accessors growable.private kernel math ;

IN: sorting.private

: r-next ( merge -- )
    [ r-elt ] [ [ 1 + ] change-from2 accum>> ] bi push-unsafe ;
    inline