last-chance-recolor ( interval -- ? )

Vocabulary

compiler.cfg.register-allocation.greedy

Inputs

interval

an object

Outputs

?

an object

Definition

USING: assocs hashtables.identity kernel math namespaces ;

IN: compiler.cfg.register-allocation.greedy

:: last-chance-recolor ( interval -- ? )
    "recolor-attempts" greedy-count
    32 <identity-hashtable> greedy-recolor-fixed set
    64 greedy-recolor-budget set interval 5 recolor-interval
    64 greedy-recolor-budget get -
    "recolor-search-steps" greedy-statistics get at 0 or +
    "recolor-search-steps" greedy-statistics get set-at dup
    [ "recolor-successes" greedy-count ] when ;