seed-ssa-fixed-locations ( fixed-locations -- )

Vocabulary

compiler.cfg.register-allocation.ssa

Inputs

fixed-locations

an object

Outputs

None

Definition

USING: arrays assocs compiler.cfg.instructions
compiler.cfg.linear-scan.allocation.state
compiler.cfg.linear-scan.assignment
compiler.cfg.register-allocation.rematerialization
compiler.cfg.registers compiler.cfg.ssa.destruction.leaders
cpu.architecture kernel namespaces ;

IN: compiler.cfg.register-allocation.ssa

:: seed-ssa-fixed-locations ( fixed-locations -- )
    fixed-locations [
        fixed-locations [| vreg location |
            location spill-slot? location constant-recipe? or [
                location vreg leader pending-interval-assoc get
                set-at location spill-slot? [
                    location vreg leader vreg rep-of rep-size
                    2array spill-slots get set-at
                ] when
            ] [ vreg location invalid-ssa-fixed-location ] if
        ] assoc-each
    ] when ;