cascade-safe? ( interval victim -- ? )

Vocabulary

compiler.cfg.register-allocation.greedy

Inputs

interval	an object
victim	an object

Outputs

?

an object

Definition

USING: accessors kernel math ;

IN: compiler.cfg.register-allocation.greedy

:: cascade-safe? ( interval victim -- ? )
    interval interval-progress cascade>> :> cascade victim
    interval-progress cascade>> :> other cascade 0 =
    other cascade < or ;