insert* ( seq pos gb -- )

Vocabulary

gap-buffer

Inputs

seq	an object
pos	an object
gb	an object

Outputs

None

Definition

IN: gap-buffer

GENERIC#: insert* 2 ( seq pos gb -- )

Methods

USING: arrays gap-buffer kernel math ;

M: number insert* [ 1array ] 2dip insert* ;


USING: gap-buffer kernel sequences ;

M: sequence insert*
    prepare-insert [ insert-elements ] 2keep
    swap length increment-gap-start ;