packages feed

ghc-lib 8.8.2.20210620 → 8.8.3.20200224

raw patch · 162 files changed

+859/−893 lines, 162 filesdep −rtsdep ~basedep ~ghc-lib-parserdep ~ghc-primPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependencies removed: rts

Dependency ranges changed: base, ghc-lib-parser, ghc-prim

API changes (from Hackage documentation)

- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.Context (SrcLoc.Located (HsExtension.IdP a))), HieAst.HasType (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HsExpr.MatchGroup a (HsExpr.LHsExpr a)), HieAst.ToHie (HsExpr.LGRHS a (HsExpr.LHsExpr a)), HieAst.ToHie (HieAst.RContext (HsExpr.HsRecordBinds a)), HieAst.ToHie (HieAst.RFContext (SrcLoc.Located (HsTypes.AmbiguousFieldOcc a))), HieAst.ToHie (HsExpr.ArithSeqInfo a), HieAst.ToHie (HsExpr.LHsCmdTop a), HieAst.ToHie (HieAst.RScoped (HsExpr.GuardLStmt a)), HieAst.ToHie (HieAst.RScoped (HsBinds.LHsLocalBinds a)), HieAst.ToHie (HieAst.TScoped (HsTypes.LHsWcType (HsExtension.NoGhcTc a))), HieAst.ToHie (HieAst.TScoped (HsTypes.LHsSigWcType (HsExtension.NoGhcTc a))), Data.Data.Data (HsExpr.HsExpr a), Data.Data.Data (HsExpr.HsSplice a), Data.Data.Data (HsExpr.HsTupArg a), Data.Data.Data (HsTypes.AmbiguousFieldOcc a)) => HieAst.ToHie (HsExpr.LHsExpr (HsExtension.GhcPass p))
- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.Context (SrcLoc.Located (HsExtension.IdP a))), HieAst.ToHie (HieAst.RContext (HsPat.HsRecFields a (HieAst.PScoped (HsPat.LPat a)))), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.TScoped (HsTypes.LHsSigWcType a)), HieAst.ProtectSig a, HieAst.ToHie (HieAst.TScoped (HieAst.ProtectedSig a)), HieAst.HasType (HsPat.LPat a), Data.Data.Data (HsExpr.HsSplice a)) => HieAst.ToHie (HieAst.PScoped (HsPat.LPat (HsExtension.GhcPass p)))
- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HieAst.BindContext (HsBinds.LHsBind a)), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.SigContext (HsBinds.LSig a)), HieAst.ToHie (HieAst.RScoped (HsBinds.HsValBindsLR a a)), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsExpr a))), Data.Data.Data (HsBinds.HsLocalBinds a)) => HieAst.ToHie (HieAst.RScoped (HsExpr.ApplicativeArg (HsExtension.GhcPass p)))
- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HieAst.BindContext (HsBinds.LHsBind a)), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HsExpr.MatchGroup a (HsExpr.LHsCmd a)), HieAst.ToHie (HieAst.SigContext (HsBinds.LSig a)), HieAst.ToHie (HieAst.RScoped (HsBinds.HsValBindsLR a a)), Data.Data.Data (HsExpr.HsCmd a), Data.Data.Data (HsExpr.HsCmdTop a), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsCmd a))), Data.Data.Data (HsBinds.HsLocalBinds a), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsExpr a)))) => HieAst.ToHie (HsExpr.LHsCmd (HsExtension.GhcPass p))
- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.SigContext (HsBinds.LSig a)), HieAst.ToHie (HieAst.RScoped (HsBinds.LHsLocalBinds a)), HieAst.ToHie (HieAst.RScoped (HsExpr.ApplicativeArg a)), HieAst.ToHie (SrcLoc.Located body), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located body)), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsExpr a)))) => HieAst.ToHie (HieAst.RScoped (HsExpr.LStmt (HsExtension.GhcPass p) (SrcLoc.Located body)))
- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie (HsExpr.LHsExpr a), Data.Data.Data (HsExpr.HsTupArg a)) => HieAst.ToHie (HsExpr.LHsTupArg (HsExtension.GhcPass p))
- HieAst: instance (a GHC.Types.~ HsExtension.GhcPass p, HieAst.ToHie body, HieAst.ToHie (HsExpr.HsMatchContext (PlaceHolder.NameOrRdrName (HsExtension.IdP a))), HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HsExpr.GRHSs a body), Data.Data.Data (HsExpr.Match a body)) => HieAst.ToHie (HsExpr.LMatch (HsExtension.GhcPass p) body)
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.Context (SrcLoc.Located (HsExtension.IdP a))), HieAst.HasType (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HsExpr.MatchGroup a (HsExpr.LHsExpr a)), HieAst.ToHie (HsExpr.LGRHS a (HsExpr.LHsExpr a)), HieAst.ToHie (HieAst.RContext (HsExpr.HsRecordBinds a)), HieAst.ToHie (HieAst.RFContext (SrcLoc.Located (HsTypes.AmbiguousFieldOcc a))), HieAst.ToHie (HsExpr.ArithSeqInfo a), HieAst.ToHie (HsExpr.LHsCmdTop a), HieAst.ToHie (HieAst.RScoped (HsExpr.GuardLStmt a)), HieAst.ToHie (HieAst.RScoped (HsBinds.LHsLocalBinds a)), HieAst.ToHie (HieAst.TScoped (HsTypes.LHsWcType (HsExtension.NoGhcTc a))), HieAst.ToHie (HieAst.TScoped (HsTypes.LHsSigWcType (HsExtension.NoGhcTc a))), Data.Data.Data (HsExpr.HsExpr a), Data.Data.Data (HsExpr.HsSplice a), Data.Data.Data (HsExpr.HsTupArg a), Data.Data.Data (HsTypes.AmbiguousFieldOcc a)) => HieAst.ToHie (HsExpr.LHsExpr (HsExtension.GhcPass p))
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.Context (SrcLoc.Located (HsExtension.IdP a))), HieAst.ToHie (HieAst.RContext (HsPat.HsRecFields a (HieAst.PScoped (HsPat.LPat a)))), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.TScoped (HsTypes.LHsSigWcType a)), HieAst.ProtectSig a, HieAst.ToHie (HieAst.TScoped (HieAst.ProtectedSig a)), HieAst.HasType (HsPat.LPat a), Data.Data.Data (HsExpr.HsSplice a)) => HieAst.ToHie (HieAst.PScoped (HsPat.LPat (HsExtension.GhcPass p)))
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HieAst.BindContext (HsBinds.LHsBind a)), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.SigContext (HsBinds.LSig a)), HieAst.ToHie (HieAst.RScoped (HsBinds.HsValBindsLR a a)), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsExpr a))), Data.Data.Data (HsBinds.HsLocalBinds a)) => HieAst.ToHie (HieAst.RScoped (HsExpr.ApplicativeArg (HsExtension.GhcPass p)))
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HieAst.BindContext (HsBinds.LHsBind a)), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HsExpr.MatchGroup a (HsExpr.LHsCmd a)), HieAst.ToHie (HieAst.SigContext (HsBinds.LSig a)), HieAst.ToHie (HieAst.RScoped (HsBinds.HsValBindsLR a a)), Data.Data.Data (HsExpr.HsCmd a), Data.Data.Data (HsExpr.HsCmdTop a), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsCmd a))), Data.Data.Data (HsBinds.HsLocalBinds a), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsExpr a)))) => HieAst.ToHie (HsExpr.LHsCmd (HsExtension.GhcPass p))
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HsExpr.LHsExpr a), HieAst.ToHie (HieAst.SigContext (HsBinds.LSig a)), HieAst.ToHie (HieAst.RScoped (HsBinds.LHsLocalBinds a)), HieAst.ToHie (HieAst.RScoped (HsExpr.ApplicativeArg a)), HieAst.ToHie (SrcLoc.Located body), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located body)), Data.Data.Data (HsExpr.StmtLR a a (SrcLoc.Located (HsExpr.HsExpr a)))) => HieAst.ToHie (HieAst.RScoped (HsExpr.LStmt (HsExtension.GhcPass p) (SrcLoc.Located body)))
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie (HsExpr.LHsExpr a), Data.Data.Data (HsExpr.HsTupArg a)) => HieAst.ToHie (HsExpr.LHsTupArg (HsExtension.GhcPass p))
+ HieAst: instance (a Data.Type.Equality.~ HsExtension.GhcPass p, HieAst.ToHie body, HieAst.ToHie (HsExpr.HsMatchContext (PlaceHolder.NameOrRdrName (HsExtension.IdP a))), HieAst.ToHie (HieAst.PScoped (HsPat.LPat a)), HieAst.ToHie (HsExpr.GRHSs a body), Data.Data.Data (HsExpr.Match a body)) => HieAst.ToHie (HsExpr.LMatch (HsExtension.GhcPass p) body)
- ByteCodeAsm: sizeSS :: SizedSeq a -> Word
+ ByteCodeAsm: sizeSS :: () => SizedSeq a -> Word
- ByteCodeAsm: ssElts :: SizedSeq a -> [a]
+ ByteCodeAsm: ssElts :: () => SizedSeq a -> [a]
- GHC: getRealSrcSpan :: RealLocated a -> RealSrcSpan
+ GHC: getRealSrcSpan :: () => RealLocated a -> RealSrcSpan
- GHC: nameModule :: HasDebugCallStack => Name -> Module
+ GHC: nameModule :: HasDebugCallStack -> Name -> Module
- GHC: type family SrcSpanLess a
+ GHC: type family SrcSpanLess a :: Type
- GHC: unRealSrcSpan :: RealLocated a -> a
+ GHC: unRealSrcSpan :: () => RealLocated a -> a
- GHCi: [AbandonStmt] :: RemoteRef (ResumeContext [HValueRef]) -> Message ()
+ GHCi: [AbandonStmt] :: forall a. () => RemoteRef (ResumeContext [HValueRef]) -> Message ()
- GHCi: [AddLibrarySearchPath] :: String -> Message (RemotePtr ())
+ GHCi: [AddLibrarySearchPath] :: forall a. () => String -> Message (RemotePtr ())
- GHCi: [AddSptEntry] :: Fingerprint -> HValueRef -> Message ()
+ GHCi: [AddSptEntry] :: forall a. () => Fingerprint -> HValueRef -> Message ()
- GHCi: [BreakpointStatus] :: RemoteRef BreakArray -> Int -> Message Bool
+ GHCi: [BreakpointStatus] :: forall a. () => RemoteRef BreakArray -> Int -> Message Bool
- GHCi: [CostCentreStackInfo] :: RemotePtr CostCentreStack -> Message [String]
+ GHCi: [CostCentreStackInfo] :: forall a. () => RemotePtr CostCentreStack -> Message [String]
- GHCi: [CreateBCOs] :: [ByteString] -> Message [HValueRef]
+ GHCi: [CreateBCOs] :: forall a. () => [ByteString] -> Message [HValueRef]
- GHCi: [EnableBreakpoint] :: RemoteRef BreakArray -> Int -> Bool -> Message ()
+ GHCi: [EnableBreakpoint] :: forall a. () => RemoteRef BreakArray -> Int -> Bool -> Message ()
- GHCi: [EvalIO] :: HValueRef -> Message (EvalResult ())
+ GHCi: [EvalIO] :: forall a. () => HValueRef -> Message (EvalResult ())
- GHCi: [EvalStmt] :: EvalOpts -> EvalExpr HValueRef -> Message (EvalStatus_ [HValueRef] [HValueRef])
+ GHCi: [EvalStmt] :: forall a. () => EvalOpts -> EvalExpr HValueRef -> Message (EvalStatus_ [HValueRef] [HValueRef])
- GHCi: [EvalStringToString] :: HValueRef -> String -> Message (EvalResult String)
+ GHCi: [EvalStringToString] :: forall a. () => HValueRef -> String -> Message (EvalResult String)
- GHCi: [EvalString] :: HValueRef -> Message (EvalResult String)
+ GHCi: [EvalString] :: forall a. () => HValueRef -> Message (EvalResult String)
- GHCi: [FindSystemLibrary] :: String -> Message (Maybe String)
+ GHCi: [FindSystemLibrary] :: forall a. () => String -> Message (Maybe String)
- GHCi: [FreeFFI] :: RemotePtr C_ffi_cif -> Message ()
+ GHCi: [FreeFFI] :: forall a. () => RemotePtr C_ffi_cif -> Message ()
- GHCi: [FreeHValueRefs] :: [HValueRef] -> Message ()
+ GHCi: [FreeHValueRefs] :: forall a. () => [HValueRef] -> Message ()
- GHCi: [GetBreakpointVar] :: HValueRef -> Int -> Message (Maybe HValueRef)
+ GHCi: [GetBreakpointVar] :: forall a. () => HValueRef -> Int -> Message (Maybe HValueRef)
- GHCi: [GetClosure] :: HValueRef -> Message (GenClosure HValueRef)
+ GHCi: [GetClosure] :: forall a. () => HValueRef -> Message (GenClosure HValueRef)
- GHCi: [InitLinker] :: Message ()
+ GHCi: [InitLinker] :: forall a. () => Message ()
- GHCi: [LoadArchive] :: String -> Message ()
+ GHCi: [LoadArchive] :: forall a. () => String -> Message ()
- GHCi: [LoadDLL] :: String -> Message (Maybe String)
+ GHCi: [LoadDLL] :: forall a. () => String -> Message (Maybe String)
- GHCi: [LoadObj] :: String -> Message ()
+ GHCi: [LoadObj] :: forall a. () => String -> Message ()
- GHCi: [LookupClosure] :: String -> Message (Maybe HValueRef)
+ GHCi: [LookupClosure] :: forall a. () => String -> Message (Maybe HValueRef)
- GHCi: [LookupSymbol] :: String -> Message (Maybe (RemotePtr ()))
+ GHCi: [LookupSymbol] :: forall a. () => String -> Message (Maybe (RemotePtr ()))
- GHCi: [MallocData] :: ByteString -> Message (RemotePtr ())
+ GHCi: [MallocData] :: forall a. () => ByteString -> Message (RemotePtr ())
- GHCi: [MallocStrings] :: [ByteString] -> Message [RemotePtr ()]
+ GHCi: [MallocStrings] :: forall a. () => [ByteString] -> Message [RemotePtr ()]
- GHCi: [MkConInfoTable] :: Int -> Int -> Int -> Int -> [Word8] -> Message (RemotePtr StgInfoTable)
+ GHCi: [MkConInfoTable] :: forall a. () => Int -> Int -> Int -> Int -> [Word8] -> Message (RemotePtr StgInfoTable)
- GHCi: [MkCostCentres] :: String -> [(String, String)] -> Message [RemotePtr CostCentre]
+ GHCi: [MkCostCentres] :: forall a. () => String -> [(String, String)] -> Message [RemotePtr CostCentre]
- GHCi: [NewBreakArray] :: Int -> Message (RemoteRef BreakArray)
+ GHCi: [NewBreakArray] :: forall a. () => Int -> Message (RemoteRef BreakArray)
- GHCi: [PrepFFI] :: FFIConv -> [FFIType] -> FFIType -> Message (RemotePtr C_ffi_cif)
+ GHCi: [PrepFFI] :: forall a. () => FFIConv -> [FFIType] -> FFIType -> Message (RemotePtr C_ffi_cif)
- GHCi: [RemoveLibrarySearchPath] :: RemotePtr () -> Message Bool
+ GHCi: [RemoveLibrarySearchPath] :: forall a. () => RemotePtr () -> Message Bool
- GHCi: [ResolveObjs] :: Message Bool
+ GHCi: [ResolveObjs] :: forall a. () => Message Bool
- GHCi: [ResumeStmt] :: EvalOpts -> RemoteRef (ResumeContext [HValueRef]) -> Message (EvalStatus_ [HValueRef] [HValueRef])
+ GHCi: [ResumeStmt] :: forall a. () => EvalOpts -> RemoteRef (ResumeContext [HValueRef]) -> Message (EvalStatus_ [HValueRef] [HValueRef])
- GHCi: [RunModFinalizers] :: RemoteRef (IORef QState) -> [RemoteRef (Q ())] -> Message (QResult ())
+ GHCi: [RunModFinalizers] :: forall a. () => RemoteRef (IORef QState) -> [RemoteRef (Q ())] -> Message (QResult ())
- GHCi: [RunTH] :: RemoteRef (IORef QState) -> HValueRef -> THResultType -> Maybe Loc -> Message (QResult ByteString)
+ GHCi: [RunTH] :: forall a. () => RemoteRef (IORef QState) -> HValueRef -> THResultType -> Maybe Loc -> Message (QResult ByteString)
- GHCi: [Seq] :: HValueRef -> Message (EvalResult ())
+ GHCi: [Seq] :: forall a. () => HValueRef -> Message (EvalResult ())
- GHCi: [Shutdown] :: Message ()
+ GHCi: [Shutdown] :: forall a. () => Message ()
- GHCi: [StartTH] :: Message (RemoteRef (IORef QState))
+ GHCi: [StartTH] :: forall a. () => Message (RemoteRef (IORef QState))
- GHCi: [UnloadObj] :: String -> Message ()
+ GHCi: [UnloadObj] :: forall a. () => String -> Message ()
- GhcPlugins: TyCoMapper :: Bool -> (env -> TyVar -> m Type) -> (env -> CoVar -> m Coercion) -> (env -> CoercionHole -> m Coercion) -> (env -> TyCoVar -> ArgFlag -> m (env, TyCoVar)) -> (TyCon -> m TyCon) -> TyCoMapper env (m :: Type -> Type)
+ GhcPlugins: TyCoMapper :: Bool -> (env -> TyVar -> m Type) -> (env -> CoVar -> m Coercion) -> (env -> CoercionHole -> m Coercion) -> (env -> TyCoVar -> ArgFlag -> m (env, TyCoVar)) -> (TyCon -> m TyCon) -> TyCoMapper env
- GhcPlugins: [tcm_covar] :: TyCoMapper env (m :: Type -> Type) -> env -> CoVar -> m Coercion
+ GhcPlugins: [tcm_covar] :: TyCoMapper env -> env -> CoVar -> m Coercion
- GhcPlugins: [tcm_hole] :: TyCoMapper env (m :: Type -> Type) -> env -> CoercionHole -> m Coercion
+ GhcPlugins: [tcm_hole] :: TyCoMapper env -> env -> CoercionHole -> m Coercion
- GhcPlugins: [tcm_smart] :: TyCoMapper env (m :: Type -> Type) -> Bool
+ GhcPlugins: [tcm_smart] :: TyCoMapper env -> Bool
- GhcPlugins: [tcm_tycobinder] :: TyCoMapper env (m :: Type -> Type) -> env -> TyCoVar -> ArgFlag -> m (env, TyCoVar)
+ GhcPlugins: [tcm_tycobinder] :: TyCoMapper env -> env -> TyCoVar -> ArgFlag -> m (env, TyCoVar)
- GhcPlugins: [tcm_tycon] :: TyCoMapper env (m :: Type -> Type) -> TyCon -> m TyCon
+ GhcPlugins: [tcm_tycon] :: TyCoMapper env -> TyCon -> m TyCon
- GhcPlugins: [tcm_tyvar] :: TyCoMapper env (m :: Type -> Type) -> env -> TyVar -> m Type
+ GhcPlugins: [tcm_tyvar] :: TyCoMapper env -> env -> TyVar -> m Type
- GhcPlugins: alterOccEnv :: (Maybe elt -> Maybe elt) -> OccEnv elt -> OccName -> OccEnv elt
+ GhcPlugins: alterOccEnv :: () => (Maybe elt -> Maybe elt) -> OccEnv elt -> OccName -> OccEnv elt
- GhcPlugins: binderArgFlag :: VarBndr tv argf -> argf
+ GhcPlugins: binderArgFlag :: () => VarBndr tv argf -> argf
- GhcPlugins: binderType :: VarBndr TyCoVar argf -> Type
+ GhcPlugins: binderType :: () => VarBndr TyCoVar argf -> Type
- GhcPlugins: binderVar :: VarBndr tv argf -> tv
+ GhcPlugins: binderVar :: () => VarBndr tv argf -> tv
- GhcPlugins: binderVars :: [VarBndr tv argf] -> [tv]
+ GhcPlugins: binderVars :: () => [VarBndr tv argf] -> [tv]
- GhcPlugins: caseBinder :: TyCoBinder -> (TyCoVarBinder -> a) -> (Type -> a) -> a
+ GhcPlugins: caseBinder :: () => TyCoBinder -> (TyCoVarBinder -> a) -> (Type -> a) -> a
- GhcPlugins: coAxNthLHS :: forall (br :: BranchFlag). CoAxiom br -> Int -> Type
+ GhcPlugins: coAxNthLHS :: () => CoAxiom br -> Int -> Type
- GhcPlugins: coVarKindsTypesRole :: HasDebugCallStack => CoVar -> (Kind, Kind, Type, Type, Role)
+ GhcPlugins: coVarKindsTypesRole :: HasDebugCallStack -> CoVar -> (Kind, Kind, Type, Type, Role)
- GhcPlugins: coVarTypes :: HasDebugCallStack => CoVar -> Pair Type
+ GhcPlugins: coVarTypes :: HasDebugCallStack -> CoVar -> Pair Type
- GhcPlugins: composeSteppers :: NormaliseStepper ev -> NormaliseStepper ev -> NormaliseStepper ev
+ GhcPlugins: composeSteppers :: () => NormaliseStepper ev -> NormaliseStepper ev -> NormaliseStepper ev
- GhcPlugins: decomposeFunCo :: HasDebugCallStack => Role -> Coercion -> (Coercion, Coercion)
+ GhcPlugins: decomposeFunCo :: HasDebugCallStack -> Role -> Coercion -> (Coercion, Coercion)
- GhcPlugins: decomposePiCos :: HasDebugCallStack => CoercionN -> Pair Type -> [Type] -> ([CoercionN], CoercionN)
+ GhcPlugins: decomposePiCos :: HasDebugCallStack -> CoercionN -> Pair Type -> [Type] -> ([CoercionN], CoercionN)
- GhcPlugins: delFromOccEnv :: OccEnv a -> OccName -> OccEnv a
+ GhcPlugins: delFromOccEnv :: () => OccEnv a -> OccName -> OccEnv a
- GhcPlugins: delListFromOccEnv :: OccEnv a -> [OccName] -> OccEnv a
+ GhcPlugins: delListFromOccEnv :: () => OccEnv a -> [OccName] -> OccEnv a
- GhcPlugins: elemOccEnv :: OccName -> OccEnv a -> Bool
+ GhcPlugins: elemOccEnv :: () => OccName -> OccEnv a -> Bool
- GhcPlugins: emptyFsEnv :: FastStringEnv a
+ GhcPlugins: emptyFsEnv :: () => FastStringEnv a
- GhcPlugins: emptyOccEnv :: OccEnv a
+ GhcPlugins: emptyOccEnv :: () => OccEnv a
- GhcPlugins: extendFsEnv :: FastStringEnv a -> FastString -> a -> FastStringEnv a
+ GhcPlugins: extendFsEnv :: () => FastStringEnv a -> FastString -> a -> FastStringEnv a
- GhcPlugins: extendOccEnv :: OccEnv a -> OccName -> a -> OccEnv a
+ GhcPlugins: extendOccEnv :: () => OccEnv a -> OccName -> a -> OccEnv a
- GhcPlugins: extendOccEnvList :: OccEnv a -> [(OccName, a)] -> OccEnv a
+ GhcPlugins: extendOccEnvList :: () => OccEnv a -> [(OccName, a)] -> OccEnv a
- GhcPlugins: extendOccEnv_Acc :: (a -> b -> b) -> (a -> b) -> OccEnv b -> OccName -> a -> OccEnv b
+ GhcPlugins: extendOccEnv_Acc :: () => (a -> b -> b) -> (a -> b) -> OccEnv b -> OccName -> a -> OccEnv b
- GhcPlugins: extendOccEnv_C :: (a -> a -> a) -> OccEnv a -> OccName -> a -> OccEnv a
+ GhcPlugins: extendOccEnv_C :: () => (a -> a -> a) -> OccEnv a -> OccName -> a -> OccEnv a
- GhcPlugins: filterOccEnv :: (elt -> Bool) -> OccEnv elt -> OccEnv elt
+ GhcPlugins: filterOccEnv :: () => (elt -> Bool) -> OccEnv elt -> OccEnv elt
- GhcPlugins: foldOccEnv :: (a -> b -> b) -> b -> OccEnv a -> b
+ GhcPlugins: foldOccEnv :: () => (a -> b -> b) -> b -> OccEnv a -> b
- GhcPlugins: getClassPredTys :: HasDebugCallStack => PredType -> (Class, [Type])
+ GhcPlugins: getClassPredTys :: HasDebugCallStack -> PredType -> (Class, [Type])
- GhcPlugins: getRuntimeRep :: HasDebugCallStack => Type -> Type
+ GhcPlugins: getRuntimeRep :: HasDebugCallStack -> Type -> Type
- GhcPlugins: getRuntimeRep_maybe :: HasDebugCallStack => Type -> Maybe Type
+ GhcPlugins: getRuntimeRep_maybe :: HasDebugCallStack -> Type -> Maybe Type
- GhcPlugins: idInfo :: HasDebugCallStack => Id -> IdInfo
+ GhcPlugins: idInfo :: HasDebugCallStack -> Id -> IdInfo
- GhcPlugins: isLiftedType_maybe :: HasDebugCallStack => Type -> Maybe Bool
+ GhcPlugins: isLiftedType_maybe :: HasDebugCallStack -> Type -> Maybe Bool
- GhcPlugins: isStrictType :: HasDebugCallStack => Type -> Bool
+ GhcPlugins: isStrictType :: HasDebugCallStack -> Type -> Bool
- GhcPlugins: isUnliftedType :: HasDebugCallStack => Type -> Bool
+ GhcPlugins: isUnliftedType :: HasDebugCallStack -> Type -> Bool
- GhcPlugins: kindRep :: HasDebugCallStack => Kind -> Type
+ GhcPlugins: kindRep :: HasDebugCallStack -> Kind -> Type
- GhcPlugins: kindRep_maybe :: HasDebugCallStack => Kind -> Maybe Type
+ GhcPlugins: kindRep_maybe :: HasDebugCallStack -> Kind -> Maybe Type
- GhcPlugins: liftCoSubst :: HasDebugCallStack => Role -> LiftingContext -> Type -> Coercion
+ GhcPlugins: liftCoSubst :: HasDebugCallStack -> Role -> LiftingContext -> Type -> Coercion
- GhcPlugins: liftCoSubstVarBndrUsing :: (LiftingContext -> Type -> (CoercionN, a)) -> LiftingContext -> TyCoVar -> (LiftingContext, TyCoVar, CoercionN, a)
+ GhcPlugins: liftCoSubstVarBndrUsing :: () => (LiftingContext -> Type -> (CoercionN, a)) -> LiftingContext -> TyCoVar -> (LiftingContext, TyCoVar, CoercionN, a)
- GhcPlugins: lookupFsEnv :: FastStringEnv a -> FastString -> Maybe a
+ GhcPlugins: lookupFsEnv :: () => FastStringEnv a -> FastString -> Maybe a
- GhcPlugins: lookupOccEnv :: OccEnv a -> OccName -> Maybe a
+ GhcPlugins: lookupOccEnv :: () => OccEnv a -> OccName -> Maybe a
- GhcPlugins: mapOccEnv :: (a -> b) -> OccEnv a -> OccEnv b
+ GhcPlugins: mapOccEnv :: () => (a -> b) -> OccEnv a -> OccEnv b
- GhcPlugins: mapStepResult :: (ev1 -> ev2) -> NormaliseStepResult ev1 -> NormaliseStepResult ev2
+ GhcPlugins: mapStepResult :: () => (ev1 -> ev2) -> NormaliseStepResult ev1 -> NormaliseStepResult ev2
- GhcPlugins: mkAxInstCo :: forall (br :: BranchFlag). Role -> CoAxiom br -> BranchIndex -> [Type] -> [Coercion] -> Coercion
+ GhcPlugins: mkAxInstCo :: () => Role -> CoAxiom br -> BranchIndex -> [Type] -> [Coercion] -> Coercion
- GhcPlugins: mkAxInstLHS :: forall (br :: BranchFlag). CoAxiom br -> BranchIndex -> [Type] -> [Coercion] -> Type
+ GhcPlugins: mkAxInstLHS :: () => CoAxiom br -> BranchIndex -> [Type] -> [Coercion] -> Type
- GhcPlugins: mkAxInstRHS :: forall (br :: BranchFlag). CoAxiom br -> BranchIndex -> [Type] -> [Coercion] -> Type
+ GhcPlugins: mkAxInstRHS :: () => CoAxiom br -> BranchIndex -> [Type] -> [Coercion] -> Type
- GhcPlugins: mkFsEnv :: [(FastString, a)] -> FastStringEnv a
+ GhcPlugins: mkFsEnv :: () => [(FastString, a)] -> FastStringEnv a
- GhcPlugins: mkNthCo :: HasDebugCallStack => Role -> Int -> Coercion -> Coercion
+ GhcPlugins: mkNthCo :: HasDebugCallStack -> Role -> Int -> Coercion -> Coercion
- GhcPlugins: mkOccEnv :: [(OccName, a)] -> OccEnv a
+ GhcPlugins: mkOccEnv :: () => [(OccName, a)] -> OccEnv a
- GhcPlugins: mkOccEnv_C :: (a -> a -> a) -> [(OccName, a)] -> OccEnv a
+ GhcPlugins: mkOccEnv_C :: () => (a -> a -> a) -> [(OccName, a)] -> OccEnv a
- GhcPlugins: mkTyConAppCo :: HasDebugCallStack => Role -> TyCon -> [Coercion] -> Coercion
+ GhcPlugins: mkTyConAppCo :: HasDebugCallStack -> Role -> TyCon -> [Coercion] -> Coercion
- GhcPlugins: modifyIdInfo :: HasDebugCallStack => (IdInfo -> IdInfo) -> Id -> Id
+ GhcPlugins: modifyIdInfo :: HasDebugCallStack -> (IdInfo -> IdInfo) -> Id -> Id
- GhcPlugins: nameModule :: HasDebugCallStack => Name -> Module
+ GhcPlugins: nameModule :: HasDebugCallStack -> Name -> Module
- GhcPlugins: occEnvElts :: OccEnv a -> [a]
+ GhcPlugins: occEnvElts :: () => OccEnv a -> [a]
- GhcPlugins: partitionInvisibles :: [(a, ArgFlag)] -> ([a], [a])
+ GhcPlugins: partitionInvisibles :: () => [(a, ArgFlag)] -> ([a], [a])
- GhcPlugins: piResultTy :: HasDebugCallStack => Type -> Type -> Type
+ GhcPlugins: piResultTy :: HasDebugCallStack -> Type -> Type -> Type
- GhcPlugins: piResultTys :: HasDebugCallStack => Type -> [Type] -> Type
+ GhcPlugins: piResultTys :: HasDebugCallStack -> Type -> [Type] -> Type
- GhcPlugins: pickLR :: LeftOrRight -> (a, a) -> a
+ GhcPlugins: pickLR :: () => LeftOrRight -> (a, a) -> a
- GhcPlugins: plusOccEnv :: OccEnv a -> OccEnv a -> OccEnv a
+ GhcPlugins: plusOccEnv :: () => OccEnv a -> OccEnv a -> OccEnv a
- GhcPlugins: plusOccEnv_C :: (a -> a -> a) -> OccEnv a -> OccEnv a -> OccEnv a
+ GhcPlugins: plusOccEnv_C :: () => (a -> a -> a) -> OccEnv a -> OccEnv a -> OccEnv a
- GhcPlugins: pprAlternative :: (a -> SDoc) -> a -> ConTag -> Arity -> SDoc
+ GhcPlugins: pprAlternative :: () => (a -> SDoc) -> a -> ConTag -> Arity -> SDoc
- GhcPlugins: pprCoAxiom :: forall (br :: BranchFlag). CoAxiom br -> SDoc
+ GhcPlugins: pprCoAxiom :: () => CoAxiom br -> SDoc
- GhcPlugins: pprOccEnv :: (a -> SDoc) -> OccEnv a -> SDoc
+ GhcPlugins: pprOccEnv :: () => (a -> SDoc) -> OccEnv a -> SDoc
- GhcPlugins: repSplitAppTy_maybe :: HasDebugCallStack => Type -> Maybe (Type, Type)
+ GhcPlugins: repSplitAppTy_maybe :: HasDebugCallStack -> Type -> Maybe (Type, Type)
- GhcPlugins: repSplitAppTys :: HasDebugCallStack => Type -> (Type, [Type])
+ GhcPlugins: repSplitAppTys :: HasDebugCallStack -> Type -> (Type, [Type])
- GhcPlugins: repSplitTyConApp_maybe :: HasDebugCallStack => Type -> Maybe (TyCon, [Type])
+ GhcPlugins: repSplitTyConApp_maybe :: HasDebugCallStack -> Type -> Maybe (TyCon, [Type])
- GhcPlugins: splitTyConApp_maybe :: HasDebugCallStack => Type -> Maybe (TyCon, [Type])
+ GhcPlugins: splitTyConApp_maybe :: HasDebugCallStack -> Type -> Maybe (TyCon, [Type])
- GhcPlugins: substCoVarBndr :: HasCallStack => TCvSubst -> CoVar -> (TCvSubst, CoVar)
+ GhcPlugins: substCoVarBndr :: HasCallStack -> TCvSubst -> CoVar -> (TCvSubst, CoVar)
- GhcPlugins: substCoWith :: HasCallStack => [TyVar] -> [Type] -> Coercion -> Coercion
+ GhcPlugins: substCoWith :: HasCallStack -> [TyVar] -> [Type] -> Coercion -> Coercion
- GhcPlugins: substCos :: HasCallStack => TCvSubst -> [Coercion] -> [Coercion]
+ GhcPlugins: substCos :: HasCallStack -> TCvSubst -> [Coercion] -> [Coercion]
- GhcPlugins: substTheta :: HasCallStack => TCvSubst -> ThetaType -> ThetaType
+ GhcPlugins: substTheta :: HasCallStack -> TCvSubst -> ThetaType -> ThetaType
- GhcPlugins: substTyVarBndr :: HasCallStack => TCvSubst -> TyVar -> (TCvSubst, TyVar)
+ GhcPlugins: substTyVarBndr :: HasCallStack -> TCvSubst -> TyVar -> (TCvSubst, TyVar)
- GhcPlugins: substTyVarBndrs :: HasCallStack => TCvSubst -> [TyVar] -> (TCvSubst, [TyVar])
+ GhcPlugins: substTyVarBndrs :: HasCallStack -> TCvSubst -> [TyVar] -> (TCvSubst, [TyVar])
- GhcPlugins: substTyWith :: HasCallStack => [TyVar] -> [Type] -> Type -> Type
+ GhcPlugins: substTyWith :: HasCallStack -> [TyVar] -> [Type] -> Type -> Type
- GhcPlugins: substTys :: HasCallStack => TCvSubst -> [Type] -> [Type]
+ GhcPlugins: substTys :: HasCallStack -> TCvSubst -> [Type] -> [Type]
- GhcPlugins: substVarBndr :: HasCallStack => TCvSubst -> TyCoVar -> (TCvSubst, TyCoVar)
+ GhcPlugins: substVarBndr :: HasCallStack -> TCvSubst -> TyCoVar -> (TCvSubst, TyCoVar)
- GhcPlugins: substVarBndrs :: HasCallStack => TCvSubst -> [TyCoVar] -> (TCvSubst, [TyCoVar])
+ GhcPlugins: substVarBndrs :: HasCallStack -> TCvSubst -> [TyCoVar] -> (TCvSubst, [TyCoVar])
- GhcPlugins: tcRepSplitTyConApp :: HasCallStack => Type -> (TyCon, [Type])
+ GhcPlugins: tcRepSplitTyConApp :: HasCallStack -> Type -> (TyCon, [Type])
- GhcPlugins: tcRepSplitTyConApp_maybe :: HasCallStack => Type -> Maybe (TyCon, [Type])
+ GhcPlugins: tcRepSplitTyConApp_maybe :: HasCallStack -> Type -> Maybe (TyCon, [Type])
- GhcPlugins: tcSplitTyConApp_maybe :: HasCallStack => Type -> Maybe (TyCon, [Type])
+ GhcPlugins: tcSplitTyConApp_maybe :: HasCallStack -> Type -> Maybe (TyCon, [Type])
- GhcPlugins: tcTypeKind :: HasDebugCallStack => Type -> Kind
+ GhcPlugins: tcTypeKind :: HasDebugCallStack -> Type -> Kind
- GhcPlugins: tidyTyCoVarBinder :: TidyEnv -> VarBndr TyCoVar vis -> (TidyEnv, VarBndr TyCoVar vis)
+ GhcPlugins: tidyTyCoVarBinder :: () => TidyEnv -> VarBndr TyCoVar vis -> (TidyEnv, VarBndr TyCoVar vis)
- GhcPlugins: tidyTyCoVarBinders :: TidyEnv -> [VarBndr TyCoVar vis] -> (TidyEnv, [VarBndr TyCoVar vis])
+ GhcPlugins: tidyTyCoVarBinders :: () => TidyEnv -> [VarBndr TyCoVar vis] -> (TidyEnv, [VarBndr TyCoVar vis])
- GhcPlugins: topNormaliseTypeX :: NormaliseStepper ev -> (ev -> ev -> ev) -> Type -> Maybe (ev, Type)
+ GhcPlugins: topNormaliseTypeX :: () => NormaliseStepper ev -> (ev -> ev -> ev) -> Type -> Maybe (ev, Type)
- GhcPlugins: typeKind :: HasDebugCallStack => Type -> Kind
+ GhcPlugins: typeKind :: HasDebugCallStack -> Type -> Kind
- GhcPlugins: unSwap :: SwapFlag -> (a -> a -> b) -> a -> a -> b
+ GhcPlugins: unSwap :: () => SwapFlag -> (a -> a -> b) -> a -> a -> b
- GhcPlugins: unitOccEnv :: OccName -> a -> OccEnv a
+ GhcPlugins: unitOccEnv :: () => OccName -> a -> OccEnv a
- GhcPlugins: zipCoEnv :: HasDebugCallStack => [CoVar] -> [Coercion] -> CvSubstEnv
+ GhcPlugins: zipCoEnv :: HasDebugCallStack -> [CoVar] -> [Coercion] -> CvSubstEnv
- GhcPlugins: zipTCvSubst :: HasDebugCallStack => [TyCoVar] -> [Type] -> TCvSubst
+ GhcPlugins: zipTCvSubst :: HasDebugCallStack -> [TyCoVar] -> [Type] -> TCvSubst
- GhcPlugins: zipTvSubst :: HasDebugCallStack => [TyVar] -> [Type] -> TCvSubst
+ GhcPlugins: zipTvSubst :: HasDebugCallStack -> [TyVar] -> [Type] -> TCvSubst
- GhcPlugins: zipTyEnv :: HasDebugCallStack => [TyVar] -> [Type] -> TvSubstEnv
+ GhcPlugins: zipTyEnv :: HasDebugCallStack -> [TyVar] -> [Type] -> TvSubstEnv
- StgLiftLams.Analysis: type LlStgAlt = GenStgAlt 'LiftLams
+ StgLiftLams.Analysis: type LlStgAlt = GenStgAlt 'LiftLams
- StgLiftLams.Analysis: type LlStgBinding = GenStgBinding 'LiftLams
+ StgLiftLams.Analysis: type LlStgBinding = GenStgBinding 'LiftLams
- StgLiftLams.Analysis: type LlStgExpr = GenStgExpr 'LiftLams
+ StgLiftLams.Analysis: type LlStgExpr = GenStgExpr 'LiftLams
- StgLiftLams.Analysis: type LlStgRhs = GenStgRhs 'LiftLams
+ StgLiftLams.Analysis: type LlStgRhs = GenStgRhs 'LiftLams
- StgSyn: type CgStgAlt = GenStgAlt 'CodeGen
+ StgSyn: type CgStgAlt = GenStgAlt 'CodeGen
- StgSyn: type CgStgBinding = GenStgBinding 'CodeGen
+ StgSyn: type CgStgBinding = GenStgBinding 'CodeGen
- StgSyn: type CgStgExpr = GenStgExpr 'CodeGen
+ StgSyn: type CgStgExpr = GenStgExpr 'CodeGen
- StgSyn: type CgStgRhs = GenStgRhs 'CodeGen
+ StgSyn: type CgStgRhs = GenStgRhs 'CodeGen
- StgSyn: type CgStgTopBinding = GenStgTopBinding 'CodeGen
+ StgSyn: type CgStgTopBinding = GenStgTopBinding 'CodeGen
- StgSyn: type LlStgAlt = GenStgAlt 'LiftLams
+ StgSyn: type LlStgAlt = GenStgAlt 'LiftLams
- StgSyn: type LlStgBinding = GenStgBinding 'LiftLams
+ StgSyn: type LlStgBinding = GenStgBinding 'LiftLams
- StgSyn: type LlStgExpr = GenStgExpr 'LiftLams
+ StgSyn: type LlStgExpr = GenStgExpr 'LiftLams
- StgSyn: type LlStgRhs = GenStgRhs 'LiftLams
+ StgSyn: type LlStgRhs = GenStgRhs 'LiftLams
- StgSyn: type LlStgTopBinding = GenStgTopBinding 'LiftLams
+ StgSyn: type LlStgTopBinding = GenStgTopBinding 'LiftLams
- StgSyn: type StgAlt = GenStgAlt 'Vanilla
+ StgSyn: type StgAlt = GenStgAlt 'Vanilla
- StgSyn: type StgBinding = GenStgBinding 'Vanilla
+ StgSyn: type StgBinding = GenStgBinding 'Vanilla
- StgSyn: type StgExpr = GenStgExpr 'Vanilla
+ StgSyn: type StgExpr = GenStgExpr 'Vanilla
- StgSyn: type StgRhs = GenStgRhs 'Vanilla
+ StgSyn: type StgRhs = GenStgRhs 'Vanilla
- StgSyn: type StgTopBinding = GenStgTopBinding 'Vanilla
+ StgSyn: type StgTopBinding = GenStgTopBinding 'Vanilla
- TcHsSyn: mkHsApp :: forall (id :: Pass). LHsExpr (GhcPass id) -> LHsExpr (GhcPass id) -> LHsExpr (GhcPass id)
+ TcHsSyn: mkHsApp :: () => LHsExpr (GhcPass id) -> LHsExpr (GhcPass id) -> LHsExpr (GhcPass id)
- TcHsSyn: mkHsAppTy :: forall (p :: Pass). LHsType (GhcPass p) -> LHsType (GhcPass p) -> LHsType (GhcPass p)
+ TcHsSyn: mkHsAppTy :: () => LHsType (GhcPass p) -> LHsType (GhcPass p) -> LHsType (GhcPass p)
- TcHsSyn: mkHsCaseAlt :: forall (p :: Pass) body. LPat (GhcPass p) -> Located (body (GhcPass p)) -> LMatch (GhcPass p) (Located (body (GhcPass p)))
+ TcHsSyn: mkHsCaseAlt :: () => LPat (GhcPass p) -> Located (body (GhcPass p)) -> LMatch (GhcPass p) (Located (body (GhcPass p)))
- TcPluginM: unsafeTcPluginTcM :: TcM a -> TcPluginM a
+ TcPluginM: unsafeTcPluginTcM :: () => TcM a -> TcPluginM a
- TmOracle: runPmPprM :: PmPprM a -> [PmNegLitCt] -> (a, [(SDoc, [PmLit])])
+ TmOracle: runPmPprM :: () => PmPprM a -> [PmNegLitCt] -> (a, [(SDoc, [PmLit])])

