ghc-lib-parser-9.10.1.20250103: The GHC API, decoupled from GHC versions

Safe Haskell | Ignore
Language | GHC2021

GHC.Types.CostCentre

Synopsis

- data CostCentre
  - = NormalCC {
    - cc_flavour :: CCFlavour
    - cc_name :: CcName
    - cc_mod :: Module
    - cc_loc :: SrcSpan
    }
  - | AllCafsCC {
    - cc_mod :: Module
    - cc_loc :: SrcSpan
    }
- type CcName = FastString
- data CCFlavour
- mkCafFlavour :: CCFlavour
- mkExprCCFlavour :: CostCentreIndex -> CCFlavour
- mkDeclCCFlavour :: CostCentreIndex -> CCFlavour
- mkHpcCCFlavour :: CostCentreIndex -> CCFlavour
- mkLateCCFlavour :: CostCentreIndex -> CCFlavour
- mkCallerCCFlavour :: CostCentreIndex -> CCFlavour
- pprCostCentre :: IsLine doc => CostCentre -> doc
- data CostCentreStack
- pprCostCentreStack :: IsLine doc => CostCentreStack -> doc
- type CollectedCCs = ([CostCentre], [CostCentreStack])
- emptyCollectedCCs :: CollectedCCs
- collectCC :: CostCentre -> CostCentreStack -> CollectedCCs -> CollectedCCs
- currentCCS :: CostCentreStack
- dontCareCCS :: CostCentreStack
- isCurrentCCS :: CostCentreStack -> Bool
- maybeSingletonCCS :: CostCentreStack -> Maybe CostCentre
- mkUserCC :: FastString -> Module -> SrcSpan -> CCFlavour -> CostCentre
- mkAutoCC :: Id -> Module -> CostCentre
- mkAllCafsCC :: Module -> SrcSpan -> CostCentre
- mkSingletonCCS :: CostCentre -> CostCentreStack
- isCafCCS :: CostCentreStack -> Bool
- isCafCC :: CostCentre -> Bool
- isSccCountCC :: CostCentre -> Bool
- sccAbleCC :: CostCentre -> Bool
- ccFromThisModule :: CostCentre -> Module -> Bool
- pprCostCentreCore :: CostCentre -> SDoc
- costCentreUserName :: CostCentre -> String
- costCentreUserNameFS :: CostCentre -> FastString
- costCentreSrcSpan :: CostCentre -> SrcSpan
- cmpCostCentre :: CostCentre -> CostCentre -> Ordering

# Documentation

data CostCentre #

A Cost Centre is a single `{-# SCC #-}` annotation.

Constructors

NormalCC |

Fields

- cc_flavour :: CCFlavour

  Two cost centres may have the same name and module but different SrcSpans, so we need a way to distinguish them easily and give them different object-code labels. So every CostCentre has an associated flavour that indicates how it was generated, and flavours that allow multiple instances of the same name and module have a deterministic 0-based index.

- cc_name :: CcName

  Name of the cost centre itself

- cc_mod :: Module

  Name of module defining this CC.

- cc_loc :: SrcSpan

AllCafsCC |

Fields

- cc_mod :: Module

  Name of module defining this CC.

- cc_loc :: SrcSpan

#### Instances

Instances details

Data CostCentre # |

Instance details

Defined in GHC.Types.CostCentre

Methods

gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> CostCentre -> c CostCentre #

gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c CostCentre #

toConstr :: CostCentre -> Constr #

dataTypeOf :: CostCentre -> DataType #

dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c CostCentre) #

dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c CostCentre) #

gmapT :: (forall b. Data b => b -> b) -> CostCentre -> CostCentre #

gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> CostCentre -> r #

gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> CostCentre -> r #

gmapQ :: (forall d. Data d => d -> u) -> CostCentre -> [u] #

gmapQi :: Int -> (forall d. Data d => d -> u) -> CostCentre -> u #

gmapM :: Monad m => (forall d. Data d => d -> m d) -> CostCentre -> m CostCentre #

gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> CostCentre -> m CostCentre #

gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> CostCentre -> m CostCentre #

Binary CostCentre # |
Instance details Defined in GHC.Types.CostCentre Methods put_ :: BinHandle -> CostCentre -> IO () # put :: BinHandle -> CostCentre -> IO (Bin CostCentre) # get :: BinHandle -> IO CostCentre #
Outputable CostCentre # |
Instance details Defined in GHC.Types.CostCentre Methods ppr :: CostCentre -> SDoc #
Eq CostCentre # |
Instance details Defined in GHC.Types.CostCentre Methods (==) :: CostCentre -> CostCentre -> Bool # (/=) :: CostCentre -> CostCentre -> Bool #
Ord CostCentre # |
Instance details Defined in GHC.Types.CostCentre Methods compare :: CostCentre -> CostCentre -> Ordering # (<) :: CostCentre -> CostCentre -> Bool # (<=) :: CostCentre -> CostCentre -> Bool # (>) :: CostCentre -> CostCentre -> Bool # (>=) :: CostCentre -> CostCentre -> Bool # max :: CostCentre -> CostCentre -> CostCentre # min :: CostCentre -> CostCentre -> CostCentre #

type CcName = FastString #

data CCFlavour #

The flavour of a cost centre.

