(set-doc-range) ( doc-lines from to lines -- changed-lines )

Vocabulary

documents.private

Inputs

doc-lines	an object
from	an object
to	an object
lines	an object

Outputs

changed-lines

an object

Definition

USING: kernel math sequences ;

IN: documents.private

: (set-doc-range)
    ( doc-lines from to lines -- changed-lines )
    [ prepare-insert ] 3keep [ [ first ] bi@ 1 + ] dip
    replace-slice ;