#include "HsBaseConfig.h"
module TextShow.System.Posix.Types () where
import System.Posix.Types
import TextShow.Classes (TextShow(..))
import TextShow.Data.Integral ()
import TextShow.Foreign.C.Types ()
import TextShow.Foreign.Ptr ()
#if !(MIN_VERSION_base(4,5,0))
import Data.Int
import Data.Text.Lazy.Builder (Builder)
import Data.Word
import Unsafe.Coerce (unsafeCoerce)
# include "HsBaseConfig.h"
#endif
#if MIN_VERSION_base(4,5,0)
# if defined(HTYPE_DEV_T)
deriving instance TextShow CDev
# endif
# if defined(HTYPE_INO_T)
deriving instance TextShow CIno
# endif
# if defined(HTYPE_MODE_T)
deriving instance TextShow CMode
# endif
# if defined(HTYPE_OFF_T)
deriving instance TextShow COff
# endif
# if defined(HTYPE_PID_T)
deriving instance TextShow CPid
# endif
# if defined(HTYPE_SSIZE_T)
deriving instance TextShow CSsize
# endif
# if defined(HTYPE_GID_T)
deriving instance TextShow CGid
# endif
# if defined(HTYPE_NLINK_T)
deriving instance TextShow CNlink
# endif
# if defined(HTYPE_UID_T)
deriving instance TextShow CUid
# endif
# if defined(HTYPE_CC_T)
deriving instance TextShow CCc
# endif
# if defined(HTYPE_SPEED_T)
deriving instance TextShow CSpeed
# endif
# if defined(HTYPE_TCFLAG_T)
deriving instance TextShow CTcflag
# endif
# if defined(HTYPE_RLIM_T)
deriving instance TextShow CRLim
# endif
#else
# if defined(HTYPE_DEV_T)
instance TextShow CDev where
showb = unsafeCoerce (showb :: HTYPE_DEV_T -> Builder)
# endif
# if defined(HTYPE_INO_T)
instance TextShow CIno where
showb = unsafeCoerce (showb :: HTYPE_INO_T -> Builder)
# endif
# if defined(HTYPE_MODE_T)
instance TextShow CMode where
showb = unsafeCoerce (showb :: HTYPE_MODE_T -> Builder)
# endif
# if defined(HTYPE_OFF_T)
instance TextShow COff where
showbPrec = unsafeCoerce (showbPrec :: Int -> HTYPE_OFF_T -> Builder)
# endif
# if defined(HTYPE_PID_T)
instance TextShow CPid where
showbPrec = unsafeCoerce (showbPrec :: Int -> HTYPE_PID_T -> Builder)
# endif
# if defined(HTYPE_SSIZE_T)
instance TextShow CSsize where
showbPrec = unsafeCoerce (showbPrec :: Int -> HTYPE_SSIZE_T -> Builder)
# endif
# if defined(HTYPE_GID_T)
instance TextShow CGid where
showb = unsafeCoerce (showb :: HTYPE_GID_T -> Builder)
# endif
# if defined(HTYPE_NLINK_T)
instance TextShow CNlink where
showb = unsafeCoerce (showb :: HTYPE_NLINK_T -> Builder)
# endif
# if defined(HTYPE_UID_T)
instance TextShow CUid where
showb = unsafeCoerce (showb :: HTYPE_UID_T -> Builder)
# endif
# if defined(HTYPE_CC_T)
instance TextShow CCc where
showb = unsafeCoerce (showb :: HTYPE_CC_T -> Builder)
# endif
# if defined(HTYPE_SPEED_T)
instance TextShow CSpeed where
showb = unsafeCoerce (showb :: HTYPE_SPEED_T -> Builder)
# endif
# if defined(HTYPE_TCFLAG_T)
instance TextShow CTcflag where
showb = unsafeCoerce (showb :: HTYPE_TCFLAG_T -> Builder)
# endif
# if defined(HTYPE_RLIM_T)
instance TextShow CRLim where
showb = unsafeCoerce (showb :: HTYPE_RLIM_T -> Builder)
# endif
#endif
#if MIN_VERSION_base(4,10,0)
# if defined(HTYPE_BLKSIZE_T)
deriving instance TextShow CBlkSize
# endif
# if defined(HTYPE_BLKCNT_T)
deriving instance TextShow CBlkCnt
# endif
# if defined(HTYPE_CLOCKID_T)
deriving instance TextShow CClockId
# endif
# if defined(HTYPE_FSBLKCNT_T)
deriving instance TextShow CFsBlkCnt
# endif
# if defined(HTYPE_FSFILCNT_T)
deriving instance TextShow CFsFilCnt
# endif
# if defined(HTYPE_ID_T)
deriving instance TextShow CId
# endif
# if defined(HTYPE_KEY_T)
deriving instance TextShow CKey
# endif
# if defined(HTYPE_TIMER_T)
deriving instance TextShow CTimer
# endif
#endif
deriving instance TextShow Fd