finish-loop-spills ( intervals -- intervals )

Vocabulary

compiler.cfg.register-allocation.spill-sites

Inputs

intervals

an object

Outputs

intervals

an object

Definition

USING: accessors assocs kernel namespaces sequences ;

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

: finish-loop-spills ( intervals -- intervals )
    backtracking-loop-spills? get [
        dup [ establishes-cold-spill? ] filter
        [ [ vreg>> ] [ spill-to>> ] bi ] H{ } map>assoc
        established-cold-spills set dup [
            dup redundant-cold-spill?
            [ f >>spill-to cold-spill-store-count inc ] when
            drop
        ] each
    ] when ;