evict-bundle ( bundle -- )

Vocabulary

compiler.cfg.register-allocation.backtracking

Inputs

bundle

an object

Outputs

None

Definition

USING: accessors compiler.cfg.register-allocation.occupancy
heaps kernel namespaces sequences ;

IN: compiler.cfg.register-allocation.backtracking

: evict-bundle ( bundle -- )
    dup dup dup intervals>> first reg>>
    bundle-register-occupancy release-ranges
    dup assigned-bundles get remove-eq! drop dup intervals>>
    [ f >>reg drop ] each
    dup priority>> bundle-queue get heap-push
    backtracking-evictions inc ;