X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FPosix%2FTypes.hs;h=ce88f2cddb6f2e844f95ee4740bb3d0159859c4b;hb=cdca1cd8e3b95c7725258b73a369a53041b8a9c2;hp=be01becabb712d2b83ebba2371f270db498d125d;hpb=fd8492c3679bcaae193fb892bb035c4401ec9138;p=ghc-base.git diff --git a/System/Posix/Types.hs b/System/Posix/Types.hs index be01bec..ce88f2c 100644 --- a/System/Posix/Types.hs +++ b/System/Posix/Types.hs @@ -23,7 +23,7 @@ module System.Posix.Types ( #ifndef mingw32_TARGET_OS CGid(..), CNlink(..), CSsize(..), CUid(..), CCc(..), CSpeed(..), - CTcflag(..), CBlkCnt(..), + CTcflag(..), #endif Fd(..), @@ -82,10 +82,9 @@ INTEGRAL_TYPE(CUid,tyConCUid,"CUid",HTYPE_UID_T) NUMERIC_TYPE(CCc,tyConCCc,"CCc",HTYPE_CC_T) NUMERIC_TYPE(CSpeed,tyConCSpeed,"CSpeed",HTYPE_SPEED_T) INTEGRAL_TYPE(CTcflag,tyConCTcflag,"CTcflag",HTYPE_TCFLAG_T) -INTEGRAL_TYPE(CBlkCnt,tyConBlkCnd,"CBlkCnt",HTYPE_BLKCNT_T) #endif --- ToDo: blksize_t, clockid_t, fsblkcnt_t, fsfilcnt_t, id_t, key_t +-- ToDo: blksize_t, clockid_t, blkcnt_t, fsblkcnt_t, fsfilcnt_t, id_t, key_t -- suseconds_t, timer_t, useconds_t -- Make an Fd type rather than using CInt everywhere