cold-definition? ( interval -- ? )

Vocabulary

compiler.cfg.register-allocation.spill-sites

Inputs

interval

an object

Outputs

?

an object

Definition

USING: accessors compiler.cfg.registers cpu.architecture kernel
math sequences ;

IN: compiler.cfg.register-allocation.spill-sites

:: cold-definition? ( interval -- ? )
    interval uses>> :> uses uses length 1 > [
        uses first def-rep>> int-rep eq? uses
        [ def-rep>> ] count 1 = and
        uses first spill-site-weight 1 = and
        uses second spill-site-weight 1 > and uses
        [ spill-slot?>> ] any? not and
        interval vreg>> rep-of int-rep eq? and
    ] [ f ] if ;