{-# LANGUAGE CPP #-}
{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_GHC -Wno-orphans #-}
module TextShow.GHC.RTS.Flags () where
import GHC.RTS.Flags
#if MIN_VERSION_base(4,21,0)
import qualified GHC.IO.SubSystem as SubSystem
#elif MIN_VERSION_base(4,15,0)
import qualified GHC.RTS.Flags as SubSystem
#endif
import TextShow.Data.Bool ()
import TextShow.Data.Char ()
import TextShow.Data.Floating ()
import TextShow.Data.Integral ()
import TextShow.Data.List ()
import TextShow.Data.Maybe ()
import TextShow.TH.Internal (deriveTextShow)
import TextShow.TH.Names (giveGCStatsTypeName, doCostCentresTypeName,
doHeapProfileTypeName, doTraceTypeName)
$(deriveTextShow giveGCStatsTypeName)
$(deriveTextShow doCostCentresTypeName)
$(deriveTextShow doHeapProfileTypeName)
$(deriveTextShow doTraceTypeName)
$(deriveTextShow ''GCFlags)
$(deriveTextShow ''ConcFlags)
#if MIN_VERSION_base(4,15,0)
$(deriveTextShow ''SubSystem.IoSubSystem)
#endif
#if MIN_VERSION_base(4,21,0)
$(deriveTextShow ''IoManagerFlag)
#endif
$(deriveTextShow ''MiscFlags)
$(deriveTextShow ''DebugFlags)
$(deriveTextShow ''CCFlags)
$(deriveTextShow ''ProfFlags)
$(deriveTextShow ''TraceFlags)
$(deriveTextShow ''TickyFlags)
#if MIN_VERSION_base(4,10,0)
$(deriveTextShow ''ParFlags)
#endif
#if MIN_VERSION_base(4,20,0)
$(deriveTextShow ''HpcFlags)
#endif
$(deriveTextShow ''RTSFlags)