split-instructions ( insns seq -- insns-seq )

Vocabulary

compiler.cfg.gc-checks.private

Inputs

insns	an object
seq	an object

Outputs

insns-seq

an object

Definition

USING: make sequences ;

IN: compiler.cfg.gc-checks.private

:: split-instructions ( insns seq -- insns-seq )
    [
        insns 0 seq
        [| insns from to | from to insns subseq , insns to ]
        each tail ,
    ] { } make ;