X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=System%2FPosix%2FTypes.hs;h=9bb85e298a86a1752626ecea8c4d8b6daa45ac10;hb=1c5d86f9ab468292f9a52b079e25578ac83d07e2;hp=54fa8b8b23415864f3e1aad1a8a08cd40698158a;hpb=5dbe5ff5ebd18cfb7470eb63bb906bba60a195a1;p=ghc-base.git diff --git a/System/Posix/Types.hs b/System/Posix/Types.hs index 54fa8b8..9bb85e2 100644 --- a/System/Posix/Types.hs +++ b/System/Posix/Types.hs @@ -1,4 +1,12 @@ -{-# OPTIONS_GHC -fno-implicit-prelude #-} +{-# LANGUAGE CPP + , NoImplicitPrelude + , MagicHash + , GeneralizedNewtypeDeriving + #-} +#ifdef __GLASGOW_HASKELL__ +{-# LANGUAGE DeriveDataTypeable, StandaloneDeriving #-} +#endif + ----------------------------------------------------------------------------- -- | -- Module : System.Posix.Types @@ -110,14 +118,14 @@ import Foreign.C import Foreign import Foreign.C import Data.Typeable -import Data.Bits +-- import Data.Bits #ifdef __GLASGOW_HASKELL__ import GHC.Base import GHC.Enum import GHC.Num import GHC.Real -import GHC.Prim +-- import GHC.Prim import GHC.Read import GHC.Show #else @@ -197,5 +205,5 @@ type FileMode = CMode type ProcessID = CPid type FileOffset = COff type ProcessGroupID = CPid -type Limit = CLong +type Limit = CLong