Instruction

ghc-8.2.2: The GHC API

Safe Haskell | None
Language | Haskell2010

Instruction

Synopsis

- data RegUsage = RU [Reg] [Reg]
- noUsage :: RegUsage
- data GenBasicBlock i = BasicBlock BlockId [i]
- blockId :: GenBasicBlock i -> BlockId
- newtype ListGraph i = ListGraph [GenBasicBlock i]
- type NatCmm instr = GenCmmGroup CmmStatics (LabelMap CmmStatics) (ListGraph instr)
- type NatCmmDecl statics instr = GenCmmDecl statics (LabelMap CmmStatics) (ListGraph instr)
- type NatBasicBlock instr = GenBasicBlock instr
- topInfoTable :: GenCmmDecl a (LabelMap i) (ListGraph b) -> Maybe i
- entryBlocks :: GenCmmDecl a (LabelMap i) (ListGraph b) -> [BlockId]
- class Instruction instr where

# Documentation

data RegUsage Source #

Holds a list of source and destination registers used by a particular instruction.

Machine registers that are pre-allocated to stgRegs are filtered out, because they are uninteresting from a register allocation standpoint. (We wouldn't want them to end up on the free list!)

As far as we are concerned, the fixed registers simply don't exist (for allocation purposes, anyway).

Constructors

RU [Reg] [Reg] |

noUsage :: RegUsage Source #

No regs read or written to.

data GenBasicBlock i Source #

Constructors

BasicBlock BlockId [i] |

Instances

Outputable instr => Outputable (GenBasicBlock instr) # |
Methods ppr :: GenBasicBlock instr -> SDoc Source # pprPrec :: Rational -> GenBasicBlock instr -> SDoc Source #

blockId :: GenBasicBlock i -> BlockId Source #

The branch block id is that of the first block in the branch, which is that branch's entry point

newtype ListGraph i Source #

Constructors

ListGraph [GenBasicBlock i] |

Instances

Outputable instr => Outputable (ListGraph instr) # |
Methods ppr :: ListGraph instr -> SDoc Source # pprPrec :: Rational -> ListGraph instr -> SDoc Source #

type NatCmm instr = GenCmmGroup CmmStatics (LabelMap CmmStatics) (ListGraph instr) Source #

type NatCmmDecl statics instr = GenCmmDecl statics (LabelMap CmmStatics) (ListGraph instr) Source #

type NatBasicBlock instr = GenBasicBlock instr Source #

topInfoTable :: GenCmmDecl a (LabelMap i) (ListGraph b) -> Maybe i Source #

Returns the info table associated with the CmmDecl's entry point, if any.

entryBlocks :: GenCmmDecl a (LabelMap i) (ListGraph b) -> [BlockId] Source #

Return the list of BlockIds in a CmmDecl that are entry points for this proc (i.e. they may be jumped to from outside this proc).

class Instruction instr where Source #

Common things that we can do with instructions, on all architectures. These are used by the shared parts of the native code generator, specifically the register allocators.

Minimal complete definition

regUsageOfInstr, patchRegsOfInstr, isJumpishInstr, jumpDestsOfInstr, patchJumpInstr, mkSpillInstr, mkLoadInstr, takeDeltaInstr, isMetaInstr, mkRegRegMoveInstr, takeRegRegMoveInstr, mkJumpInstr, mkStackAllocInstr, mkStackDeallocInstr

Methods

regUsageOfInstr :: Platform -> instr -> RegUsage Source #

Get the registers that are being used by this instruction. regUsage doesn't need to do any trickery for jumps and such. Just state precisely the regs read and written by that insn. The consequences of control flow transfers, as far as register allocation goes, are taken care of by the register allocator.

patchRegsOfInstr :: instr -> (Reg -> Reg) -> instr Source #

Apply a given mapping to all the register references in this instruction.

isJumpishInstr :: instr -> Bool Source #

Checks whether this instruction is a jump/branch instruction. One that can change the flow of control in a way that the register allocator needs to worry about.

jumpDestsOfInstr :: instr -> [BlockId] Source #

Give the possible destinations of this jump instruction. Must be defined for all jumpish instructions.

patchJumpInstr :: instr -> (BlockId -> BlockId) -> instr Source #

Change the destination of this jump instruction. Used in the linear allocator when adding fixup blocks for join points.

mkSpillInstr Source #

Arguments

:: DynFlags |
-> Reg | the reg to spill
-> Int | the current stack delta
-> Int | spill slot to use
-> instr |

An instruction to spill a register into a spill slot.

mkLoadInstr Source #

Arguments

:: DynFlags |
-> Reg | the reg to reload.
-> Int | the current stack delta
-> Int | the spill slot to use
-> instr |

An instruction to reload a register from a spill slot.

takeDeltaInstr :: instr -> Maybe Int Source #

See if this instruction is telling us the current C stack delta

isMetaInstr :: instr -> Bool Source #

Check whether this instruction is some meta thing inserted into the instruction stream for other purposes.

Not something that has to be treated as a real machine instruction and have its registers allocated.

eg, comments, delta, ldata, etc.

mkRegRegMoveInstr Source #

Arguments

:: Platform |
-> Reg | source register
-> Reg | destination register
-> instr |

Copy the value in a register to another one. Must work for all register classes.

takeRegRegMoveInstr :: instr -> Maybe (Reg, Reg) Source #

Take the source and destination from this reg -> reg move instruction or Nothing if it's not one

mkJumpInstr :: BlockId -> [instr] Source #

Make an unconditional jump instruction. For architectures with branch delay slots, its ok to put a NOP after the jump. Don't fill the delay slot with an instruction that references regs or you'll confuse the linear allocator.

mkStackAllocInstr :: Platform -> Int -> instr Source #

mkStackDeallocInstr :: Platform -> Int -> instr Source #

Instances

Instruction Instr # | Instruction instance for x86 instruction set.
Methods regUsageOfInstr :: Platform -> Instr -> RegUsage Source # patchRegsOfInstr :: Instr -> (Reg -> Reg) -> Instr Source # isJumpishInstr :: Instr -> Bool Source # jumpDestsOfInstr :: Instr -> [BlockId] Source # patchJumpInstr :: Instr -> (BlockId -> BlockId) -> Instr Source # mkSpillInstr :: DynFlags -> Reg -> Int -> Int -> Instr Source # mkLoadInstr :: DynFlags -> Reg -> Int -> Int -> Instr Source # takeDeltaInstr :: Instr -> Maybe Int Source # isMetaInstr :: Instr -> Bool Source # mkRegRegMoveInstr :: Platform -> Reg -> Reg -> Instr Source # takeRegRegMoveInstr :: Instr -> Maybe (Reg, Reg) Source # mkJumpInstr :: BlockId -> [Instr] Source # mkStackAllocInstr :: Platform -> Int -> Instr Source # mkStackDeallocInstr :: Platform -> Int -> Instr Source #
Instruction Instr # | instance for sparc instruction set
Methods regUsageOfInstr :: Platform -> Instr -> RegUsage Source # patchRegsOfInstr :: Instr -> (Reg -> Reg) -> Instr Source # isJumpishInstr :: Instr -> Bool Source # jumpDestsOfInstr :: Instr -> [BlockId] Source # patchJumpInstr :: Instr -> (BlockId -> BlockId) -> Instr Source # mkSpillInstr :: DynFlags -> Reg -> Int -> Int -> Instr Source # mkLoadInstr :: DynFlags -> Reg -> Int -> Int -> Instr Source # takeDeltaInstr :: Instr -> Maybe Int Source # isMetaInstr :: Instr -> Bool Source # mkRegRegMoveInstr :: Platform -> Reg -> Reg -> Instr Source # takeRegRegMoveInstr :: Instr -> Maybe (Reg, Reg) Source # mkJumpInstr :: BlockId -> [Instr] Source # mkStackAllocInstr :: Platform -> Int -> Instr Source # mkStackDeallocInstr :: Platform -> Int -> Instr Source #
Instruction Instr # | Instruction instance for powerpc
Methods regUsageOfInstr :: Platform -> Instr -> RegUsage Source # patchRegsOfInstr :: Instr -> (Reg -> Reg) -> Instr Source # isJumpishInstr :: Instr -> Bool Source # jumpDestsOfInstr :: Instr -> [BlockId] Source # patchJumpInstr :: Instr -> (BlockId -> BlockId) -> Instr Source # mkSpillInstr :: DynFlags -> Reg -> Int -> Int -> Instr Source # mkLoadInstr :: DynFlags -> Reg -> Int -> Int -> Instr Source # takeDeltaInstr :: Instr -> Maybe Int Source # isMetaInstr :: Instr -> Bool Source # mkRegRegMoveInstr :: Platform -> Reg -> Reg -> Instr Source # takeRegRegMoveInstr :: Instr -> Maybe (Reg, Reg) Source # mkJumpInstr :: BlockId -> [Instr] Source # mkStackAllocInstr :: Platform -> Int -> Instr Source # mkStackDeallocInstr :: Platform -> Int -> Instr Source #
Instruction instr => Instruction (InstrSR instr) # |
Methods regUsageOfInstr :: Platform -> InstrSR instr -> RegUsage Source # patchRegsOfInstr :: InstrSR instr -> (Reg -> Reg) -> InstrSR instr Source # isJumpishInstr :: InstrSR instr -> Bool Source # jumpDestsOfInstr :: InstrSR instr -> [BlockId] Source # patchJumpInstr :: InstrSR instr -> (BlockId -> BlockId) -> InstrSR instr Source # mkSpillInstr :: DynFlags -> Reg -> Int -> Int -> InstrSR instr Source # mkLoadInstr :: DynFlags -> Reg -> Int -> Int -> InstrSR instr Source # takeDeltaInstr :: InstrSR instr -> Maybe Int Source # isMetaInstr :: InstrSR instr -> Bool Source # mkRegRegMoveInstr :: Platform -> Reg -> Reg -> InstrSR instr Source # takeRegRegMoveInstr :: InstrSR instr -> Maybe (Reg, Reg) Source # mkJumpInstr :: BlockId -> [InstrSR instr] Source # mkStackAllocInstr :: Platform -> Int -> InstrSR instr Source # mkStackDeallocInstr :: Platform -> Int -> InstrSR instr Source #