Index fields represent 0-based indices giving source-code ordering of centres with the same module, name, and flavour.

#### Instances

Instances details

Data CCFlavour # |

Instance details

Defined in GHC.Types.CostCentre

Methods

gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> CCFlavour -> c CCFlavour #

gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c CCFlavour #

toConstr :: CCFlavour -> Constr #

dataTypeOf :: CCFlavour -> DataType #

dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c CCFlavour) #

dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c CCFlavour) #

gmapT :: (forall b. Data b => b -> b) -> CCFlavour -> CCFlavour #

gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> CCFlavour -> r #

gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> CCFlavour -> r #

gmapQ :: (forall d. Data d => d -> u) -> CCFlavour -> [u] #

gmapQi :: Int -> (forall d. Data d => d -> u) -> CCFlavour -> u #

gmapM :: Monad m => (forall d. Data d => d -> m d) -> CCFlavour -> m CCFlavour #

gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> CCFlavour -> m CCFlavour #

gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> CCFlavour -> m CCFlavour #

Binary CCFlavour # |
Instance details Defined in GHC.Types.CostCentre Methods put_ :: BinHandle -> CCFlavour -> IO () # put :: BinHandle -> CCFlavour -> IO (Bin CCFlavour) # get :: BinHandle -> IO CCFlavour #
Eq CCFlavour # |
Instance details Defined in GHC.Types.CostCentre Methods (==) :: CCFlavour -> CCFlavour -> Bool # (/=) :: CCFlavour -> CCFlavour -> Bool #
Ord CCFlavour # |
Instance details Defined in GHC.Types.CostCentre Methods compare :: CCFlavour -> CCFlavour -> Ordering # (<) :: CCFlavour -> CCFlavour -> Bool # (<=) :: CCFlavour -> CCFlavour -> Bool # (>) :: CCFlavour -> CCFlavour -> Bool # (>=) :: CCFlavour -> CCFlavour -> Bool # max :: CCFlavour -> CCFlavour -> CCFlavour # min :: CCFlavour -> CCFlavour -> CCFlavour #

mkCafFlavour :: CCFlavour #

mkExprCCFlavour :: CostCentreIndex -> CCFlavour #

mkDeclCCFlavour :: CostCentreIndex -> CCFlavour #

mkHpcCCFlavour :: CostCentreIndex -> CCFlavour #

mkLateCCFlavour :: CostCentreIndex -> CCFlavour #

mkCallerCCFlavour :: CostCentreIndex -> CCFlavour #

pprCostCentre :: IsLine doc => CostCentre -> doc #

data CostCentreStack #

A Cost Centre Stack is something that can be attached to a closure. This is either:

- the current cost centre stack (CCCS)
- a pre-defined cost centre stack (there are several pre-defined CCSs, see below).

#### Instances

Instances details

Outputable CostCentreStack # |
Instance details Defined in GHC.Types.CostCentre Methods ppr :: CostCentreStack -> SDoc #
Eq CostCentreStack # |
Instance details Defined in GHC.Types.CostCentre Methods (==) :: CostCentreStack -> CostCentreStack -> Bool # (/=) :: CostCentreStack -> CostCentreStack -> Bool #
Ord CostCentreStack # |

Instance details

Defined in GHC.Types.CostCentre

Methods

compare :: CostCentreStack -> CostCentreStack -> Ordering #

(<) :: CostCentreStack -> CostCentreStack -> Bool #

(<=) :: CostCentreStack -> CostCentreStack -> Bool #

(>) :: CostCentreStack -> CostCentreStack -> Bool #

(>=) :: CostCentreStack -> CostCentreStack -> Bool #

max :: CostCentreStack -> CostCentreStack -> CostCentreStack #

min :: CostCentreStack -> CostCentreStack -> CostCentreStack #

pprCostCentreStack :: IsLine doc => CostCentreStack -> doc #

type CollectedCCs = ([CostCentre], [CostCentreStack]) #

emptyCollectedCCs :: CollectedCCs #

collectCC :: CostCentre -> CostCentreStack -> CollectedCCs -> CollectedCCs #

currentCCS :: CostCentreStack #

dontCareCCS :: CostCentreStack #

isCurrentCCS :: CostCentreStack -> Bool #

maybeSingletonCCS :: CostCentreStack -> Maybe CostCentre #

mkUserCC :: FastString -> Module -> SrcSpan -> CCFlavour -> CostCentre #

mkAutoCC :: Id -> Module -> CostCentre #

mkAllCafsCC :: Module -> SrcSpan -> CostCentre #

mkSingletonCCS :: CostCentre -> CostCentreStack #

isCafCCS :: CostCentreStack -> Bool #

isCafCC :: CostCentre -> Bool #

isSccCountCC :: CostCentre -> Bool #

Is this a cost-centre which records scc counts

sccAbleCC :: CostCentre -> Bool #

Is this a cost-centre which can be sccd ?

ccFromThisModule :: CostCentre -> Module -> Bool #

pprCostCentreCore :: CostCentre -> SDoc #

Print a flavour in Core

costCentreUserName :: CostCentre -> String #

costCentreUserNameFS :: CostCentre -> FastString #

costCentreSrcSpan :: CostCentre -> SrcSpan #

cmpCostCentre :: CostCentre -> CostCentre -> Ordering #