Files

− compiler/GhclibHsVersions.h 
@@ -1,65 +0,0 @@-#pragma once--#if 0--IMPORTANT!  If you put extra tabs/spaces in these macro definitions,-you will screw up the layout where they are used in case expressions!--(This is cpp-dependent, of course)--#endif--/* Useful in the headers that we share with the RTS */-#define COMPILING_GHC 1--/* Pull in all the platform defines for this build (foo_TARGET_ARCH etc.) */-#include "ghc_boot_platform.h"--/* Pull in the autoconf defines (HAVE_FOO), but don't include- * ghcconfig.h, because that will include ghcplatform.h which has the- * wrong platform settings for the compiler (it has the platform- * settings for the target plat instead). */-#include "ghcautoconf.h"--#define GLOBAL_VAR(name,value,ty)  \-{-# NOINLINE name #-};             \-name :: IORef (ty);                \-name = Util.global (value);--#define GLOBAL_VAR_M(name,value,ty) \-{-# NOINLINE name #-};              \-name :: IORef (ty);                 \-name = Util.globalM (value);---#define SHARED_GLOBAL_VAR(name,accessor,saccessor,value,ty) \-{-# NOINLINE name #-};                                      \-name :: IORef (ty);                                         \-name = Util.sharedGlobal (value) (accessor);                \-foreign import ccall unsafe saccessor                       \-  accessor :: Ptr (IORef a) -> IO (Ptr (IORef a));--#define SHARED_GLOBAL_VAR_M(name,accessor,saccessor,value,ty)  \-{-# NOINLINE name #-};                                         \-name :: IORef (ty);                                            \-name = Util.sharedGlobalM (value) (accessor);                  \-foreign import ccall unsafe saccessor                          \-  accessor :: Ptr (IORef a) -> IO (Ptr (IORef a));---#define ASSERT(e)      if debugIsOn && not (e) then (assertPanic __FILE__ __LINE__) else-#define ASSERT2(e,msg) if debugIsOn && not (e) then (assertPprPanic __FILE__ __LINE__ (msg)) else-#define WARN( e, msg ) (warnPprTrace (e) __FILE__ __LINE__ (msg)) $---- Examples:   Assuming   flagSet :: String -> m Bool------    do { c   <- getChar; MASSERT( isUpper c ); ... }---    do { c   <- getChar; MASSERT2( isUpper c, text "Bad" ); ... }---    do { str <- getStr;  ASSERTM( flagSet str ); .. }---    do { str <- getStr;  ASSERTM2( flagSet str, text "Bad" ); .. }---    do { str <- getStr;  WARNM2( flagSet str, text "Flag is set" ); .. }-#define MASSERT(e)      ASSERT(e) return ()-#define MASSERT2(e,msg) ASSERT2(e,msg) return ()-#define ASSERTM(e)      do { bool <- e; MASSERT(bool) }-#define ASSERTM2(e,msg) do { bool <- e; MASSERT2(bool,msg) }-#define WARNM2(e,msg)   do { bool <- e; WARN(bool, msg) return () }
+ compiler/HsVersions.h view
@@ -0,0 +1,65 @@+#pragma once++#if 0++IMPORTANT!  If you put extra tabs/spaces in these macro definitions,+you will screw up the layout where they are used in case expressions!++(This is cpp-dependent, of course)++#endif++/* Useful in the headers that we share with the RTS */+#define COMPILING_GHC 1++/* Pull in all the platform defines for this build (foo_TARGET_ARCH etc.) */+#include "ghc_boot_platform.h"++/* Pull in the autoconf defines (HAVE_FOO), but don't include+ * ghcconfig.h, because that will include ghcplatform.h which has the+ * wrong platform settings for the compiler (it has the platform+ * settings for the target plat instead). */+#include "ghcautoconf.h"++#define GLOBAL_VAR(name,value,ty)  \+{-# NOINLINE name #-};             \+name :: IORef (ty);                \+name = Util.global (value);++#define GLOBAL_VAR_M(name,value,ty) \+{-# NOINLINE name #-};              \+name :: IORef (ty);                 \+name = Util.globalM (value);+++#define SHARED_GLOBAL_VAR(name,accessor,saccessor,value,ty) \+{-# NOINLINE name #-};                                      \+name :: IORef (ty);                                         \+name = Util.sharedGlobal (value) (accessor);                \+foreign import ccall unsafe saccessor                       \+  accessor :: Ptr (IORef a) -> IO (Ptr (IORef a));++#define SHARED_GLOBAL_VAR_M(name,accessor,saccessor,value,ty)  \+{-# NOINLINE name #-};                                         \+name :: IORef (ty);                                            \+name = Util.sharedGlobalM (value) (accessor);                  \+foreign import ccall unsafe saccessor                          \+  accessor :: Ptr (IORef a) -> IO (Ptr (IORef a));+++#define ASSERT(e)      if debugIsOn && not (e) then (assertPanic __FILE__ __LINE__) else+#define ASSERT2(e,msg) if debugIsOn && not (e) then (assertPprPanic __FILE__ __LINE__ (msg)) else+#define WARN( e, msg ) (warnPprTrace (e) __FILE__ __LINE__ (msg)) $++-- Examples:   Assuming   flagSet :: String -> m Bool+--+--    do { c   <- getChar; MASSERT( isUpper c ); ... }+--    do { c   <- getChar; MASSERT2( isUpper c, text "Bad" ); ... }+--    do { str <- getStr;  ASSERTM( flagSet str ); .. }+--    do { str <- getStr;  ASSERTM2( flagSet str, text "Bad" ); .. }+--    do { str <- getStr;  WARNM2( flagSet str, text "Flag is set" ); .. }+#define MASSERT(e)      ASSERT(e) return ()+#define MASSERT2(e,msg) ASSERT2(e,msg) return ()+#define ASSERTM(e)      do { bool <- e; MASSERT(bool) }+#define ASSERTM2(e,msg) do { bool <- e; MASSERT2(bool,msg) }+#define WARNM2(e,msg)   do { bool <- e; WARN(bool, msg) return () }
compiler/backpack/DriverBkp.hs view
@@ -16,7 +16,7 @@  module DriverBkp (doBackpack) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/backpack/NameShape.hs view
@@ -10,7 +10,7 @@     maybeSubstNameShape,     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/backpack/RnModIface.hs view
@@ -13,7 +13,7 @@     tcRnModExports,     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/cmm/CLabel.hs view
@@ -109,7 +109,7 @@         isConInfoTableLabel     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/cmm/CmmInfo.hs view
@@ -32,7 +32,7 @@   stdPtrsOffset, stdNonPtrsOffset, ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/cmm/CmmParse.y view
@@ -201,7 +201,6 @@ module CmmParse ( parseCmmFile ) where  import GhcPrelude-import qualified Prelude  import StgCmmExtCode import CmmCallConv@@ -259,7 +258,7 @@ import Data.Maybe import qualified Data.Map as M -#include "GhclibHsVersions.h"+#include "HsVersions.h" }  %expect 0
compiler/cmm/PprC.hs view
@@ -23,7 +23,7 @@         pprStringInCStyle   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  -- Cmm stuff import GhcPrelude
compiler/codeGen/StgCmm.hs view
@@ -11,7 +11,7 @@  module StgCmm ( codeGen ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude as Prelude
compiler/codeGen/StgCmmClosure.hs view
@@ -64,7 +64,7 @@  #include "../includes/MachDeps.h" -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/codeGen/StgCmmCon.hs view
@@ -15,7 +15,7 @@         cgTopRhsCon, buildDynCon, bindConArgs     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/codeGen/StgCmmEnv.hs view
@@ -22,7 +22,7 @@         maybeLetNoEscape,     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/codeGen/StgCmmExpr.hs view
@@ -10,7 +10,7 @@  module StgCmmExpr ( cgExpr ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude hiding ((<*>))
compiler/codeGen/StgCmmLayout.hs view
@@ -30,7 +30,7 @@   ) where  -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude hiding ((<*>))
compiler/codeGen/StgCmmPrim.hs view
@@ -17,7 +17,7 @@    shouldInlinePrimOp  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude hiding ((<*>))
compiler/codeGen/StgCmmProf.hs view
@@ -246,7 +246,7 @@                 -- C compiler (that compiles the RTS, in particular) does                 -- layouts of structs containing long-longs, simply                 -- pad out the struct with zero words until we hit the-                -- size of the overall struct (which we get via GhclibDerivedConstants.h)+                -- size of the overall struct (which we get via DerivedConstants.h)            emitDataLits (mkCCSLabel ccs) (mk_lits cc)     Nothing -> pprPanic "emitCostCentreStackDecl" (ppr ccs)
compiler/codeGen/StgCmmUtils.hs view
@@ -41,7 +41,7 @@         blankWord,   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/coreSyn/CoreLint.hs view
@@ -19,7 +19,7 @@     CoreLint.dumpIfSet,  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/coreSyn/CorePrep.hs view
@@ -13,7 +13,7 @@       lookupMkNaturalName, lookupNaturalSDataConName   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude @@ -1141,6 +1141,7 @@  Instead CoreArity.etaExpand gives                 f = /\a -> \y -> let s = h 3 in g s y+ -}  cpeEtaExpand :: Arity -> CpeRhs -> CpeRhs@@ -1161,6 +1162,8 @@     ==> case x of { p -> map f } -} +-- When updating this function, make sure it lines up with+-- CoreUtils.tryEtaReduce! tryEtaReducePrep :: [CoreBndr] -> CoreExpr -> Maybe CoreExpr tryEtaReducePrep bndrs expr@(App _ _)   | ok_to_eta_reduce f@@ -1180,25 +1183,14 @@     ok bndr (Var arg) = bndr == arg     ok _    _         = False -          -- We can't eta reduce something which must be saturated.+    -- We can't eta reduce something which must be saturated.     ok_to_eta_reduce (Var f) = not (hasNoBinding f)     ok_to_eta_reduce _       = False -- Safe. ToDo: generalise -tryEtaReducePrep bndrs (Let bind@(NonRec _ r) body)-  | not (any (`elemVarSet` fvs) bndrs)-  = case tryEtaReducePrep bndrs body of-        Just e -> Just (Let bind e)-        Nothing -> Nothing-  where-    fvs = exprFreeVars r --- NB: do not attempt to eta-reduce across ticks--- Otherwise we risk reducing---       \x. (Tick (Breakpoint {x}) f x)---   ==> Tick (breakpoint {x}) f--- which is bogus (Trac #17228)--- tryEtaReducePrep bndrs (Tick tickish e)---   = fmap (mkTick tickish) $ tryEtaReducePrep bndrs e+tryEtaReducePrep bndrs (Tick tickish e)+  | tickishFloatable tickish+  = fmap (mkTick tickish) $ tryEtaReducePrep bndrs e  tryEtaReducePrep _ _ = Nothing
compiler/deSugar/Check.hs view
@@ -16,7 +16,7 @@         genCaseTmCs1, genCaseTmCs2     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/Desugar.hs view
@@ -15,7 +15,7 @@     deSugar, deSugarExpr     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsArrows.hs view
@@ -12,7 +12,7 @@  module DsArrows ( dsProcExpr ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsBinds.hs view
@@ -19,7 +19,7 @@                  dsHsWrapper, dsTcEvBinds, dsTcEvBinds_s, dsEvBinds, dsMkUserRule   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsCCall.hs view
@@ -15,7 +15,7 @@         , resultWrapper         ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"   import GhcPrelude
compiler/deSugar/DsExpr.hs view
@@ -13,7 +13,7 @@ module DsExpr ( dsExpr, dsLExpr, dsLExprNoLP, dsLocalBinds               , dsValBinds, dsLit, dsSyntaxExpr ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsForeign.hs view
@@ -13,7 +13,7 @@  module DsForeign ( dsForeigns ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h" import GhcPrelude  import TcRnMonad        -- temp
compiler/deSugar/DsGRHSs.hs view
@@ -11,7 +11,7 @@  module DsGRHSs ( dsGuarded, dsGRHSs, dsGRHS, isTrueLHsExpr ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsListComp.hs view
@@ -12,7 +12,7 @@  module DsListComp ( dsListComp, dsMonadComp ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsMeta.hs view
@@ -19,7 +19,7 @@  module DsMeta( dsBracket ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsUsage.hs view
@@ -7,7 +7,7 @@     mkUsageInfo, mkUsedNames, mkDependencies     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/DsUtils.hs view
@@ -42,7 +42,7 @@         isTrueLHsExpr     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/Match.hs view
@@ -13,7 +13,7 @@ module Match ( match, matchEquations, matchWrapper, matchSimply              , matchSinglePat, matchSinglePatVar ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/MatchCon.hs view
@@ -12,7 +12,7 @@  module MatchCon ( matchConFamily, matchPatSyn ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/MatchLit.hs view
@@ -17,7 +17,7 @@                 , warnAboutEmptyEnumerations                 ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/deSugar/TmOracle.hs view
@@ -20,7 +20,7 @@         toComplex, exprDeepLookup, pmLitType, flattenPmVarEnv     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/ghci/ByteCodeAsm.hs view
@@ -13,7 +13,7 @@         iNTERP_STACK_CHECK_THRESH   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/ghci/ByteCodeGen.hs view
@@ -8,7 +8,7 @@ -- | ByteCodeGen: Generate bytecode from Core module ByteCodeGen ( UnlinkedBCO, byteCodeGen, coreExprToBCOs ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/ghci/ByteCodeInstr.hs view
@@ -9,7 +9,7 @@         BCInstr(..), ProtoBCO(..), bciStackUse,   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "../includes/MachDeps.h"  import GhcPrelude
compiler/ghci/ByteCodeItbls.hs view
@@ -7,7 +7,7 @@ -- | ByteCodeItbls: Generate infotables for interpreter-made bytecodes module ByteCodeItbls ( mkITbls ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/ghci/ByteCodeLink.hs view
@@ -16,7 +16,7 @@         nameToCLabel, linkFail   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/ghci/Linker.hs view
@@ -19,7 +19,7 @@                 linkCmdLineLibs         ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/ghci/RtClosureInspect.hs view
@@ -23,7 +23,7 @@      constrClosToName -- exported to use in test T4891  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/iface/BinIface.hs view
@@ -21,7 +21,7 @@      ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/iface/BuildTyCl.hs view
@@ -13,7 +13,7 @@         newImplicitBinder, newTyConRepName     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/iface/IfaceEnv.hs view
@@ -20,7 +20,7 @@         mkNameCacheUpdater, NameCacheUpdater(..),    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/iface/LoadIface.hs view
@@ -31,7 +31,7 @@         ifaceStats, pprModIface, showIface    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/iface/MkIface.hs view
@@ -58,7 +58,7 @@     the actual fingerprint for all each thing recorded in mi_usages -} -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/iface/TcIface.hs view
@@ -20,7 +20,7 @@         tcIfaceGlobal  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude @@ -1365,7 +1365,7 @@     -- If debug flag is not set: Ignore source notes     dbgLvl <- fmap debugLevel getDynFlags     case tickish of-      IfaceSource{} | dbgLvl > 0+      IfaceSource{} | dbgLvl == 0                     -> return expr'       _otherwise    -> do         tickish' <- tcIfaceTickish tickish
compiler/llvmGen/Llvm/PpLlvm.hs view
@@ -23,7 +23,7 @@      ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/llvmGen/Llvm/Types.hs view
@@ -6,7 +6,7 @@  module Llvm.Types where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/llvmGen/LlvmCodeGen.hs view
@@ -5,7 +5,7 @@ -- module LlvmCodeGen ( LlvmVersion, llvmVersionList, llvmCodeGen, llvmFixupAsm ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/llvmGen/LlvmCodeGen/Base.hs view
@@ -35,7 +35,7 @@         aliasify,     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "ghcautoconf.h"  import GhcPrelude
compiler/llvmGen/LlvmCodeGen/CodeGen.hs view
@@ -5,7 +5,7 @@ -- module LlvmCodeGen.CodeGen ( genLlvmProc ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/llvmGen/LlvmCodeGen/Data.hs view
@@ -7,7 +7,7 @@         genLlvmData, genData     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/llvmGen/LlvmCodeGen/Ppr.hs view
@@ -7,7 +7,7 @@         pprLlvmCmmDecl, pprLlvmData, infoSection     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/llvmGen/LlvmCodeGen/Regs.hs view
@@ -9,7 +9,7 @@         stgTBAA, baseN, stackN, heapN, rxN, topN, tbaa, getTBAA     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/CodeOutput.hs view
@@ -8,7 +8,7 @@  module CodeOutput( codeOutput, outputForeignStubs ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/DriverMkDepend.hs view
@@ -12,7 +12,7 @@         doMkDependHS   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/DriverPipeline.hs view
@@ -32,7 +32,7 @@    linkingNeeded, checkLinkInfo, writeInterfaceOnlyMode   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/Finder.hs view
@@ -31,7 +31,7 @@    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/GHC.hs view
@@ -291,7 +291,7 @@   * inline bits of HscMain here to simplify layering: hscTcExpr, hscStmt. -} -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude hiding (init)
compiler/main/GhcMake.hs view
@@ -29,7 +29,7 @@         moduleGraphNodes, SummaryNode     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/HscMain.hs view
@@ -177,7 +177,7 @@ import HieBin           ( readHieFile, writeHieFile , hie_file_result) import HieDebug         ( diffFile, validateScopes ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"   {- **********************************************************************
compiler/main/InteractiveEval.hs view
@@ -40,7 +40,7 @@         Term(..), obtainTermFromId, obtainTermFromVal, reconstructType         ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/PprTyThing.hs view
@@ -17,7 +17,7 @@         pprFamInst   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/SysTools.hs view
@@ -36,7 +36,7 @@         getFrameworkOpts  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/main/SysTools/Process.hs view
@@ -8,7 +8,7 @@ ----------------------------------------------------------------------------- module SysTools.Process where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import Exception import ErrUtils@@ -68,7 +68,7 @@     -> IO (ExitCode, String, String) -- ^ (exit_code, stdout, stderr) readProcessEnvWithExitCode prog args env_update = do     current_env <- getEnvironment-    readCreateProcessWithExitCode (proc prog args) {+    readCreateProcessWithExitCode ((proc prog args) {use_process_jobs = True}) {         env = Just (replaceVar env_update current_env) } ""  -- Don't let gcc localize version info string, #8825@@ -220,8 +220,21 @@   -- unless an exception was raised.   let safely inner = mask $ \restore -> do         -- acquire-        (hStdIn, hStdOut, hStdErr, hProcess) <- restore $-          runInteractiveProcess pgm real_args mb_cwd mb_env+        -- On Windows due to how exec is emulated the old process will exit and+        -- a new process will be created. This means waiting for termination of+        -- the parent process will get you in a race condition as the child may+        -- not have finished yet.  This caused #16450.  To fix this use a+        -- process job to track all child processes and wait for each one to+        -- finish.+        let procdata = (proc pgm real_args) { cwd = mb_cwd+                                            , env = mb_env+                                            , use_process_jobs = True+                                            , std_in  = CreatePipe+                                            , std_out = CreatePipe+                                            , std_err = CreatePipe+                                            }+        (Just hStdIn, Just hStdOut, Just hStdErr, hProcess) <- restore $+          createProcess_ "builderMainLoop" procdata         let cleanup_handles = do               hClose hStdIn               hClose hStdOut
compiler/main/TidyPgm.hs view
@@ -10,7 +10,7 @@        mkBootModDetailsTc, tidyProgram    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/AsmCodeGen.hs view
@@ -25,7 +25,7 @@                   , x86NcgImpl                   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h"
compiler/nativeGen/BlockLayout.hs view
@@ -11,7 +11,7 @@     ( sequenceTop ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h" import GhcPrelude  import Instruction
compiler/nativeGen/CFG.hs view
@@ -33,7 +33,7 @@     , optimizeCFG ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/NCGMonad.hs view
@@ -41,7 +41,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/PPC/CodeGen.hs view
@@ -20,7 +20,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h" #include "../includes/MachDeps.h"
compiler/nativeGen/PPC/Instr.hs view
@@ -8,7 +8,7 @@ -- ----------------------------------------------------------------------------- -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h"  module PPC.Instr (
compiler/nativeGen/PPC/RegInfo.hs view
@@ -18,7 +18,7 @@ where  #include "nativeGen/NCG.h"-#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/PPC/Regs.hs view
@@ -48,7 +48,7 @@ where  #include "nativeGen/NCG.h"-#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs view
@@ -6,7 +6,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/RegAlloc/Linear/FreeRegs.hs view
@@ -5,7 +5,7 @@     maxSpillSlots ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  where
compiler/nativeGen/RegAlloc/Linear/Main.hs view
@@ -99,7 +99,7 @@         module  RegAlloc.Linear.Stats   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"   import GhcPrelude
compiler/nativeGen/SPARC/CodeGen.hs view
@@ -17,7 +17,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h" #include "../includes/MachDeps.h"
compiler/nativeGen/SPARC/Instr.hs view
@@ -7,7 +7,7 @@ -- (c) The University of Glasgow 1993-2004 -- ------------------------------------------------------------------------------#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h"  module SPARC.Instr (
compiler/nativeGen/SPARC/Ppr.hs view
@@ -22,7 +22,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h"  import GhcPrelude
compiler/nativeGen/TargetReg.hs view
@@ -19,7 +19,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/X86/CodeGen.hs view
@@ -27,7 +27,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h" #include "../includes/MachDeps.h"
compiler/nativeGen/X86/Instr.hs view
@@ -14,7 +14,7 @@                   maxSpillSlots, archWordFormat ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h"  import GhcPrelude
compiler/nativeGen/X86/Ppr.hs view
@@ -20,7 +20,7 @@  where -#include "GhclibHsVersions.h"+#include "HsVersions.h" #include "nativeGen/NCG.h"  import GhcPrelude
compiler/nativeGen/X86/RegInfo.hs view
@@ -7,7 +7,7 @@ where  #include "nativeGen/NCG.h"-#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/nativeGen/X86/Regs.hs view
@@ -46,7 +46,7 @@ where  #include "nativeGen/NCG.h"-#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/prelude/PrelInfo.hs view
@@ -44,7 +44,7 @@      ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/rename/RnEnv.hs view
@@ -42,7 +42,7 @@      ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/rename/RnExpr.hs view
@@ -20,7 +20,7 @@         rnLExpr, rnExpr, rnStmts    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/rename/RnNames.hs view
@@ -27,7 +27,7 @@         ImportDeclUsage     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/rename/RnPat.hs view
@@ -45,7 +45,7 @@ import {-# SOURCE #-} RnExpr ( rnLExpr ) import {-# SOURCE #-} RnSplice ( rnSplicePat ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import HsSyn import TcRnMonad
compiler/rename/RnSource.hs view
@@ -14,7 +14,7 @@         rnSrcDecls, addTcgDUs, findSplice     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/rename/RnSplice.hs view
@@ -10,7 +10,7 @@         , traceSplice, SpliceInfo(..)   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/rename/RnTypes.hs view
@@ -70,7 +70,7 @@ import Data.List          ( nubBy, partition, (\\) ) import Control.Monad      ( unless, when ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- These type renamers are in a separate module, rather than in (say) RnSource,
compiler/simplCore/CSE.hs view
@@ -8,7 +8,7 @@  module CSE (cseProgram, cseOneExpr) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/FloatIn.hs view
@@ -17,7 +17,7 @@  module FloatIn ( floatInwards ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/FloatOut.hs view
@@ -33,7 +33,7 @@  import Data.List        ( partition ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {-         -----------------
compiler/simplCore/LiberateCase.hs view
@@ -7,7 +7,7 @@ {-# LANGUAGE CPP #-} module LiberateCase ( liberateCase ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/SAT.hs view
@@ -72,7 +72,7 @@ import Data.List import FastString -#include "GhclibHsVersions.h"+#include "HsVersions.h"  doStaticArgs :: UniqSupply -> CoreProgram -> CoreProgram doStaticArgs us binds = snd $ mapAccumL sat_bind_threaded_us us binds
compiler/simplCore/SetLevels.hs view
@@ -60,7 +60,7 @@         incMinorLvl, ltMajLvl, ltLvl, isTopLvl     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/SimplCore.hs view
@@ -8,7 +8,7 @@  module SimplCore ( core2core, simplifyExpr ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/SimplEnv.hs view
@@ -43,7 +43,7 @@         wrapJoinFloats, wrapJoinFloatsX, unitJoinFloat, addJoinFlts     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/SimplUtils.hs view
@@ -36,7 +36,7 @@         isExitJoinId     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplCore/Simplify.hs view
@@ -8,7 +8,7 @@  module Simplify ( simplTopBinds, simplExpr, simplRules ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplStg/SimplStg.hs view
@@ -11,7 +11,7 @@  module SimplStg ( stg2stg ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplStg/StgLiftLams/LiftM.hs view
@@ -20,7 +20,7 @@     substOcc, isLifted, formerFreeVars, liftedIdsExpander   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplStg/StgLiftLams/Transformation.hs view
@@ -4,7 +4,7 @@ -- selecting which bindings to lambda lift by consulting 'goodToLift'. module StgLiftLams.Transformation (stgLiftLams) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplStg/StgStats.hs view
@@ -25,7 +25,7 @@  module StgStats ( showStgStats ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/simplStg/UnariseStg.hs view
@@ -194,7 +194,7 @@  module UnariseStg (unarise) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/specialise/SpecConstr.hs view
@@ -17,7 +17,7 @@         SpecConstrAnnotation(..)     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/specialise/Specialise.hs view
@@ -7,7 +7,7 @@ {-# LANGUAGE CPP #-} module Specialise ( specProgram, specUnfolding ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/stgSyn/CoreToStg.hs view
@@ -13,7 +13,7 @@  module CoreToStg ( coreToStg ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/stgSyn/StgSubst.hs view
@@ -2,7 +2,7 @@  module StgSubst where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/stgSyn/StgSyn.hs view
@@ -56,7 +56,7 @@         pprStgBinding, pprGenStgTopBindings, pprStgTopBindings     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/stranal/DmdAnal.hs view
@@ -11,7 +11,7 @@  module DmdAnal ( dmdAnalProgram ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/stranal/WorkWrap.hs view
@@ -27,7 +27,7 @@ import FamInstEnv import MonadUtils -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- We take Core bindings whose binders have:
compiler/stranal/WwLib.hs view
@@ -11,7 +11,7 @@              , isWorkerSmallEnough  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/ClsInst.hs view
@@ -7,7 +7,7 @@      AssocInstInfo(..), isNotAssociated   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/FamInst.hs view
@@ -44,7 +44,7 @@ import Bag( Bag, unionBags, unitBag ) import Control.Monad -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- Note [The type family instance consistency story] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
compiler/typecheck/FunDeps.hs view
@@ -17,7 +17,7 @@         pprFundeps     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/Inst.hs view
@@ -30,7 +30,7 @@        tyCoVarsOfCt, tyCoVarsOfCts,     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcBackpack.hs view
@@ -69,7 +69,7 @@  import {-# SOURCE #-} TcRnDriver -#include "GhclibHsVersions.h"+#include "HsVersions.h"  fixityMisMatch :: TyThing -> Fixity -> Fixity -> SDoc fixityMisMatch real_thing real_fixity sig_fixity =
compiler/typecheck/TcBinds.hs view
@@ -68,7 +68,7 @@  import Control.Monad -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- ********************************************************************* *                                                                      *
compiler/typecheck/TcCanonical.hs view
@@ -8,7 +8,7 @@      solveCallStack    -- For TcSimplify   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcClassDcl.hs view
@@ -18,7 +18,7 @@                     tcATDefault                   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcDeriv.hs view
@@ -11,7 +11,7 @@  module TcDeriv ( tcDeriving, DerivInfo(..), mkDerivInfos ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcDerivInfer.hs view
@@ -11,7 +11,7 @@  module TcDerivInfer (inferConstraints, simplifyInstanceContexts) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcEnv.hs view
@@ -70,7 +70,7 @@         mkWrapperName   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcErrors.hs view
@@ -9,7 +9,7 @@        solverDepthErrorTcS   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcExpr.hs view
@@ -17,7 +17,7 @@                 addExprErrCtxt,                 getFixedTyVars ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcFlatten.hs view
@@ -7,7 +7,7 @@    unflattenWanteds  ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcForeign.hs view
@@ -31,7 +31,7 @@         , tcCheckFEType         ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcGenDeriv.hs view
@@ -35,7 +35,7 @@         mkRdrFunBind, mkRdrFunBindEC, mkRdrFunBindSE, error_Expr     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcGenGenerics.hs view
@@ -50,7 +50,7 @@ import Data.List (zip4, partition) import Data.Maybe (isJust) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- ************************************************************************
compiler/typecheck/TcHsSyn.hs view
@@ -44,7 +44,7 @@         lookupTyVarOcc   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcHsType.hs view
@@ -62,7 +62,7 @@         funAppCtxt, addTyConFlavCtxt    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcInstDcls.hs view
@@ -12,7 +12,7 @@  module TcInstDcls ( tcInstDecls1, tcInstDeclsDeriv, tcInstDecls2 ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcInteract.hs view
@@ -5,7 +5,7 @@      solveSimpleWanteds,  -- Solves Cts   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude import BasicTypes ( SwapFlag(..), isSwapped,
compiler/typecheck/TcMType.hs view
@@ -87,7 +87,7 @@   ensureNotLevPoly, checkForLevPoly, checkForLevPolyX, formatLevPolyErr   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  -- friends: import GhcPrelude
compiler/typecheck/TcMatches.hs view
@@ -49,7 +49,7 @@ import Control.Monad import Control.Arrow ( second ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- ************************************************************************
compiler/typecheck/TcPat.hs view
@@ -15,7 +15,7 @@              , tcPat, tcPat_O, tcPats              , addDataConStupidTheta, badFieldCon, polyPatSig ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcPatSyn.hs view
@@ -57,7 +57,7 @@ import Control.Monad ( zipWithM ) import Data.List( partition ) -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- ************************************************************************
compiler/typecheck/TcRnDriver.hs view
@@ -140,7 +140,7 @@ import Control.DeepSeq import Control.Monad -#include "GhclibHsVersions.h"+#include "HsVersions.h"  {- ************************************************************************
compiler/typecheck/TcRnMonad.hs view
@@ -140,7 +140,7 @@   module IOEnv   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcSMonad.hs view
@@ -121,7 +121,7 @@                                              -- here ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcSigs.hs view
@@ -23,7 +23,7 @@        mkPragEnv, tcSpecPrags, tcSpecWrapper, tcImpPrags, addInlinePrags    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcSimplify.hs view
@@ -24,7 +24,7 @@        approximateWC, runTcSDeriveds   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcSplice.hs view
@@ -29,7 +29,7 @@      finishTH, runTopSplice       ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcTyClsDecls.hs view
@@ -22,7 +22,7 @@         wrongKindOfFamily     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcTyDecls.hs view
@@ -26,7 +26,7 @@         tcRecSelBinds, mkRecSelBinds, mkOneRecordSelector     ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcUnify.hs view
@@ -35,7 +35,7 @@    ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
compiler/typecheck/TcValidity.hs view
@@ -17,7 +17,7 @@   allDistinctTyVars   ) where -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
ghc-lib.cabal view
@@ -1,7 +1,7 @@ cabal-version: >=1.22 build-type: Simple name: ghc-lib-version: 8.8.2.20210620+version: 8.8.3.20200224 license: BSD3 license-file: LICENSE category: Development@@ -20,10 +20,11 @@ extra-source-files:     ghc-lib/generated/ghcautoconf.h     ghc-lib/generated/ghcplatform.h-    ghc-lib/generated/GhclibDerivedConstants.h+    ghc-lib/generated/ghcversion.h+    ghc-lib/generated/DerivedConstants.h     ghc-lib/generated/GHCConstantsHaskellExports.hs-    ghc-lib/generated/GHCConstantsHaskellWrappers.hs     ghc-lib/generated/GHCConstantsHaskellType.hs+    ghc-lib/generated/GHCConstantsHaskellWrappers.hs     ghc-lib/stage0/compiler/build/primop-can-fail.hs-incl     ghc-lib/stage0/compiler/build/primop-code-size.hs-incl     ghc-lib/stage0/compiler/build/primop-commutable.hs-incl@@ -45,16 +46,18 @@     includes/MachDeps.h     includes/stg/MachRegs.h     includes/CodeGen.Platform.hs+    compiler/HsVersions.h     compiler/Unique.h-    compiler/GhclibHsVersions.h     compiler/nativeGen/NCG.h     compiler/utils/md5.h+tested-with: GHC==8.8.2, GHC==8.6.5, GHC==8.4.4 source-repository head     type: git     location: git@github.com:digital-asset/ghc-lib.git  library     default-language:   Haskell2010+    default-extensions: NoImplicitPrelude     exposed: False     include-dirs:         includes@@ -70,9 +73,8 @@     else         build-depends: Win32     build-depends:-        rts,-        ghc-prim > 0.2 && < 0.8,-        base >= 4.11 && < 4.16,+        ghc-prim > 0.2 && < 0.6,+        base >= 4.11 && < 4.14,         containers >= 0.5 && < 0.7,         bytestring >= 0.9 && < 0.11,         binary == 0.8.*,@@ -85,7 +87,7 @@         transformers == 0.5.*,         process >= 1 && < 1.7,         hpc == 0.6.*,-        ghc-lib-parser == 8.8.2.20210620+        ghc-lib-parser == 8.8.3.20200224     build-tools: alex >= 3.1, happy >= 1.19.4     other-extensions:         BangPatterns@@ -120,8 +122,6 @@         TypeSynonymInstances         UnboxedTuples         UndecidableInstances-    default-extensions:-        NoImplicitPrelude     hs-source-dirs:         ghc-lib/stage0/compiler/build         libraries/template-haskell
+ ghc-lib/generated/DerivedConstants.h view
@@ -0,0 +1,554 @@+/* This file is created automatically.  Do not edit by hand.*/++#define CONTROL_GROUP_CONST_291 291+#define STD_HDR_SIZE 1+#define PROF_HDR_SIZE 2+#define BLOCK_SIZE 4096+#define MBLOCK_SIZE 1048576+#define BLOCKS_PER_MBLOCK 252+#define TICKY_BIN_COUNT 9+#define OFFSET_StgRegTable_rR1 0+#define OFFSET_StgRegTable_rR2 8+#define OFFSET_StgRegTable_rR3 16+#define OFFSET_StgRegTable_rR4 24+#define OFFSET_StgRegTable_rR5 32+#define OFFSET_StgRegTable_rR6 40+#define OFFSET_StgRegTable_rR7 48+#define OFFSET_StgRegTable_rR8 56+#define OFFSET_StgRegTable_rR9 64+#define OFFSET_StgRegTable_rR10 72+#define OFFSET_StgRegTable_rF1 80+#define OFFSET_StgRegTable_rF2 84+#define OFFSET_StgRegTable_rF3 88+#define OFFSET_StgRegTable_rF4 92+#define OFFSET_StgRegTable_rF5 96+#define OFFSET_StgRegTable_rF6 100+#define OFFSET_StgRegTable_rD1 104+#define OFFSET_StgRegTable_rD2 112+#define OFFSET_StgRegTable_rD3 120+#define OFFSET_StgRegTable_rD4 128+#define OFFSET_StgRegTable_rD5 136+#define OFFSET_StgRegTable_rD6 144+#define OFFSET_StgRegTable_rXMM1 152+#define OFFSET_StgRegTable_rXMM2 168+#define OFFSET_StgRegTable_rXMM3 184+#define OFFSET_StgRegTable_rXMM4 200+#define OFFSET_StgRegTable_rXMM5 216+#define OFFSET_StgRegTable_rXMM6 232+#define OFFSET_StgRegTable_rYMM1 248+#define OFFSET_StgRegTable_rYMM2 280+#define OFFSET_StgRegTable_rYMM3 312+#define OFFSET_StgRegTable_rYMM4 344+#define OFFSET_StgRegTable_rYMM5 376+#define OFFSET_StgRegTable_rYMM6 408+#define OFFSET_StgRegTable_rZMM1 440+#define OFFSET_StgRegTable_rZMM2 504+#define OFFSET_StgRegTable_rZMM3 568+#define OFFSET_StgRegTable_rZMM4 632+#define OFFSET_StgRegTable_rZMM5 696+#define OFFSET_StgRegTable_rZMM6 760+#define OFFSET_StgRegTable_rL1 824+#define OFFSET_StgRegTable_rSp 832+#define OFFSET_StgRegTable_rSpLim 840+#define OFFSET_StgRegTable_rHp 848+#define OFFSET_StgRegTable_rHpLim 856+#define OFFSET_StgRegTable_rCCCS 864+#define OFFSET_StgRegTable_rCurrentTSO 872+#define OFFSET_StgRegTable_rCurrentNursery 888+#define OFFSET_StgRegTable_rHpAlloc 904+#define OFFSET_StgRegTable_rRet 912+#define REP_StgRegTable_rRet b64+#define StgRegTable_rRet(__ptr__) REP_StgRegTable_rRet[__ptr__+OFFSET_StgRegTable_rRet]+#define OFFSET_StgRegTable_rNursery 880+#define REP_StgRegTable_rNursery b64+#define StgRegTable_rNursery(__ptr__) REP_StgRegTable_rNursery[__ptr__+OFFSET_StgRegTable_rNursery]+#define OFFSET_stgEagerBlackholeInfo -24+#define OFFSET_stgGCEnter1 -16+#define OFFSET_stgGCFun -8+#define OFFSET_Capability_r 24+#define OFFSET_Capability_lock 1096+#define OFFSET_Capability_no 944+#define REP_Capability_no b32+#define Capability_no(__ptr__) REP_Capability_no[__ptr__+OFFSET_Capability_no]+#define OFFSET_Capability_mut_lists 1016+#define REP_Capability_mut_lists b64+#define Capability_mut_lists(__ptr__) REP_Capability_mut_lists[__ptr__+OFFSET_Capability_mut_lists]+#define OFFSET_Capability_context_switch 1064+#define REP_Capability_context_switch b32+#define Capability_context_switch(__ptr__) REP_Capability_context_switch[__ptr__+OFFSET_Capability_context_switch]+#define OFFSET_Capability_interrupt 1068+#define REP_Capability_interrupt b32+#define Capability_interrupt(__ptr__) REP_Capability_interrupt[__ptr__+OFFSET_Capability_interrupt]+#define OFFSET_Capability_sparks 1200+#define REP_Capability_sparks b64+#define Capability_sparks(__ptr__) REP_Capability_sparks[__ptr__+OFFSET_Capability_sparks]+#define OFFSET_Capability_total_allocated 1072+#define REP_Capability_total_allocated b64+#define Capability_total_allocated(__ptr__) REP_Capability_total_allocated[__ptr__+OFFSET_Capability_total_allocated]+#define OFFSET_Capability_weak_ptr_list_hd 1048+#define REP_Capability_weak_ptr_list_hd b64+#define Capability_weak_ptr_list_hd(__ptr__) REP_Capability_weak_ptr_list_hd[__ptr__+OFFSET_Capability_weak_ptr_list_hd]+#define OFFSET_Capability_weak_ptr_list_tl 1056+#define REP_Capability_weak_ptr_list_tl b64+#define Capability_weak_ptr_list_tl(__ptr__) REP_Capability_weak_ptr_list_tl[__ptr__+OFFSET_Capability_weak_ptr_list_tl]+#define OFFSET_bdescr_start 0+#define REP_bdescr_start b64+#define bdescr_start(__ptr__) REP_bdescr_start[__ptr__+OFFSET_bdescr_start]+#define OFFSET_bdescr_free 8+#define REP_bdescr_free b64+#define bdescr_free(__ptr__) REP_bdescr_free[__ptr__+OFFSET_bdescr_free]+#define OFFSET_bdescr_blocks 48+#define REP_bdescr_blocks b32+#define bdescr_blocks(__ptr__) REP_bdescr_blocks[__ptr__+OFFSET_bdescr_blocks]+#define OFFSET_bdescr_gen_no 40+#define REP_bdescr_gen_no b16+#define bdescr_gen_no(__ptr__) REP_bdescr_gen_no[__ptr__+OFFSET_bdescr_gen_no]+#define OFFSET_bdescr_link 16+#define REP_bdescr_link b64+#define bdescr_link(__ptr__) REP_bdescr_link[__ptr__+OFFSET_bdescr_link]+#define OFFSET_bdescr_flags 46+#define REP_bdescr_flags b16+#define bdescr_flags(__ptr__) REP_bdescr_flags[__ptr__+OFFSET_bdescr_flags]+#define SIZEOF_generation 384+#define OFFSET_generation_n_new_large_words 56+#define REP_generation_n_new_large_words b64+#define generation_n_new_large_words(__ptr__) REP_generation_n_new_large_words[__ptr__+OFFSET_generation_n_new_large_words]+#define OFFSET_generation_weak_ptr_list 112+#define REP_generation_weak_ptr_list b64+#define generation_weak_ptr_list(__ptr__) REP_generation_weak_ptr_list[__ptr__+OFFSET_generation_weak_ptr_list]+#define SIZEOF_CostCentreStack 96+#define OFFSET_CostCentreStack_ccsID 0+#define REP_CostCentreStack_ccsID b64+#define CostCentreStack_ccsID(__ptr__) REP_CostCentreStack_ccsID[__ptr__+OFFSET_CostCentreStack_ccsID]+#define OFFSET_CostCentreStack_mem_alloc 72+#define REP_CostCentreStack_mem_alloc b64+#define CostCentreStack_mem_alloc(__ptr__) REP_CostCentreStack_mem_alloc[__ptr__+OFFSET_CostCentreStack_mem_alloc]+#define OFFSET_CostCentreStack_scc_count 48+#define REP_CostCentreStack_scc_count b64+#define CostCentreStack_scc_count(__ptr__) REP_CostCentreStack_scc_count[__ptr__+OFFSET_CostCentreStack_scc_count]+#define OFFSET_CostCentreStack_prevStack 16+#define REP_CostCentreStack_prevStack b64+#define CostCentreStack_prevStack(__ptr__) REP_CostCentreStack_prevStack[__ptr__+OFFSET_CostCentreStack_prevStack]+#define OFFSET_CostCentre_ccID 0+#define REP_CostCentre_ccID b64+#define CostCentre_ccID(__ptr__) REP_CostCentre_ccID[__ptr__+OFFSET_CostCentre_ccID]+#define OFFSET_CostCentre_link 56+#define REP_CostCentre_link b64+#define CostCentre_link(__ptr__) REP_CostCentre_link[__ptr__+OFFSET_CostCentre_link]+#define OFFSET_StgHeader_info 0+#define REP_StgHeader_info b64+#define StgHeader_info(__ptr__) REP_StgHeader_info[__ptr__+OFFSET_StgHeader_info]+#define OFFSET_StgHeader_ccs 8+#define REP_StgHeader_ccs b64+#define StgHeader_ccs(__ptr__) REP_StgHeader_ccs[__ptr__+OFFSET_StgHeader_ccs]+#define OFFSET_StgHeader_ldvw 16+#define REP_StgHeader_ldvw b64+#define StgHeader_ldvw(__ptr__) REP_StgHeader_ldvw[__ptr__+OFFSET_StgHeader_ldvw]+#define SIZEOF_StgSMPThunkHeader 8+#define OFFSET_StgClosure_payload 0+#define StgClosure_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgClosure_payload + WDS(__ix__)]+#define OFFSET_StgEntCounter_allocs 48+#define REP_StgEntCounter_allocs b64+#define StgEntCounter_allocs(__ptr__) REP_StgEntCounter_allocs[__ptr__+OFFSET_StgEntCounter_allocs]+#define OFFSET_StgEntCounter_allocd 16+#define REP_StgEntCounter_allocd b64+#define StgEntCounter_allocd(__ptr__) REP_StgEntCounter_allocd[__ptr__+OFFSET_StgEntCounter_allocd]+#define OFFSET_StgEntCounter_registeredp 0+#define REP_StgEntCounter_registeredp b64+#define StgEntCounter_registeredp(__ptr__) REP_StgEntCounter_registeredp[__ptr__+OFFSET_StgEntCounter_registeredp]+#define OFFSET_StgEntCounter_link 56+#define REP_StgEntCounter_link b64+#define StgEntCounter_link(__ptr__) REP_StgEntCounter_link[__ptr__+OFFSET_StgEntCounter_link]+#define OFFSET_StgEntCounter_entry_count 40+#define REP_StgEntCounter_entry_count b64+#define StgEntCounter_entry_count(__ptr__) REP_StgEntCounter_entry_count[__ptr__+OFFSET_StgEntCounter_entry_count]+#define SIZEOF_StgUpdateFrame_NoHdr 8+#define SIZEOF_StgUpdateFrame (SIZEOF_StgHeader+8)+#define SIZEOF_StgCatchFrame_NoHdr 16+#define SIZEOF_StgCatchFrame (SIZEOF_StgHeader+16)+#define SIZEOF_StgStopFrame_NoHdr 0+#define SIZEOF_StgStopFrame (SIZEOF_StgHeader+0)+#define SIZEOF_StgMutArrPtrs_NoHdr 16+#define SIZEOF_StgMutArrPtrs (SIZEOF_StgHeader+16)+#define OFFSET_StgMutArrPtrs_ptrs 0+#define REP_StgMutArrPtrs_ptrs b64+#define StgMutArrPtrs_ptrs(__ptr__) REP_StgMutArrPtrs_ptrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgMutArrPtrs_ptrs]+#define OFFSET_StgMutArrPtrs_size 8+#define REP_StgMutArrPtrs_size b64+#define StgMutArrPtrs_size(__ptr__) REP_StgMutArrPtrs_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgMutArrPtrs_size]+#define SIZEOF_StgSmallMutArrPtrs_NoHdr 8+#define SIZEOF_StgSmallMutArrPtrs (SIZEOF_StgHeader+8)+#define OFFSET_StgSmallMutArrPtrs_ptrs 0+#define REP_StgSmallMutArrPtrs_ptrs b64+#define StgSmallMutArrPtrs_ptrs(__ptr__) REP_StgSmallMutArrPtrs_ptrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgSmallMutArrPtrs_ptrs]+#define SIZEOF_StgArrBytes_NoHdr 8+#define SIZEOF_StgArrBytes (SIZEOF_StgHeader+8)+#define OFFSET_StgArrBytes_bytes 0+#define REP_StgArrBytes_bytes b64+#define StgArrBytes_bytes(__ptr__) REP_StgArrBytes_bytes[__ptr__+SIZEOF_StgHeader+OFFSET_StgArrBytes_bytes]+#define OFFSET_StgArrBytes_payload 8+#define StgArrBytes_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgArrBytes_payload + WDS(__ix__)]+#define OFFSET_StgTSO__link 0+#define REP_StgTSO__link b64+#define StgTSO__link(__ptr__) REP_StgTSO__link[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO__link]+#define OFFSET_StgTSO_global_link 8+#define REP_StgTSO_global_link b64+#define StgTSO_global_link(__ptr__) REP_StgTSO_global_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_global_link]+#define OFFSET_StgTSO_what_next 24+#define REP_StgTSO_what_next b16+#define StgTSO_what_next(__ptr__) REP_StgTSO_what_next[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_what_next]+#define OFFSET_StgTSO_why_blocked 26+#define REP_StgTSO_why_blocked b16+#define StgTSO_why_blocked(__ptr__) REP_StgTSO_why_blocked[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_why_blocked]+#define OFFSET_StgTSO_block_info 32+#define REP_StgTSO_block_info b64+#define StgTSO_block_info(__ptr__) REP_StgTSO_block_info[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_block_info]+#define OFFSET_StgTSO_blocked_exceptions 80+#define REP_StgTSO_blocked_exceptions b64+#define StgTSO_blocked_exceptions(__ptr__) REP_StgTSO_blocked_exceptions[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_blocked_exceptions]+#define OFFSET_StgTSO_id 40+#define REP_StgTSO_id b32+#define StgTSO_id(__ptr__) REP_StgTSO_id[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_id]+#define OFFSET_StgTSO_cap 64+#define REP_StgTSO_cap b64+#define StgTSO_cap(__ptr__) REP_StgTSO_cap[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_cap]+#define OFFSET_StgTSO_saved_errno 44+#define REP_StgTSO_saved_errno b32+#define StgTSO_saved_errno(__ptr__) REP_StgTSO_saved_errno[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_saved_errno]+#define OFFSET_StgTSO_trec 72+#define REP_StgTSO_trec b64+#define StgTSO_trec(__ptr__) REP_StgTSO_trec[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_trec]+#define OFFSET_StgTSO_flags 28+#define REP_StgTSO_flags b32+#define StgTSO_flags(__ptr__) REP_StgTSO_flags[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_flags]+#define OFFSET_StgTSO_dirty 48+#define REP_StgTSO_dirty b32+#define StgTSO_dirty(__ptr__) REP_StgTSO_dirty[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_dirty]+#define OFFSET_StgTSO_bq 88+#define REP_StgTSO_bq b64+#define StgTSO_bq(__ptr__) REP_StgTSO_bq[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_bq]+#define OFFSET_StgTSO_alloc_limit 96+#define REP_StgTSO_alloc_limit b64+#define StgTSO_alloc_limit(__ptr__) REP_StgTSO_alloc_limit[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_alloc_limit]+#define OFFSET_StgTSO_cccs 112+#define REP_StgTSO_cccs b64+#define StgTSO_cccs(__ptr__) REP_StgTSO_cccs[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_cccs]+#define OFFSET_StgTSO_stackobj 16+#define REP_StgTSO_stackobj b64+#define StgTSO_stackobj(__ptr__) REP_StgTSO_stackobj[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_stackobj]+#define OFFSET_StgStack_sp 8+#define REP_StgStack_sp b64+#define StgStack_sp(__ptr__) REP_StgStack_sp[__ptr__+SIZEOF_StgHeader+OFFSET_StgStack_sp]+#define OFFSET_StgStack_stack 16+#define OFFSET_StgStack_stack_size 0+#define REP_StgStack_stack_size b32+#define StgStack_stack_size(__ptr__) REP_StgStack_stack_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgStack_stack_size]+#define OFFSET_StgStack_dirty 4+#define REP_StgStack_dirty b32+#define StgStack_dirty(__ptr__) REP_StgStack_dirty[__ptr__+SIZEOF_StgHeader+OFFSET_StgStack_dirty]+#define SIZEOF_StgTSOProfInfo 8+#define OFFSET_StgUpdateFrame_updatee 0+#define REP_StgUpdateFrame_updatee b64+#define StgUpdateFrame_updatee(__ptr__) REP_StgUpdateFrame_updatee[__ptr__+SIZEOF_StgHeader+OFFSET_StgUpdateFrame_updatee]+#define OFFSET_StgCatchFrame_handler 8+#define REP_StgCatchFrame_handler b64+#define StgCatchFrame_handler(__ptr__) REP_StgCatchFrame_handler[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchFrame_handler]+#define OFFSET_StgCatchFrame_exceptions_blocked 0+#define REP_StgCatchFrame_exceptions_blocked b64+#define StgCatchFrame_exceptions_blocked(__ptr__) REP_StgCatchFrame_exceptions_blocked[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchFrame_exceptions_blocked]+#define SIZEOF_StgPAP_NoHdr 16+#define SIZEOF_StgPAP (SIZEOF_StgHeader+16)+#define OFFSET_StgPAP_n_args 4+#define REP_StgPAP_n_args b32+#define StgPAP_n_args(__ptr__) REP_StgPAP_n_args[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_n_args]+#define OFFSET_StgPAP_fun 8+#define REP_StgPAP_fun gcptr+#define StgPAP_fun(__ptr__) REP_StgPAP_fun[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_fun]+#define OFFSET_StgPAP_arity 0+#define REP_StgPAP_arity b32+#define StgPAP_arity(__ptr__) REP_StgPAP_arity[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_arity]+#define OFFSET_StgPAP_payload 16+#define StgPAP_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_payload + WDS(__ix__)]+#define SIZEOF_StgAP_NoThunkHdr 16+#define SIZEOF_StgAP_NoHdr 24+#define SIZEOF_StgAP (SIZEOF_StgHeader+24)+#define OFFSET_StgAP_n_args 12+#define REP_StgAP_n_args b32+#define StgAP_n_args(__ptr__) REP_StgAP_n_args[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_n_args]+#define OFFSET_StgAP_fun 16+#define REP_StgAP_fun gcptr+#define StgAP_fun(__ptr__) REP_StgAP_fun[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_fun]+#define OFFSET_StgAP_payload 24+#define StgAP_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_payload + WDS(__ix__)]+#define SIZEOF_StgAP_STACK_NoThunkHdr 16+#define SIZEOF_StgAP_STACK_NoHdr 24+#define SIZEOF_StgAP_STACK (SIZEOF_StgHeader+24)+#define OFFSET_StgAP_STACK_size 8+#define REP_StgAP_STACK_size b64+#define StgAP_STACK_size(__ptr__) REP_StgAP_STACK_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_STACK_size]+#define OFFSET_StgAP_STACK_fun 16+#define REP_StgAP_STACK_fun gcptr+#define StgAP_STACK_fun(__ptr__) REP_StgAP_STACK_fun[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_STACK_fun]+#define OFFSET_StgAP_STACK_payload 24+#define StgAP_STACK_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_STACK_payload + WDS(__ix__)]+#define SIZEOF_StgSelector_NoThunkHdr 8+#define SIZEOF_StgSelector_NoHdr 16+#define SIZEOF_StgSelector (SIZEOF_StgHeader+16)+#define OFFSET_StgInd_indirectee 0+#define REP_StgInd_indirectee gcptr+#define StgInd_indirectee(__ptr__) REP_StgInd_indirectee[__ptr__+SIZEOF_StgHeader+OFFSET_StgInd_indirectee]+#define SIZEOF_StgMutVar_NoHdr 8+#define SIZEOF_StgMutVar (SIZEOF_StgHeader+8)+#define OFFSET_StgMutVar_var 0+#define REP_StgMutVar_var b64+#define StgMutVar_var(__ptr__) REP_StgMutVar_var[__ptr__+SIZEOF_StgHeader+OFFSET_StgMutVar_var]+#define SIZEOF_StgAtomicallyFrame_NoHdr 16+#define SIZEOF_StgAtomicallyFrame (SIZEOF_StgHeader+16)+#define OFFSET_StgAtomicallyFrame_code 0+#define REP_StgAtomicallyFrame_code b64+#define StgAtomicallyFrame_code(__ptr__) REP_StgAtomicallyFrame_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgAtomicallyFrame_code]+#define OFFSET_StgAtomicallyFrame_result 8+#define REP_StgAtomicallyFrame_result b64+#define StgAtomicallyFrame_result(__ptr__) REP_StgAtomicallyFrame_result[__ptr__+SIZEOF_StgHeader+OFFSET_StgAtomicallyFrame_result]+#define OFFSET_StgTRecHeader_enclosing_trec 0+#define REP_StgTRecHeader_enclosing_trec b64+#define StgTRecHeader_enclosing_trec(__ptr__) REP_StgTRecHeader_enclosing_trec[__ptr__+SIZEOF_StgHeader+OFFSET_StgTRecHeader_enclosing_trec]+#define SIZEOF_StgCatchSTMFrame_NoHdr 16+#define SIZEOF_StgCatchSTMFrame (SIZEOF_StgHeader+16)+#define OFFSET_StgCatchSTMFrame_handler 8+#define REP_StgCatchSTMFrame_handler b64+#define StgCatchSTMFrame_handler(__ptr__) REP_StgCatchSTMFrame_handler[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchSTMFrame_handler]+#define OFFSET_StgCatchSTMFrame_code 0+#define REP_StgCatchSTMFrame_code b64+#define StgCatchSTMFrame_code(__ptr__) REP_StgCatchSTMFrame_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchSTMFrame_code]+#define SIZEOF_StgCatchRetryFrame_NoHdr 24+#define SIZEOF_StgCatchRetryFrame (SIZEOF_StgHeader+24)+#define OFFSET_StgCatchRetryFrame_running_alt_code 0+#define REP_StgCatchRetryFrame_running_alt_code b64+#define StgCatchRetryFrame_running_alt_code(__ptr__) REP_StgCatchRetryFrame_running_alt_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchRetryFrame_running_alt_code]+#define OFFSET_StgCatchRetryFrame_first_code 8+#define REP_StgCatchRetryFrame_first_code b64+#define StgCatchRetryFrame_first_code(__ptr__) REP_StgCatchRetryFrame_first_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchRetryFrame_first_code]+#define OFFSET_StgCatchRetryFrame_alt_code 16+#define REP_StgCatchRetryFrame_alt_code b64+#define StgCatchRetryFrame_alt_code(__ptr__) REP_StgCatchRetryFrame_alt_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchRetryFrame_alt_code]+#define OFFSET_StgTVarWatchQueue_closure 0+#define REP_StgTVarWatchQueue_closure b64+#define StgTVarWatchQueue_closure(__ptr__) REP_StgTVarWatchQueue_closure[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVarWatchQueue_closure]+#define OFFSET_StgTVarWatchQueue_next_queue_entry 8+#define REP_StgTVarWatchQueue_next_queue_entry b64+#define StgTVarWatchQueue_next_queue_entry(__ptr__) REP_StgTVarWatchQueue_next_queue_entry[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVarWatchQueue_next_queue_entry]+#define OFFSET_StgTVarWatchQueue_prev_queue_entry 16+#define REP_StgTVarWatchQueue_prev_queue_entry b64+#define StgTVarWatchQueue_prev_queue_entry(__ptr__) REP_StgTVarWatchQueue_prev_queue_entry[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVarWatchQueue_prev_queue_entry]+#define SIZEOF_StgTVar_NoHdr 24+#define SIZEOF_StgTVar (SIZEOF_StgHeader+24)+#define OFFSET_StgTVar_current_value 0+#define REP_StgTVar_current_value b64+#define StgTVar_current_value(__ptr__) REP_StgTVar_current_value[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVar_current_value]+#define OFFSET_StgTVar_first_watch_queue_entry 8+#define REP_StgTVar_first_watch_queue_entry b64+#define StgTVar_first_watch_queue_entry(__ptr__) REP_StgTVar_first_watch_queue_entry[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVar_first_watch_queue_entry]+#define OFFSET_StgTVar_num_updates 16+#define REP_StgTVar_num_updates b64+#define StgTVar_num_updates(__ptr__) REP_StgTVar_num_updates[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVar_num_updates]+#define SIZEOF_StgWeak_NoHdr 40+#define SIZEOF_StgWeak (SIZEOF_StgHeader+40)+#define OFFSET_StgWeak_link 32+#define REP_StgWeak_link b64+#define StgWeak_link(__ptr__) REP_StgWeak_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_link]+#define OFFSET_StgWeak_key 8+#define REP_StgWeak_key b64+#define StgWeak_key(__ptr__) REP_StgWeak_key[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_key]+#define OFFSET_StgWeak_value 16+#define REP_StgWeak_value b64+#define StgWeak_value(__ptr__) REP_StgWeak_value[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_value]+#define OFFSET_StgWeak_finalizer 24+#define REP_StgWeak_finalizer b64+#define StgWeak_finalizer(__ptr__) REP_StgWeak_finalizer[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_finalizer]+#define OFFSET_StgWeak_cfinalizers 0+#define REP_StgWeak_cfinalizers b64+#define StgWeak_cfinalizers(__ptr__) REP_StgWeak_cfinalizers[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_cfinalizers]+#define SIZEOF_StgCFinalizerList_NoHdr 40+#define SIZEOF_StgCFinalizerList (SIZEOF_StgHeader+40)+#define OFFSET_StgCFinalizerList_link 0+#define REP_StgCFinalizerList_link b64+#define StgCFinalizerList_link(__ptr__) REP_StgCFinalizerList_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_link]+#define OFFSET_StgCFinalizerList_fptr 8+#define REP_StgCFinalizerList_fptr b64+#define StgCFinalizerList_fptr(__ptr__) REP_StgCFinalizerList_fptr[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_fptr]+#define OFFSET_StgCFinalizerList_ptr 16+#define REP_StgCFinalizerList_ptr b64+#define StgCFinalizerList_ptr(__ptr__) REP_StgCFinalizerList_ptr[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_ptr]+#define OFFSET_StgCFinalizerList_eptr 24+#define REP_StgCFinalizerList_eptr b64+#define StgCFinalizerList_eptr(__ptr__) REP_StgCFinalizerList_eptr[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_eptr]+#define OFFSET_StgCFinalizerList_flag 32+#define REP_StgCFinalizerList_flag b64+#define StgCFinalizerList_flag(__ptr__) REP_StgCFinalizerList_flag[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_flag]+#define SIZEOF_StgMVar_NoHdr 24+#define SIZEOF_StgMVar (SIZEOF_StgHeader+24)+#define OFFSET_StgMVar_head 0+#define REP_StgMVar_head b64+#define StgMVar_head(__ptr__) REP_StgMVar_head[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVar_head]+#define OFFSET_StgMVar_tail 8+#define REP_StgMVar_tail b64+#define StgMVar_tail(__ptr__) REP_StgMVar_tail[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVar_tail]+#define OFFSET_StgMVar_value 16+#define REP_StgMVar_value b64+#define StgMVar_value(__ptr__) REP_StgMVar_value[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVar_value]+#define SIZEOF_StgMVarTSOQueue_NoHdr 16+#define SIZEOF_StgMVarTSOQueue (SIZEOF_StgHeader+16)+#define OFFSET_StgMVarTSOQueue_link 0+#define REP_StgMVarTSOQueue_link b64+#define StgMVarTSOQueue_link(__ptr__) REP_StgMVarTSOQueue_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVarTSOQueue_link]+#define OFFSET_StgMVarTSOQueue_tso 8+#define REP_StgMVarTSOQueue_tso b64+#define StgMVarTSOQueue_tso(__ptr__) REP_StgMVarTSOQueue_tso[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVarTSOQueue_tso]+#define SIZEOF_StgBCO_NoHdr 32+#define SIZEOF_StgBCO (SIZEOF_StgHeader+32)+#define OFFSET_StgBCO_instrs 0+#define REP_StgBCO_instrs b64+#define StgBCO_instrs(__ptr__) REP_StgBCO_instrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_instrs]+#define OFFSET_StgBCO_literals 8+#define REP_StgBCO_literals b64+#define StgBCO_literals(__ptr__) REP_StgBCO_literals[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_literals]+#define OFFSET_StgBCO_ptrs 16+#define REP_StgBCO_ptrs b64+#define StgBCO_ptrs(__ptr__) REP_StgBCO_ptrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_ptrs]+#define OFFSET_StgBCO_arity 24+#define REP_StgBCO_arity b32+#define StgBCO_arity(__ptr__) REP_StgBCO_arity[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_arity]+#define OFFSET_StgBCO_size 28+#define REP_StgBCO_size b32+#define StgBCO_size(__ptr__) REP_StgBCO_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_size]+#define OFFSET_StgBCO_bitmap 32+#define StgBCO_bitmap(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_bitmap + WDS(__ix__)]+#define SIZEOF_StgStableName_NoHdr 8+#define SIZEOF_StgStableName (SIZEOF_StgHeader+8)+#define OFFSET_StgStableName_sn 0+#define REP_StgStableName_sn b64+#define StgStableName_sn(__ptr__) REP_StgStableName_sn[__ptr__+SIZEOF_StgHeader+OFFSET_StgStableName_sn]+#define SIZEOF_StgBlockingQueue_NoHdr 32+#define SIZEOF_StgBlockingQueue (SIZEOF_StgHeader+32)+#define OFFSET_StgBlockingQueue_bh 8+#define REP_StgBlockingQueue_bh b64+#define StgBlockingQueue_bh(__ptr__) REP_StgBlockingQueue_bh[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_bh]+#define OFFSET_StgBlockingQueue_owner 16+#define REP_StgBlockingQueue_owner b64+#define StgBlockingQueue_owner(__ptr__) REP_StgBlockingQueue_owner[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_owner]+#define OFFSET_StgBlockingQueue_queue 24+#define REP_StgBlockingQueue_queue b64+#define StgBlockingQueue_queue(__ptr__) REP_StgBlockingQueue_queue[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_queue]+#define OFFSET_StgBlockingQueue_link 0+#define REP_StgBlockingQueue_link b64+#define StgBlockingQueue_link(__ptr__) REP_StgBlockingQueue_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_link]+#define SIZEOF_MessageBlackHole_NoHdr 24+#define SIZEOF_MessageBlackHole (SIZEOF_StgHeader+24)+#define OFFSET_MessageBlackHole_link 0+#define REP_MessageBlackHole_link b64+#define MessageBlackHole_link(__ptr__) REP_MessageBlackHole_link[__ptr__+SIZEOF_StgHeader+OFFSET_MessageBlackHole_link]+#define OFFSET_MessageBlackHole_tso 8+#define REP_MessageBlackHole_tso b64+#define MessageBlackHole_tso(__ptr__) REP_MessageBlackHole_tso[__ptr__+SIZEOF_StgHeader+OFFSET_MessageBlackHole_tso]+#define OFFSET_MessageBlackHole_bh 16+#define REP_MessageBlackHole_bh b64+#define MessageBlackHole_bh(__ptr__) REP_MessageBlackHole_bh[__ptr__+SIZEOF_StgHeader+OFFSET_MessageBlackHole_bh]+#define SIZEOF_StgCompactNFData_NoHdr 64+#define SIZEOF_StgCompactNFData (SIZEOF_StgHeader+64)+#define OFFSET_StgCompactNFData_totalW 0+#define REP_StgCompactNFData_totalW b64+#define StgCompactNFData_totalW(__ptr__) REP_StgCompactNFData_totalW[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_totalW]+#define OFFSET_StgCompactNFData_autoBlockW 8+#define REP_StgCompactNFData_autoBlockW b64+#define StgCompactNFData_autoBlockW(__ptr__) REP_StgCompactNFData_autoBlockW[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_autoBlockW]+#define OFFSET_StgCompactNFData_nursery 32+#define REP_StgCompactNFData_nursery b64+#define StgCompactNFData_nursery(__ptr__) REP_StgCompactNFData_nursery[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_nursery]+#define OFFSET_StgCompactNFData_last 40+#define REP_StgCompactNFData_last b64+#define StgCompactNFData_last(__ptr__) REP_StgCompactNFData_last[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_last]+#define OFFSET_StgCompactNFData_hp 16+#define REP_StgCompactNFData_hp b64+#define StgCompactNFData_hp(__ptr__) REP_StgCompactNFData_hp[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_hp]+#define OFFSET_StgCompactNFData_hpLim 24+#define REP_StgCompactNFData_hpLim b64+#define StgCompactNFData_hpLim(__ptr__) REP_StgCompactNFData_hpLim[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_hpLim]+#define OFFSET_StgCompactNFData_hash 48+#define REP_StgCompactNFData_hash b64+#define StgCompactNFData_hash(__ptr__) REP_StgCompactNFData_hash[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_hash]+#define OFFSET_StgCompactNFData_result 56+#define REP_StgCompactNFData_result b64+#define StgCompactNFData_result(__ptr__) REP_StgCompactNFData_result[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_result]+#define SIZEOF_StgCompactNFDataBlock 24+#define OFFSET_StgCompactNFDataBlock_self 0+#define REP_StgCompactNFDataBlock_self b64+#define StgCompactNFDataBlock_self(__ptr__) REP_StgCompactNFDataBlock_self[__ptr__+OFFSET_StgCompactNFDataBlock_self]+#define OFFSET_StgCompactNFDataBlock_owner 8+#define REP_StgCompactNFDataBlock_owner b64+#define StgCompactNFDataBlock_owner(__ptr__) REP_StgCompactNFDataBlock_owner[__ptr__+OFFSET_StgCompactNFDataBlock_owner]+#define OFFSET_StgCompactNFDataBlock_next 16+#define REP_StgCompactNFDataBlock_next b64+#define StgCompactNFDataBlock_next(__ptr__) REP_StgCompactNFDataBlock_next[__ptr__+OFFSET_StgCompactNFDataBlock_next]+#define OFFSET_RtsFlags_ProfFlags_showCCSOnException 269+#define REP_RtsFlags_ProfFlags_showCCSOnException b8+#define RtsFlags_ProfFlags_showCCSOnException(__ptr__) REP_RtsFlags_ProfFlags_showCCSOnException[__ptr__+OFFSET_RtsFlags_ProfFlags_showCCSOnException]+#define OFFSET_RtsFlags_DebugFlags_apply 210+#define REP_RtsFlags_DebugFlags_apply b8+#define RtsFlags_DebugFlags_apply(__ptr__) REP_RtsFlags_DebugFlags_apply[__ptr__+OFFSET_RtsFlags_DebugFlags_apply]+#define OFFSET_RtsFlags_DebugFlags_sanity 206+#define REP_RtsFlags_DebugFlags_sanity b8+#define RtsFlags_DebugFlags_sanity(__ptr__) REP_RtsFlags_DebugFlags_sanity[__ptr__+OFFSET_RtsFlags_DebugFlags_sanity]+#define OFFSET_RtsFlags_DebugFlags_weak 202+#define REP_RtsFlags_DebugFlags_weak b8+#define RtsFlags_DebugFlags_weak(__ptr__) REP_RtsFlags_DebugFlags_weak[__ptr__+OFFSET_RtsFlags_DebugFlags_weak]+#define OFFSET_RtsFlags_GcFlags_initialStkSize 16+#define REP_RtsFlags_GcFlags_initialStkSize b32+#define RtsFlags_GcFlags_initialStkSize(__ptr__) REP_RtsFlags_GcFlags_initialStkSize[__ptr__+OFFSET_RtsFlags_GcFlags_initialStkSize]+#define OFFSET_RtsFlags_MiscFlags_tickInterval 176+#define REP_RtsFlags_MiscFlags_tickInterval b64+#define RtsFlags_MiscFlags_tickInterval(__ptr__) REP_RtsFlags_MiscFlags_tickInterval[__ptr__+OFFSET_RtsFlags_MiscFlags_tickInterval]+#define SIZEOF_StgFunInfoExtraFwd 32+#define OFFSET_StgFunInfoExtraFwd_slow_apply 24+#define REP_StgFunInfoExtraFwd_slow_apply b64+#define StgFunInfoExtraFwd_slow_apply(__ptr__) REP_StgFunInfoExtraFwd_slow_apply[__ptr__+OFFSET_StgFunInfoExtraFwd_slow_apply]+#define OFFSET_StgFunInfoExtraFwd_fun_type 0+#define REP_StgFunInfoExtraFwd_fun_type b32+#define StgFunInfoExtraFwd_fun_type(__ptr__) REP_StgFunInfoExtraFwd_fun_type[__ptr__+OFFSET_StgFunInfoExtraFwd_fun_type]+#define OFFSET_StgFunInfoExtraFwd_arity 4+#define REP_StgFunInfoExtraFwd_arity b32+#define StgFunInfoExtraFwd_arity(__ptr__) REP_StgFunInfoExtraFwd_arity[__ptr__+OFFSET_StgFunInfoExtraFwd_arity]+#define OFFSET_StgFunInfoExtraFwd_bitmap 16+#define REP_StgFunInfoExtraFwd_bitmap b64+#define StgFunInfoExtraFwd_bitmap(__ptr__) REP_StgFunInfoExtraFwd_bitmap[__ptr__+OFFSET_StgFunInfoExtraFwd_bitmap]+#define SIZEOF_StgFunInfoExtraRev 24+#define OFFSET_StgFunInfoExtraRev_slow_apply_offset 0+#define REP_StgFunInfoExtraRev_slow_apply_offset b32+#define StgFunInfoExtraRev_slow_apply_offset(__ptr__) REP_StgFunInfoExtraRev_slow_apply_offset[__ptr__+OFFSET_StgFunInfoExtraRev_slow_apply_offset]+#define OFFSET_StgFunInfoExtraRev_fun_type 16+#define REP_StgFunInfoExtraRev_fun_type b32+#define StgFunInfoExtraRev_fun_type(__ptr__) REP_StgFunInfoExtraRev_fun_type[__ptr__+OFFSET_StgFunInfoExtraRev_fun_type]+#define OFFSET_StgFunInfoExtraRev_arity 20+#define REP_StgFunInfoExtraRev_arity b32+#define StgFunInfoExtraRev_arity(__ptr__) REP_StgFunInfoExtraRev_arity[__ptr__+OFFSET_StgFunInfoExtraRev_arity]+#define OFFSET_StgFunInfoExtraRev_bitmap 8+#define REP_StgFunInfoExtraRev_bitmap b64+#define StgFunInfoExtraRev_bitmap(__ptr__) REP_StgFunInfoExtraRev_bitmap[__ptr__+OFFSET_StgFunInfoExtraRev_bitmap]+#define OFFSET_StgFunInfoExtraRev_bitmap_offset 8+#define REP_StgFunInfoExtraRev_bitmap_offset b32+#define StgFunInfoExtraRev_bitmap_offset(__ptr__) REP_StgFunInfoExtraRev_bitmap_offset[__ptr__+OFFSET_StgFunInfoExtraRev_bitmap_offset]+#define OFFSET_StgLargeBitmap_size 0+#define REP_StgLargeBitmap_size b64+#define StgLargeBitmap_size(__ptr__) REP_StgLargeBitmap_size[__ptr__+OFFSET_StgLargeBitmap_size]+#define OFFSET_StgLargeBitmap_bitmap 8+#define SIZEOF_snEntry 24+#define OFFSET_snEntry_sn_obj 16+#define REP_snEntry_sn_obj b64+#define snEntry_sn_obj(__ptr__) REP_snEntry_sn_obj[__ptr__+OFFSET_snEntry_sn_obj]+#define OFFSET_snEntry_addr 0+#define REP_snEntry_addr b64+#define snEntry_addr(__ptr__) REP_snEntry_addr[__ptr__+OFFSET_snEntry_addr]+#define SIZEOF_spEntry 8+#define OFFSET_spEntry_addr 0+#define REP_spEntry_addr b64+#define spEntry_addr(__ptr__) REP_spEntry_addr[__ptr__+OFFSET_spEntry_addr]
− ghc-lib/generated/GhclibDerivedConstants.h 
@@ -1,554 +0,0 @@-/* This file is created automatically.  Do not edit by hand.*/--#define CONTROL_GROUP_CONST_291 291-#define STD_HDR_SIZE 1-#define PROF_HDR_SIZE 2-#define BLOCK_SIZE 4096-#define MBLOCK_SIZE 1048576-#define BLOCKS_PER_MBLOCK 252-#define TICKY_BIN_COUNT 9-#define OFFSET_StgRegTable_rR1 0-#define OFFSET_StgRegTable_rR2 8-#define OFFSET_StgRegTable_rR3 16-#define OFFSET_StgRegTable_rR4 24-#define OFFSET_StgRegTable_rR5 32-#define OFFSET_StgRegTable_rR6 40-#define OFFSET_StgRegTable_rR7 48-#define OFFSET_StgRegTable_rR8 56-#define OFFSET_StgRegTable_rR9 64-#define OFFSET_StgRegTable_rR10 72-#define OFFSET_StgRegTable_rF1 80-#define OFFSET_StgRegTable_rF2 84-#define OFFSET_StgRegTable_rF3 88-#define OFFSET_StgRegTable_rF4 92-#define OFFSET_StgRegTable_rF5 96-#define OFFSET_StgRegTable_rF6 100-#define OFFSET_StgRegTable_rD1 104-#define OFFSET_StgRegTable_rD2 112-#define OFFSET_StgRegTable_rD3 120-#define OFFSET_StgRegTable_rD4 128-#define OFFSET_StgRegTable_rD5 136-#define OFFSET_StgRegTable_rD6 144-#define OFFSET_StgRegTable_rXMM1 152-#define OFFSET_StgRegTable_rXMM2 168-#define OFFSET_StgRegTable_rXMM3 184-#define OFFSET_StgRegTable_rXMM4 200-#define OFFSET_StgRegTable_rXMM5 216-#define OFFSET_StgRegTable_rXMM6 232-#define OFFSET_StgRegTable_rYMM1 248-#define OFFSET_StgRegTable_rYMM2 280-#define OFFSET_StgRegTable_rYMM3 312-#define OFFSET_StgRegTable_rYMM4 344-#define OFFSET_StgRegTable_rYMM5 376-#define OFFSET_StgRegTable_rYMM6 408-#define OFFSET_StgRegTable_rZMM1 440-#define OFFSET_StgRegTable_rZMM2 504-#define OFFSET_StgRegTable_rZMM3 568-#define OFFSET_StgRegTable_rZMM4 632-#define OFFSET_StgRegTable_rZMM5 696-#define OFFSET_StgRegTable_rZMM6 760-#define OFFSET_StgRegTable_rL1 824-#define OFFSET_StgRegTable_rSp 832-#define OFFSET_StgRegTable_rSpLim 840-#define OFFSET_StgRegTable_rHp 848-#define OFFSET_StgRegTable_rHpLim 856-#define OFFSET_StgRegTable_rCCCS 864-#define OFFSET_StgRegTable_rCurrentTSO 872-#define OFFSET_StgRegTable_rCurrentNursery 888-#define OFFSET_StgRegTable_rHpAlloc 904-#define OFFSET_StgRegTable_rRet 912-#define REP_StgRegTable_rRet b64-#define StgRegTable_rRet(__ptr__) REP_StgRegTable_rRet[__ptr__+OFFSET_StgRegTable_rRet]-#define OFFSET_StgRegTable_rNursery 880-#define REP_StgRegTable_rNursery b64-#define StgRegTable_rNursery(__ptr__) REP_StgRegTable_rNursery[__ptr__+OFFSET_StgRegTable_rNursery]-#define OFFSET_stgEagerBlackholeInfo -24-#define OFFSET_stgGCEnter1 -16-#define OFFSET_stgGCFun -8-#define OFFSET_Capability_r 24-#define OFFSET_Capability_lock 1096-#define OFFSET_Capability_no 944-#define REP_Capability_no b32-#define Capability_no(__ptr__) REP_Capability_no[__ptr__+OFFSET_Capability_no]-#define OFFSET_Capability_mut_lists 1016-#define REP_Capability_mut_lists b64-#define Capability_mut_lists(__ptr__) REP_Capability_mut_lists[__ptr__+OFFSET_Capability_mut_lists]-#define OFFSET_Capability_context_switch 1064-#define REP_Capability_context_switch b32-#define Capability_context_switch(__ptr__) REP_Capability_context_switch[__ptr__+OFFSET_Capability_context_switch]-#define OFFSET_Capability_interrupt 1068-#define REP_Capability_interrupt b32-#define Capability_interrupt(__ptr__) REP_Capability_interrupt[__ptr__+OFFSET_Capability_interrupt]-#define OFFSET_Capability_sparks 1200-#define REP_Capability_sparks b64-#define Capability_sparks(__ptr__) REP_Capability_sparks[__ptr__+OFFSET_Capability_sparks]-#define OFFSET_Capability_total_allocated 1072-#define REP_Capability_total_allocated b64-#define Capability_total_allocated(__ptr__) REP_Capability_total_allocated[__ptr__+OFFSET_Capability_total_allocated]-#define OFFSET_Capability_weak_ptr_list_hd 1048-#define REP_Capability_weak_ptr_list_hd b64-#define Capability_weak_ptr_list_hd(__ptr__) REP_Capability_weak_ptr_list_hd[__ptr__+OFFSET_Capability_weak_ptr_list_hd]-#define OFFSET_Capability_weak_ptr_list_tl 1056-#define REP_Capability_weak_ptr_list_tl b64-#define Capability_weak_ptr_list_tl(__ptr__) REP_Capability_weak_ptr_list_tl[__ptr__+OFFSET_Capability_weak_ptr_list_tl]-#define OFFSET_bdescr_start 0-#define REP_bdescr_start b64-#define bdescr_start(__ptr__) REP_bdescr_start[__ptr__+OFFSET_bdescr_start]-#define OFFSET_bdescr_free 8-#define REP_bdescr_free b64-#define bdescr_free(__ptr__) REP_bdescr_free[__ptr__+OFFSET_bdescr_free]-#define OFFSET_bdescr_blocks 48-#define REP_bdescr_blocks b32-#define bdescr_blocks(__ptr__) REP_bdescr_blocks[__ptr__+OFFSET_bdescr_blocks]-#define OFFSET_bdescr_gen_no 40-#define REP_bdescr_gen_no b16-#define bdescr_gen_no(__ptr__) REP_bdescr_gen_no[__ptr__+OFFSET_bdescr_gen_no]-#define OFFSET_bdescr_link 16-#define REP_bdescr_link b64-#define bdescr_link(__ptr__) REP_bdescr_link[__ptr__+OFFSET_bdescr_link]-#define OFFSET_bdescr_flags 46-#define REP_bdescr_flags b16-#define bdescr_flags(__ptr__) REP_bdescr_flags[__ptr__+OFFSET_bdescr_flags]-#define SIZEOF_generation 384-#define OFFSET_generation_n_new_large_words 56-#define REP_generation_n_new_large_words b64-#define generation_n_new_large_words(__ptr__) REP_generation_n_new_large_words[__ptr__+OFFSET_generation_n_new_large_words]-#define OFFSET_generation_weak_ptr_list 112-#define REP_generation_weak_ptr_list b64-#define generation_weak_ptr_list(__ptr__) REP_generation_weak_ptr_list[__ptr__+OFFSET_generation_weak_ptr_list]-#define SIZEOF_CostCentreStack 96-#define OFFSET_CostCentreStack_ccsID 0-#define REP_CostCentreStack_ccsID b64-#define CostCentreStack_ccsID(__ptr__) REP_CostCentreStack_ccsID[__ptr__+OFFSET_CostCentreStack_ccsID]-#define OFFSET_CostCentreStack_mem_alloc 72-#define REP_CostCentreStack_mem_alloc b64-#define CostCentreStack_mem_alloc(__ptr__) REP_CostCentreStack_mem_alloc[__ptr__+OFFSET_CostCentreStack_mem_alloc]-#define OFFSET_CostCentreStack_scc_count 48-#define REP_CostCentreStack_scc_count b64-#define CostCentreStack_scc_count(__ptr__) REP_CostCentreStack_scc_count[__ptr__+OFFSET_CostCentreStack_scc_count]-#define OFFSET_CostCentreStack_prevStack 16-#define REP_CostCentreStack_prevStack b64-#define CostCentreStack_prevStack(__ptr__) REP_CostCentreStack_prevStack[__ptr__+OFFSET_CostCentreStack_prevStack]-#define OFFSET_CostCentre_ccID 0-#define REP_CostCentre_ccID b64-#define CostCentre_ccID(__ptr__) REP_CostCentre_ccID[__ptr__+OFFSET_CostCentre_ccID]-#define OFFSET_CostCentre_link 56-#define REP_CostCentre_link b64-#define CostCentre_link(__ptr__) REP_CostCentre_link[__ptr__+OFFSET_CostCentre_link]-#define OFFSET_StgHeader_info 0-#define REP_StgHeader_info b64-#define StgHeader_info(__ptr__) REP_StgHeader_info[__ptr__+OFFSET_StgHeader_info]-#define OFFSET_StgHeader_ccs 8-#define REP_StgHeader_ccs b64-#define StgHeader_ccs(__ptr__) REP_StgHeader_ccs[__ptr__+OFFSET_StgHeader_ccs]-#define OFFSET_StgHeader_ldvw 16-#define REP_StgHeader_ldvw b64-#define StgHeader_ldvw(__ptr__) REP_StgHeader_ldvw[__ptr__+OFFSET_StgHeader_ldvw]-#define SIZEOF_StgSMPThunkHeader 8-#define OFFSET_StgClosure_payload 0-#define StgClosure_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgClosure_payload + WDS(__ix__)]-#define OFFSET_StgEntCounter_allocs 48-#define REP_StgEntCounter_allocs b64-#define StgEntCounter_allocs(__ptr__) REP_StgEntCounter_allocs[__ptr__+OFFSET_StgEntCounter_allocs]-#define OFFSET_StgEntCounter_allocd 16-#define REP_StgEntCounter_allocd b64-#define StgEntCounter_allocd(__ptr__) REP_StgEntCounter_allocd[__ptr__+OFFSET_StgEntCounter_allocd]-#define OFFSET_StgEntCounter_registeredp 0-#define REP_StgEntCounter_registeredp b64-#define StgEntCounter_registeredp(__ptr__) REP_StgEntCounter_registeredp[__ptr__+OFFSET_StgEntCounter_registeredp]-#define OFFSET_StgEntCounter_link 56-#define REP_StgEntCounter_link b64-#define StgEntCounter_link(__ptr__) REP_StgEntCounter_link[__ptr__+OFFSET_StgEntCounter_link]-#define OFFSET_StgEntCounter_entry_count 40-#define REP_StgEntCounter_entry_count b64-#define StgEntCounter_entry_count(__ptr__) REP_StgEntCounter_entry_count[__ptr__+OFFSET_StgEntCounter_entry_count]-#define SIZEOF_StgUpdateFrame_NoHdr 8-#define SIZEOF_StgUpdateFrame (SIZEOF_StgHeader+8)-#define SIZEOF_StgCatchFrame_NoHdr 16-#define SIZEOF_StgCatchFrame (SIZEOF_StgHeader+16)-#define SIZEOF_StgStopFrame_NoHdr 0-#define SIZEOF_StgStopFrame (SIZEOF_StgHeader+0)-#define SIZEOF_StgMutArrPtrs_NoHdr 16-#define SIZEOF_StgMutArrPtrs (SIZEOF_StgHeader+16)-#define OFFSET_StgMutArrPtrs_ptrs 0-#define REP_StgMutArrPtrs_ptrs b64-#define StgMutArrPtrs_ptrs(__ptr__) REP_StgMutArrPtrs_ptrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgMutArrPtrs_ptrs]-#define OFFSET_StgMutArrPtrs_size 8-#define REP_StgMutArrPtrs_size b64-#define StgMutArrPtrs_size(__ptr__) REP_StgMutArrPtrs_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgMutArrPtrs_size]-#define SIZEOF_StgSmallMutArrPtrs_NoHdr 8-#define SIZEOF_StgSmallMutArrPtrs (SIZEOF_StgHeader+8)-#define OFFSET_StgSmallMutArrPtrs_ptrs 0-#define REP_StgSmallMutArrPtrs_ptrs b64-#define StgSmallMutArrPtrs_ptrs(__ptr__) REP_StgSmallMutArrPtrs_ptrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgSmallMutArrPtrs_ptrs]-#define SIZEOF_StgArrBytes_NoHdr 8-#define SIZEOF_StgArrBytes (SIZEOF_StgHeader+8)-#define OFFSET_StgArrBytes_bytes 0-#define REP_StgArrBytes_bytes b64-#define StgArrBytes_bytes(__ptr__) REP_StgArrBytes_bytes[__ptr__+SIZEOF_StgHeader+OFFSET_StgArrBytes_bytes]-#define OFFSET_StgArrBytes_payload 8-#define StgArrBytes_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgArrBytes_payload + WDS(__ix__)]-#define OFFSET_StgTSO__link 0-#define REP_StgTSO__link b64-#define StgTSO__link(__ptr__) REP_StgTSO__link[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO__link]-#define OFFSET_StgTSO_global_link 8-#define REP_StgTSO_global_link b64-#define StgTSO_global_link(__ptr__) REP_StgTSO_global_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_global_link]-#define OFFSET_StgTSO_what_next 24-#define REP_StgTSO_what_next b16-#define StgTSO_what_next(__ptr__) REP_StgTSO_what_next[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_what_next]-#define OFFSET_StgTSO_why_blocked 26-#define REP_StgTSO_why_blocked b16-#define StgTSO_why_blocked(__ptr__) REP_StgTSO_why_blocked[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_why_blocked]-#define OFFSET_StgTSO_block_info 32-#define REP_StgTSO_block_info b64-#define StgTSO_block_info(__ptr__) REP_StgTSO_block_info[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_block_info]-#define OFFSET_StgTSO_blocked_exceptions 80-#define REP_StgTSO_blocked_exceptions b64-#define StgTSO_blocked_exceptions(__ptr__) REP_StgTSO_blocked_exceptions[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_blocked_exceptions]-#define OFFSET_StgTSO_id 40-#define REP_StgTSO_id b32-#define StgTSO_id(__ptr__) REP_StgTSO_id[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_id]-#define OFFSET_StgTSO_cap 64-#define REP_StgTSO_cap b64-#define StgTSO_cap(__ptr__) REP_StgTSO_cap[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_cap]-#define OFFSET_StgTSO_saved_errno 44-#define REP_StgTSO_saved_errno b32-#define StgTSO_saved_errno(__ptr__) REP_StgTSO_saved_errno[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_saved_errno]-#define OFFSET_StgTSO_trec 72-#define REP_StgTSO_trec b64-#define StgTSO_trec(__ptr__) REP_StgTSO_trec[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_trec]-#define OFFSET_StgTSO_flags 28-#define REP_StgTSO_flags b32-#define StgTSO_flags(__ptr__) REP_StgTSO_flags[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_flags]-#define OFFSET_StgTSO_dirty 48-#define REP_StgTSO_dirty b32-#define StgTSO_dirty(__ptr__) REP_StgTSO_dirty[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_dirty]-#define OFFSET_StgTSO_bq 88-#define REP_StgTSO_bq b64-#define StgTSO_bq(__ptr__) REP_StgTSO_bq[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_bq]-#define OFFSET_StgTSO_alloc_limit 96-#define REP_StgTSO_alloc_limit b64-#define StgTSO_alloc_limit(__ptr__) REP_StgTSO_alloc_limit[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_alloc_limit]-#define OFFSET_StgTSO_cccs 112-#define REP_StgTSO_cccs b64-#define StgTSO_cccs(__ptr__) REP_StgTSO_cccs[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_cccs]-#define OFFSET_StgTSO_stackobj 16-#define REP_StgTSO_stackobj b64-#define StgTSO_stackobj(__ptr__) REP_StgTSO_stackobj[__ptr__+SIZEOF_StgHeader+OFFSET_StgTSO_stackobj]-#define OFFSET_StgStack_sp 8-#define REP_StgStack_sp b64-#define StgStack_sp(__ptr__) REP_StgStack_sp[__ptr__+SIZEOF_StgHeader+OFFSET_StgStack_sp]-#define OFFSET_StgStack_stack 16-#define OFFSET_StgStack_stack_size 0-#define REP_StgStack_stack_size b32-#define StgStack_stack_size(__ptr__) REP_StgStack_stack_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgStack_stack_size]-#define OFFSET_StgStack_dirty 4-#define REP_StgStack_dirty b32-#define StgStack_dirty(__ptr__) REP_StgStack_dirty[__ptr__+SIZEOF_StgHeader+OFFSET_StgStack_dirty]-#define SIZEOF_StgTSOProfInfo 8-#define OFFSET_StgUpdateFrame_updatee 0-#define REP_StgUpdateFrame_updatee b64-#define StgUpdateFrame_updatee(__ptr__) REP_StgUpdateFrame_updatee[__ptr__+SIZEOF_StgHeader+OFFSET_StgUpdateFrame_updatee]-#define OFFSET_StgCatchFrame_handler 8-#define REP_StgCatchFrame_handler b64-#define StgCatchFrame_handler(__ptr__) REP_StgCatchFrame_handler[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchFrame_handler]-#define OFFSET_StgCatchFrame_exceptions_blocked 0-#define REP_StgCatchFrame_exceptions_blocked b64-#define StgCatchFrame_exceptions_blocked(__ptr__) REP_StgCatchFrame_exceptions_blocked[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchFrame_exceptions_blocked]-#define SIZEOF_StgPAP_NoHdr 16-#define SIZEOF_StgPAP (SIZEOF_StgHeader+16)-#define OFFSET_StgPAP_n_args 4-#define REP_StgPAP_n_args b32-#define StgPAP_n_args(__ptr__) REP_StgPAP_n_args[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_n_args]-#define OFFSET_StgPAP_fun 8-#define REP_StgPAP_fun gcptr-#define StgPAP_fun(__ptr__) REP_StgPAP_fun[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_fun]-#define OFFSET_StgPAP_arity 0-#define REP_StgPAP_arity b32-#define StgPAP_arity(__ptr__) REP_StgPAP_arity[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_arity]-#define OFFSET_StgPAP_payload 16-#define StgPAP_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgPAP_payload + WDS(__ix__)]-#define SIZEOF_StgAP_NoThunkHdr 16-#define SIZEOF_StgAP_NoHdr 24-#define SIZEOF_StgAP (SIZEOF_StgHeader+24)-#define OFFSET_StgAP_n_args 12-#define REP_StgAP_n_args b32-#define StgAP_n_args(__ptr__) REP_StgAP_n_args[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_n_args]-#define OFFSET_StgAP_fun 16-#define REP_StgAP_fun gcptr-#define StgAP_fun(__ptr__) REP_StgAP_fun[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_fun]-#define OFFSET_StgAP_payload 24-#define StgAP_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_payload + WDS(__ix__)]-#define SIZEOF_StgAP_STACK_NoThunkHdr 16-#define SIZEOF_StgAP_STACK_NoHdr 24-#define SIZEOF_StgAP_STACK (SIZEOF_StgHeader+24)-#define OFFSET_StgAP_STACK_size 8-#define REP_StgAP_STACK_size b64-#define StgAP_STACK_size(__ptr__) REP_StgAP_STACK_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_STACK_size]-#define OFFSET_StgAP_STACK_fun 16-#define REP_StgAP_STACK_fun gcptr-#define StgAP_STACK_fun(__ptr__) REP_StgAP_STACK_fun[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_STACK_fun]-#define OFFSET_StgAP_STACK_payload 24-#define StgAP_STACK_payload(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgAP_STACK_payload + WDS(__ix__)]-#define SIZEOF_StgSelector_NoThunkHdr 8-#define SIZEOF_StgSelector_NoHdr 16-#define SIZEOF_StgSelector (SIZEOF_StgHeader+16)-#define OFFSET_StgInd_indirectee 0-#define REP_StgInd_indirectee gcptr-#define StgInd_indirectee(__ptr__) REP_StgInd_indirectee[__ptr__+SIZEOF_StgHeader+OFFSET_StgInd_indirectee]-#define SIZEOF_StgMutVar_NoHdr 8-#define SIZEOF_StgMutVar (SIZEOF_StgHeader+8)-#define OFFSET_StgMutVar_var 0-#define REP_StgMutVar_var b64-#define StgMutVar_var(__ptr__) REP_StgMutVar_var[__ptr__+SIZEOF_StgHeader+OFFSET_StgMutVar_var]-#define SIZEOF_StgAtomicallyFrame_NoHdr 16-#define SIZEOF_StgAtomicallyFrame (SIZEOF_StgHeader+16)-#define OFFSET_StgAtomicallyFrame_code 0-#define REP_StgAtomicallyFrame_code b64-#define StgAtomicallyFrame_code(__ptr__) REP_StgAtomicallyFrame_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgAtomicallyFrame_code]-#define OFFSET_StgAtomicallyFrame_result 8-#define REP_StgAtomicallyFrame_result b64-#define StgAtomicallyFrame_result(__ptr__) REP_StgAtomicallyFrame_result[__ptr__+SIZEOF_StgHeader+OFFSET_StgAtomicallyFrame_result]-#define OFFSET_StgTRecHeader_enclosing_trec 0-#define REP_StgTRecHeader_enclosing_trec b64-#define StgTRecHeader_enclosing_trec(__ptr__) REP_StgTRecHeader_enclosing_trec[__ptr__+SIZEOF_StgHeader+OFFSET_StgTRecHeader_enclosing_trec]-#define SIZEOF_StgCatchSTMFrame_NoHdr 16-#define SIZEOF_StgCatchSTMFrame (SIZEOF_StgHeader+16)-#define OFFSET_StgCatchSTMFrame_handler 8-#define REP_StgCatchSTMFrame_handler b64-#define StgCatchSTMFrame_handler(__ptr__) REP_StgCatchSTMFrame_handler[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchSTMFrame_handler]-#define OFFSET_StgCatchSTMFrame_code 0-#define REP_StgCatchSTMFrame_code b64-#define StgCatchSTMFrame_code(__ptr__) REP_StgCatchSTMFrame_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchSTMFrame_code]-#define SIZEOF_StgCatchRetryFrame_NoHdr 24-#define SIZEOF_StgCatchRetryFrame (SIZEOF_StgHeader+24)-#define OFFSET_StgCatchRetryFrame_running_alt_code 0-#define REP_StgCatchRetryFrame_running_alt_code b64-#define StgCatchRetryFrame_running_alt_code(__ptr__) REP_StgCatchRetryFrame_running_alt_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchRetryFrame_running_alt_code]-#define OFFSET_StgCatchRetryFrame_first_code 8-#define REP_StgCatchRetryFrame_first_code b64-#define StgCatchRetryFrame_first_code(__ptr__) REP_StgCatchRetryFrame_first_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchRetryFrame_first_code]-#define OFFSET_StgCatchRetryFrame_alt_code 16-#define REP_StgCatchRetryFrame_alt_code b64-#define StgCatchRetryFrame_alt_code(__ptr__) REP_StgCatchRetryFrame_alt_code[__ptr__+SIZEOF_StgHeader+OFFSET_StgCatchRetryFrame_alt_code]-#define OFFSET_StgTVarWatchQueue_closure 0-#define REP_StgTVarWatchQueue_closure b64-#define StgTVarWatchQueue_closure(__ptr__) REP_StgTVarWatchQueue_closure[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVarWatchQueue_closure]-#define OFFSET_StgTVarWatchQueue_next_queue_entry 8-#define REP_StgTVarWatchQueue_next_queue_entry b64-#define StgTVarWatchQueue_next_queue_entry(__ptr__) REP_StgTVarWatchQueue_next_queue_entry[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVarWatchQueue_next_queue_entry]-#define OFFSET_StgTVarWatchQueue_prev_queue_entry 16-#define REP_StgTVarWatchQueue_prev_queue_entry b64-#define StgTVarWatchQueue_prev_queue_entry(__ptr__) REP_StgTVarWatchQueue_prev_queue_entry[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVarWatchQueue_prev_queue_entry]-#define SIZEOF_StgTVar_NoHdr 24-#define SIZEOF_StgTVar (SIZEOF_StgHeader+24)-#define OFFSET_StgTVar_current_value 0-#define REP_StgTVar_current_value b64-#define StgTVar_current_value(__ptr__) REP_StgTVar_current_value[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVar_current_value]-#define OFFSET_StgTVar_first_watch_queue_entry 8-#define REP_StgTVar_first_watch_queue_entry b64-#define StgTVar_first_watch_queue_entry(__ptr__) REP_StgTVar_first_watch_queue_entry[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVar_first_watch_queue_entry]-#define OFFSET_StgTVar_num_updates 16-#define REP_StgTVar_num_updates b64-#define StgTVar_num_updates(__ptr__) REP_StgTVar_num_updates[__ptr__+SIZEOF_StgHeader+OFFSET_StgTVar_num_updates]-#define SIZEOF_StgWeak_NoHdr 40-#define SIZEOF_StgWeak (SIZEOF_StgHeader+40)-#define OFFSET_StgWeak_link 32-#define REP_StgWeak_link b64-#define StgWeak_link(__ptr__) REP_StgWeak_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_link]-#define OFFSET_StgWeak_key 8-#define REP_StgWeak_key b64-#define StgWeak_key(__ptr__) REP_StgWeak_key[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_key]-#define OFFSET_StgWeak_value 16-#define REP_StgWeak_value b64-#define StgWeak_value(__ptr__) REP_StgWeak_value[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_value]-#define OFFSET_StgWeak_finalizer 24-#define REP_StgWeak_finalizer b64-#define StgWeak_finalizer(__ptr__) REP_StgWeak_finalizer[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_finalizer]-#define OFFSET_StgWeak_cfinalizers 0-#define REP_StgWeak_cfinalizers b64-#define StgWeak_cfinalizers(__ptr__) REP_StgWeak_cfinalizers[__ptr__+SIZEOF_StgHeader+OFFSET_StgWeak_cfinalizers]-#define SIZEOF_StgCFinalizerList_NoHdr 40-#define SIZEOF_StgCFinalizerList (SIZEOF_StgHeader+40)-#define OFFSET_StgCFinalizerList_link 0-#define REP_StgCFinalizerList_link b64-#define StgCFinalizerList_link(__ptr__) REP_StgCFinalizerList_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_link]-#define OFFSET_StgCFinalizerList_fptr 8-#define REP_StgCFinalizerList_fptr b64-#define StgCFinalizerList_fptr(__ptr__) REP_StgCFinalizerList_fptr[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_fptr]-#define OFFSET_StgCFinalizerList_ptr 16-#define REP_StgCFinalizerList_ptr b64-#define StgCFinalizerList_ptr(__ptr__) REP_StgCFinalizerList_ptr[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_ptr]-#define OFFSET_StgCFinalizerList_eptr 24-#define REP_StgCFinalizerList_eptr b64-#define StgCFinalizerList_eptr(__ptr__) REP_StgCFinalizerList_eptr[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_eptr]-#define OFFSET_StgCFinalizerList_flag 32-#define REP_StgCFinalizerList_flag b64-#define StgCFinalizerList_flag(__ptr__) REP_StgCFinalizerList_flag[__ptr__+SIZEOF_StgHeader+OFFSET_StgCFinalizerList_flag]-#define SIZEOF_StgMVar_NoHdr 24-#define SIZEOF_StgMVar (SIZEOF_StgHeader+24)-#define OFFSET_StgMVar_head 0-#define REP_StgMVar_head b64-#define StgMVar_head(__ptr__) REP_StgMVar_head[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVar_head]-#define OFFSET_StgMVar_tail 8-#define REP_StgMVar_tail b64-#define StgMVar_tail(__ptr__) REP_StgMVar_tail[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVar_tail]-#define OFFSET_StgMVar_value 16-#define REP_StgMVar_value b64-#define StgMVar_value(__ptr__) REP_StgMVar_value[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVar_value]-#define SIZEOF_StgMVarTSOQueue_NoHdr 16-#define SIZEOF_StgMVarTSOQueue (SIZEOF_StgHeader+16)-#define OFFSET_StgMVarTSOQueue_link 0-#define REP_StgMVarTSOQueue_link b64-#define StgMVarTSOQueue_link(__ptr__) REP_StgMVarTSOQueue_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVarTSOQueue_link]-#define OFFSET_StgMVarTSOQueue_tso 8-#define REP_StgMVarTSOQueue_tso b64-#define StgMVarTSOQueue_tso(__ptr__) REP_StgMVarTSOQueue_tso[__ptr__+SIZEOF_StgHeader+OFFSET_StgMVarTSOQueue_tso]-#define SIZEOF_StgBCO_NoHdr 32-#define SIZEOF_StgBCO (SIZEOF_StgHeader+32)-#define OFFSET_StgBCO_instrs 0-#define REP_StgBCO_instrs b64-#define StgBCO_instrs(__ptr__) REP_StgBCO_instrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_instrs]-#define OFFSET_StgBCO_literals 8-#define REP_StgBCO_literals b64-#define StgBCO_literals(__ptr__) REP_StgBCO_literals[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_literals]-#define OFFSET_StgBCO_ptrs 16-#define REP_StgBCO_ptrs b64-#define StgBCO_ptrs(__ptr__) REP_StgBCO_ptrs[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_ptrs]-#define OFFSET_StgBCO_arity 24-#define REP_StgBCO_arity b32-#define StgBCO_arity(__ptr__) REP_StgBCO_arity[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_arity]-#define OFFSET_StgBCO_size 28-#define REP_StgBCO_size b32-#define StgBCO_size(__ptr__) REP_StgBCO_size[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_size]-#define OFFSET_StgBCO_bitmap 32-#define StgBCO_bitmap(__ptr__,__ix__) W_[__ptr__+SIZEOF_StgHeader+OFFSET_StgBCO_bitmap + WDS(__ix__)]-#define SIZEOF_StgStableName_NoHdr 8-#define SIZEOF_StgStableName (SIZEOF_StgHeader+8)-#define OFFSET_StgStableName_sn 0-#define REP_StgStableName_sn b64-#define StgStableName_sn(__ptr__) REP_StgStableName_sn[__ptr__+SIZEOF_StgHeader+OFFSET_StgStableName_sn]-#define SIZEOF_StgBlockingQueue_NoHdr 32-#define SIZEOF_StgBlockingQueue (SIZEOF_StgHeader+32)-#define OFFSET_StgBlockingQueue_bh 8-#define REP_StgBlockingQueue_bh b64-#define StgBlockingQueue_bh(__ptr__) REP_StgBlockingQueue_bh[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_bh]-#define OFFSET_StgBlockingQueue_owner 16-#define REP_StgBlockingQueue_owner b64-#define StgBlockingQueue_owner(__ptr__) REP_StgBlockingQueue_owner[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_owner]-#define OFFSET_StgBlockingQueue_queue 24-#define REP_StgBlockingQueue_queue b64-#define StgBlockingQueue_queue(__ptr__) REP_StgBlockingQueue_queue[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_queue]-#define OFFSET_StgBlockingQueue_link 0-#define REP_StgBlockingQueue_link b64-#define StgBlockingQueue_link(__ptr__) REP_StgBlockingQueue_link[__ptr__+SIZEOF_StgHeader+OFFSET_StgBlockingQueue_link]-#define SIZEOF_MessageBlackHole_NoHdr 24-#define SIZEOF_MessageBlackHole (SIZEOF_StgHeader+24)-#define OFFSET_MessageBlackHole_link 0-#define REP_MessageBlackHole_link b64-#define MessageBlackHole_link(__ptr__) REP_MessageBlackHole_link[__ptr__+SIZEOF_StgHeader+OFFSET_MessageBlackHole_link]-#define OFFSET_MessageBlackHole_tso 8-#define REP_MessageBlackHole_tso b64-#define MessageBlackHole_tso(__ptr__) REP_MessageBlackHole_tso[__ptr__+SIZEOF_StgHeader+OFFSET_MessageBlackHole_tso]-#define OFFSET_MessageBlackHole_bh 16-#define REP_MessageBlackHole_bh b64-#define MessageBlackHole_bh(__ptr__) REP_MessageBlackHole_bh[__ptr__+SIZEOF_StgHeader+OFFSET_MessageBlackHole_bh]-#define SIZEOF_StgCompactNFData_NoHdr 64-#define SIZEOF_StgCompactNFData (SIZEOF_StgHeader+64)-#define OFFSET_StgCompactNFData_totalW 0-#define REP_StgCompactNFData_totalW b64-#define StgCompactNFData_totalW(__ptr__) REP_StgCompactNFData_totalW[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_totalW]-#define OFFSET_StgCompactNFData_autoBlockW 8-#define REP_StgCompactNFData_autoBlockW b64-#define StgCompactNFData_autoBlockW(__ptr__) REP_StgCompactNFData_autoBlockW[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_autoBlockW]-#define OFFSET_StgCompactNFData_nursery 32-#define REP_StgCompactNFData_nursery b64-#define StgCompactNFData_nursery(__ptr__) REP_StgCompactNFData_nursery[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_nursery]-#define OFFSET_StgCompactNFData_last 40-#define REP_StgCompactNFData_last b64-#define StgCompactNFData_last(__ptr__) REP_StgCompactNFData_last[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_last]-#define OFFSET_StgCompactNFData_hp 16-#define REP_StgCompactNFData_hp b64-#define StgCompactNFData_hp(__ptr__) REP_StgCompactNFData_hp[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_hp]-#define OFFSET_StgCompactNFData_hpLim 24-#define REP_StgCompactNFData_hpLim b64-#define StgCompactNFData_hpLim(__ptr__) REP_StgCompactNFData_hpLim[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_hpLim]-#define OFFSET_StgCompactNFData_hash 48-#define REP_StgCompactNFData_hash b64-#define StgCompactNFData_hash(__ptr__) REP_StgCompactNFData_hash[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_hash]-#define OFFSET_StgCompactNFData_result 56-#define REP_StgCompactNFData_result b64-#define StgCompactNFData_result(__ptr__) REP_StgCompactNFData_result[__ptr__+SIZEOF_StgHeader+OFFSET_StgCompactNFData_result]-#define SIZEOF_StgCompactNFDataBlock 24-#define OFFSET_StgCompactNFDataBlock_self 0-#define REP_StgCompactNFDataBlock_self b64-#define StgCompactNFDataBlock_self(__ptr__) REP_StgCompactNFDataBlock_self[__ptr__+OFFSET_StgCompactNFDataBlock_self]-#define OFFSET_StgCompactNFDataBlock_owner 8-#define REP_StgCompactNFDataBlock_owner b64-#define StgCompactNFDataBlock_owner(__ptr__) REP_StgCompactNFDataBlock_owner[__ptr__+OFFSET_StgCompactNFDataBlock_owner]-#define OFFSET_StgCompactNFDataBlock_next 16-#define REP_StgCompactNFDataBlock_next b64-#define StgCompactNFDataBlock_next(__ptr__) REP_StgCompactNFDataBlock_next[__ptr__+OFFSET_StgCompactNFDataBlock_next]-#define OFFSET_RtsFlags_ProfFlags_showCCSOnException 269-#define REP_RtsFlags_ProfFlags_showCCSOnException b8-#define RtsFlags_ProfFlags_showCCSOnException(__ptr__) REP_RtsFlags_ProfFlags_showCCSOnException[__ptr__+OFFSET_RtsFlags_ProfFlags_showCCSOnException]-#define OFFSET_RtsFlags_DebugFlags_apply 210-#define REP_RtsFlags_DebugFlags_apply b8-#define RtsFlags_DebugFlags_apply(__ptr__) REP_RtsFlags_DebugFlags_apply[__ptr__+OFFSET_RtsFlags_DebugFlags_apply]-#define OFFSET_RtsFlags_DebugFlags_sanity 206-#define REP_RtsFlags_DebugFlags_sanity b8-#define RtsFlags_DebugFlags_sanity(__ptr__) REP_RtsFlags_DebugFlags_sanity[__ptr__+OFFSET_RtsFlags_DebugFlags_sanity]-#define OFFSET_RtsFlags_DebugFlags_weak 202-#define REP_RtsFlags_DebugFlags_weak b8-#define RtsFlags_DebugFlags_weak(__ptr__) REP_RtsFlags_DebugFlags_weak[__ptr__+OFFSET_RtsFlags_DebugFlags_weak]-#define OFFSET_RtsFlags_GcFlags_initialStkSize 16-#define REP_RtsFlags_GcFlags_initialStkSize b32-#define RtsFlags_GcFlags_initialStkSize(__ptr__) REP_RtsFlags_GcFlags_initialStkSize[__ptr__+OFFSET_RtsFlags_GcFlags_initialStkSize]-#define OFFSET_RtsFlags_MiscFlags_tickInterval 176-#define REP_RtsFlags_MiscFlags_tickInterval b64-#define RtsFlags_MiscFlags_tickInterval(__ptr__) REP_RtsFlags_MiscFlags_tickInterval[__ptr__+OFFSET_RtsFlags_MiscFlags_tickInterval]-#define SIZEOF_StgFunInfoExtraFwd 32-#define OFFSET_StgFunInfoExtraFwd_slow_apply 24-#define REP_StgFunInfoExtraFwd_slow_apply b64-#define StgFunInfoExtraFwd_slow_apply(__ptr__) REP_StgFunInfoExtraFwd_slow_apply[__ptr__+OFFSET_StgFunInfoExtraFwd_slow_apply]-#define OFFSET_StgFunInfoExtraFwd_fun_type 0-#define REP_StgFunInfoExtraFwd_fun_type b32-#define StgFunInfoExtraFwd_fun_type(__ptr__) REP_StgFunInfoExtraFwd_fun_type[__ptr__+OFFSET_StgFunInfoExtraFwd_fun_type]-#define OFFSET_StgFunInfoExtraFwd_arity 4-#define REP_StgFunInfoExtraFwd_arity b32-#define StgFunInfoExtraFwd_arity(__ptr__) REP_StgFunInfoExtraFwd_arity[__ptr__+OFFSET_StgFunInfoExtraFwd_arity]-#define OFFSET_StgFunInfoExtraFwd_bitmap 16-#define REP_StgFunInfoExtraFwd_bitmap b64-#define StgFunInfoExtraFwd_bitmap(__ptr__) REP_StgFunInfoExtraFwd_bitmap[__ptr__+OFFSET_StgFunInfoExtraFwd_bitmap]-#define SIZEOF_StgFunInfoExtraRev 24-#define OFFSET_StgFunInfoExtraRev_slow_apply_offset 0-#define REP_StgFunInfoExtraRev_slow_apply_offset b32-#define StgFunInfoExtraRev_slow_apply_offset(__ptr__) REP_StgFunInfoExtraRev_slow_apply_offset[__ptr__+OFFSET_StgFunInfoExtraRev_slow_apply_offset]-#define OFFSET_StgFunInfoExtraRev_fun_type 16-#define REP_StgFunInfoExtraRev_fun_type b32-#define StgFunInfoExtraRev_fun_type(__ptr__) REP_StgFunInfoExtraRev_fun_type[__ptr__+OFFSET_StgFunInfoExtraRev_fun_type]-#define OFFSET_StgFunInfoExtraRev_arity 20-#define REP_StgFunInfoExtraRev_arity b32-#define StgFunInfoExtraRev_arity(__ptr__) REP_StgFunInfoExtraRev_arity[__ptr__+OFFSET_StgFunInfoExtraRev_arity]-#define OFFSET_StgFunInfoExtraRev_bitmap 8-#define REP_StgFunInfoExtraRev_bitmap b64-#define StgFunInfoExtraRev_bitmap(__ptr__) REP_StgFunInfoExtraRev_bitmap[__ptr__+OFFSET_StgFunInfoExtraRev_bitmap]-#define OFFSET_StgFunInfoExtraRev_bitmap_offset 8-#define REP_StgFunInfoExtraRev_bitmap_offset b32-#define StgFunInfoExtraRev_bitmap_offset(__ptr__) REP_StgFunInfoExtraRev_bitmap_offset[__ptr__+OFFSET_StgFunInfoExtraRev_bitmap_offset]-#define OFFSET_StgLargeBitmap_size 0-#define REP_StgLargeBitmap_size b64-#define StgLargeBitmap_size(__ptr__) REP_StgLargeBitmap_size[__ptr__+OFFSET_StgLargeBitmap_size]-#define OFFSET_StgLargeBitmap_bitmap 8-#define SIZEOF_snEntry 24-#define OFFSET_snEntry_sn_obj 16-#define REP_snEntry_sn_obj b64-#define snEntry_sn_obj(__ptr__) REP_snEntry_sn_obj[__ptr__+OFFSET_snEntry_sn_obj]-#define OFFSET_snEntry_addr 0-#define REP_snEntry_addr b64-#define snEntry_addr(__ptr__) REP_snEntry_addr[__ptr__+OFFSET_snEntry_addr]-#define SIZEOF_spEntry 8-#define OFFSET_spEntry_addr 0-#define REP_spEntry_addr b64-#define spEntry_addr(__ptr__) REP_spEntry_addr[__ptr__+OFFSET_spEntry_addr]
ghc-lib/generated/ghcautoconf.h view
@@ -72,7 +72,12 @@ /* Define to 1 if __thread is supported */ #define CC_SUPPORTS_TLS 1 -/* Define to 1 if using 'alloca.c'. */+/* Define to one of `_getb67', `GETB67', `getb67' for Cray-2 and Cray-YMP+   systems. This function is required for `alloca.c' support on those systems.+   */+/* #undef CRAY_STACKSEG_END */++/* Define to 1 if using `alloca.c'. */ /* #undef C_ALLOCA */  /* Define to 1 if your processor stores words of floats with the most@@ -82,10 +87,11 @@ /* Has visibility hidden */ #define HAS_VISIBILITY_HIDDEN 1 -/* Define to 1 if you have 'alloca', as a function or macro. */+/* Define to 1 if you have `alloca', as a function or macro. */ #define HAVE_ALLOCA 1 -/* Define to 1 if <alloca.h> works. */+/* Define to 1 if you have <alloca.h> and it should be used (not on Ultrix).+   */ #define HAVE_ALLOCA_H 1  /* Define to 1 if you have the <bfd.h> header file. */@@ -191,12 +197,12 @@ /* Define to 1 if the system has the type `long long'. */ #define HAVE_LONG_LONG 1 +/* Define to 1 if you have the <memory.h> header file. */+#define HAVE_MEMORY_H 1+ /* Define to 1 if you have the mingwex library. */ /* #undef HAVE_MINGWEX */ -/* Define to 1 if you have the <minix/config.h> header file. */-/* #undef HAVE_MINIX_CONFIG_H */- /* Define to 1 if you have the <nlist.h> header file. */ #define HAVE_NLIST_H 1 @@ -239,9 +245,6 @@ /* Define to 1 if you have the <stdint.h> header file. */ #define HAVE_STDINT_H 1 -/* Define to 1 if you have the <stdio.h> header file. */-#define HAVE_STDIO_H 1- /* Define to 1 if you have the <stdlib.h> header file. */ #define HAVE_STDLIB_H 1 @@ -326,9 +329,6 @@ /* Define to 1 if you have the <vfork.h> header file. */ /* #undef HAVE_VFORK_H */ -/* Define to 1 if you have the <wchar.h> header file. */-#define HAVE_WCHAR_H 1- /* Define to 1 if you have the <windows.h> header file. */ /* #undef HAVE_WINDOWS_H */ @@ -443,13 +443,10 @@ 	STACK_DIRECTION = 0 => direction of growth unknown */ /* #undef STACK_DIRECTION */ -/* Define to 1 if all of the C90 standard headers exist (not just the ones-   required in a freestanding environment). This macro is provided for-   backward compatibility; new code need not use it. */+/* Define to 1 if you have the ANSI C header files. */ #define STDC_HEADERS 1 -/* Define to 1 if you can safely include both <sys/time.h> and <time.h>. This-   macro is obsolete. */+/* Define to 1 if you can safely include both <sys/time.h> and <time.h>. */ #define TIME_WITH_SYS_TIME 1  /* Enable single heap address space support */@@ -462,87 +459,21 @@ #ifndef _ALL_SOURCE # define _ALL_SOURCE 1 #endif-/* Enable general extensions on macOS.  */-#ifndef _DARWIN_C_SOURCE-# define _DARWIN_C_SOURCE 1-#endif-/* Enable general extensions on Solaris.  */-#ifndef __EXTENSIONS__-# define __EXTENSIONS__ 1-#endif /* Enable GNU extensions on systems that have them.  */ #ifndef _GNU_SOURCE # define _GNU_SOURCE 1 #endif-/* Enable X/Open compliant socket functions that do not require linking-   with -lxnet on HP-UX 11.11.  */-#ifndef _HPUX_ALT_XOPEN_SOCKET_API-# define _HPUX_ALT_XOPEN_SOCKET_API 1-#endif-/* Identify the host operating system as Minix.-   This macro does not affect the system headers' behavior.-   A future release of Autoconf may stop defining this macro.  */-#ifndef _MINIX-/* # undef _MINIX */-#endif-/* Enable general extensions on NetBSD.-   Enable NetBSD compatibility extensions on Minix.  */-#ifndef _NETBSD_SOURCE-# define _NETBSD_SOURCE 1-#endif-/* Enable OpenBSD compatibility extensions on NetBSD.-   Oddly enough, this does nothing on OpenBSD.  */-#ifndef _OPENBSD_SOURCE-# define _OPENBSD_SOURCE 1-#endif-/* Define to 1 if needed for POSIX-compatible behavior.  */-#ifndef _POSIX_SOURCE-/* # undef _POSIX_SOURCE */-#endif-/* Define to 2 if needed for POSIX-compatible behavior.  */-#ifndef _POSIX_1_SOURCE-/* # undef _POSIX_1_SOURCE */-#endif-/* Enable POSIX-compatible threading on Solaris.  */+/* Enable threading extensions on Solaris.  */ #ifndef _POSIX_PTHREAD_SEMANTICS # define _POSIX_PTHREAD_SEMANTICS 1 #endif-/* Enable extensions specified by ISO/IEC TS 18661-5:2014.  */-#ifndef __STDC_WANT_IEC_60559_ATTRIBS_EXT__-# define __STDC_WANT_IEC_60559_ATTRIBS_EXT__ 1-#endif-/* Enable extensions specified by ISO/IEC TS 18661-1:2014.  */-#ifndef __STDC_WANT_IEC_60559_BFP_EXT__-# define __STDC_WANT_IEC_60559_BFP_EXT__ 1-#endif-/* Enable extensions specified by ISO/IEC TS 18661-2:2015.  */-#ifndef __STDC_WANT_IEC_60559_DFP_EXT__-# define __STDC_WANT_IEC_60559_DFP_EXT__ 1-#endif-/* Enable extensions specified by ISO/IEC TS 18661-4:2015.  */-#ifndef __STDC_WANT_IEC_60559_FUNCS_EXT__-# define __STDC_WANT_IEC_60559_FUNCS_EXT__ 1-#endif-/* Enable extensions specified by ISO/IEC TS 18661-3:2015.  */-#ifndef __STDC_WANT_IEC_60559_TYPES_EXT__-# define __STDC_WANT_IEC_60559_TYPES_EXT__ 1-#endif-/* Enable extensions specified by ISO/IEC TR 24731-2:2010.  */-#ifndef __STDC_WANT_LIB_EXT2__-# define __STDC_WANT_LIB_EXT2__ 1-#endif-/* Enable extensions specified by ISO/IEC 24747:2009.  */-#ifndef __STDC_WANT_MATH_SPEC_FUNCS__-# define __STDC_WANT_MATH_SPEC_FUNCS__ 1-#endif /* Enable extensions on HP NonStop.  */ #ifndef _TANDEM_SOURCE # define _TANDEM_SOURCE 1 #endif-/* Enable X/Open extensions.  Define to 500 only if necessary-   to make mbstate_t available.  */-#ifndef _XOPEN_SOURCE-/* # undef _XOPEN_SOURCE */+/* Enable general extensions on Solaris.  */+#ifndef __EXTENSIONS__+# define __EXTENSIONS__ 1 #endif  @@ -561,12 +492,27 @@ # endif #endif +/* Enable large inode numbers on Mac OS X 10.5.  */+#ifndef _DARWIN_USE_64_BIT_INODE+# define _DARWIN_USE_64_BIT_INODE 1+#endif+ /* Number of bits in a file offset, on hosts where this is settable. */ /* #undef _FILE_OFFSET_BITS */  /* Define for large files, on AIX-style hosts. */ /* #undef _LARGE_FILES */ +/* Define to 1 if on MINIX. */+/* #undef _MINIX */++/* Define to 2 if the system does not provide POSIX.1 features except with+   this defined. */+/* #undef _POSIX_1_SOURCE */++/* Define to 1 if you need to in order for `stat' and other things to work. */+/* #undef _POSIX_SOURCE */+ /* ARM pre v6 */ /* #undef arm_HOST_ARCH_PRE_ARMv6 */ @@ -576,7 +522,7 @@ /* Define to empty if `const' does not conform to ANSI C. */ /* #undef const */ -/* Define as a signed integer type capable of holding a process identifier. */+/* Define to `int' if <sys/types.h> does not define. */ /* #undef pid_t */  /* The supported LLVM version number */
+ ghc-lib/generated/ghcversion.h view
@@ -0,0 +1,18 @@+#ifndef __GHCVERSION_H__+#define __GHCVERSION_H__++#ifndef __GLASGOW_HASKELL__+# define __GLASGOW_HASKELL__ 808+#endif++#define __GLASGOW_HASKELL_PATCHLEVEL1__ 3++#define MIN_VERSION_GLASGOW_HASKELL(ma,mi,pl1,pl2) (\+   ((ma)*100+(mi)) <  __GLASGOW_HASKELL__ || \+   ((ma)*100+(mi)) == __GLASGOW_HASKELL__    \+          && (pl1) <  __GLASGOW_HASKELL_PATCHLEVEL1__ || \+   ((ma)*100+(mi)) == __GLASGOW_HASKELL__    \+          && (pl1) == __GLASGOW_HASKELL_PATCHLEVEL1__ \+          && (pl2) <= __GLASGOW_HASKELL_PATCHLEVEL2__ )++#endif /* __GHCVERSION_H__ */
ghc-lib/stage0/compiler/build/Fingerprint.hs view
@@ -23,7 +23,7 @@    ) where  -#include "GhclibHsVersions.h"+#include "HsVersions.h"  import GhcPrelude
includes/MachDeps.h view
@@ -38,7 +38,6 @@  *  * Hence we hide these macros from -DSTAGE=1  */-#if !defined(STAGE) || STAGE >= 2  /* Sizes of C types come from here... */ #include "ghcautoconf.h"@@ -120,4 +119,3 @@  #define TAG_MASK ((1 << TAG_BITS) - 1) -#endif /* !defined(STAGE) || STAGE >= 2 */