greedy-enqueue ( interval -- )

Vocabulary

compiler.cfg.register-allocation.greedy

Inputs

interval

an object

Outputs

None

Definition

USING: accessors heaps kernel namespaces sequences ;

IN: compiler.cfg.register-allocation.greedy

: greedy-enqueue ( interval -- )
    dup uses>> empty?
    [ drop ] [
        f >>reg
        dup cached-priority over interval-stage assign-stage =
        [ 1 ] [ 0 ] if prefix greedy-queue get heap-push
    ] if ;