minimal-interval? ( interval -- ? )

Vocabulary

compiler.cfg.register-allocation.backtracking

Inputs

interval

an object

Outputs

?

an object

Definition

USING: accessors compiler.cfg.linear-scan.live-intervals kernel
math namespaces sequences ;

IN: compiler.cfg.register-allocation.backtracking

:: minimal-interval? ( interval -- ? )
    interval uses>> empty?
    [ f ] [
        interval first-use n>> :> first interval last-use n>>
        :> last backtracking-phase-mode? get
        [ first 2 /i last 2 /i = ] [ first last = ] if
        interval live-interval-start interval first-use
        phase-reload-start = and
        interval live-interval-end last 1 + <= and
    ] if ;