diff --git a/testsuite/tests/interface-stability/base-exports.stdout b/testsuite/tests/interface-stability/base-exports.stdout index 7a34d422831d61edfed5cf526dec28cb95ad4734..293788212e6c2df5be8e77d23a85d821571e1b61 100644 --- a/testsuite/tests/interface-stability/base-exports.stdout +++ b/testsuite/tests/interface-stability/base-exports.stdout @@ -8957,6 +8957,8 @@ module GHC.RTS.Flags where numaMask :: GHC.Types.Word} type GiveGCStats :: * data GiveGCStats = NoGCStats | CollectGCStats | OneLineGCStats | SummaryGCStats | VerboseGCStats + type HpcFlags :: * + data HpcFlags = HpcFlags {emitTixFile :: GHC.Types.Bool} type IoSubSystem :: * data IoSubSystem = IoPOSIX | IoNative type MiscFlags :: * @@ -8966,7 +8968,7 @@ module GHC.RTS.Flags where type ProfFlags :: * data ProfFlags = ProfFlags {doHeapProfile :: DoHeapProfile, heapProfileInterval :: RtsTime, heapProfileIntervalTicks :: GHC.Types.Word, startHeapProfileAtStartup :: GHC.Types.Bool, showCCSOnException :: GHC.Types.Bool, maxRetainerSetSize :: GHC.Types.Word, ccsLength :: GHC.Types.Word, modSelector :: GHC.Maybe.Maybe GHC.Base.String, descrSelector :: GHC.Maybe.Maybe GHC.Base.String, typeSelector :: GHC.Maybe.Maybe GHC.Base.String, ccSelector :: GHC.Maybe.Maybe GHC.Base.String, ccsSelector :: GHC.Maybe.Maybe GHC.Base.String, retainerSelector :: GHC.Maybe.Maybe GHC.Base.String, bioSelector :: GHC.Maybe.Maybe GHC.Base.String} type RTSFlags :: * - data RTSFlags = RTSFlags {gcFlags :: GCFlags, concurrentFlags :: ConcFlags, miscFlags :: MiscFlags, debugFlags :: DebugFlags, costCentreFlags :: CCFlags, profilingFlags :: ProfFlags, traceFlags :: TraceFlags, tickyFlags :: TickyFlags, parFlags :: ParFlags, hpcFlags :: GHC.RTS.Flags.HpcFlags} + data RTSFlags = RTSFlags {gcFlags :: GCFlags, concurrentFlags :: ConcFlags, miscFlags :: MiscFlags, debugFlags :: DebugFlags, costCentreFlags :: CCFlags, profilingFlags :: ProfFlags, traceFlags :: TraceFlags, tickyFlags :: TickyFlags, parFlags :: ParFlags, hpcFlags :: HpcFlags} type RtsTime :: * type RtsTime = GHC.Word.Word64 type TickyFlags :: * @@ -8977,6 +8979,7 @@ module GHC.RTS.Flags where getConcFlags :: GHC.Types.IO ConcFlags getDebugFlags :: GHC.Types.IO DebugFlags getGCFlags :: GHC.Types.IO GCFlags + getHpcFlags :: GHC.Types.IO HpcFlags getIoManagerFlag :: GHC.Types.IO IoSubSystem getMiscFlags :: GHC.Types.IO MiscFlags getParFlags :: GHC.Types.IO ParFlags