X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=NHC%2FPosixTypes.hsc;h=efae04eedacc58f5352dd590592799dd327cdf84;hb=41e8fba828acbae1751628af50849f5352b27873;hp=b5ad5c633a893765152b6210a19d9b0856792088;hpb=fc065cb91fe1bead6635b6361e6e2f5743e37095;p=ghc-base.git diff --git a/NHC/PosixTypes.hsc b/NHC/PosixTypes.hsc index b5ad5c6..efae04e 100644 --- a/NHC/PosixTypes.hsc +++ b/NHC/PosixTypes.hsc @@ -1,4 +1,6 @@ +{-# LANGUAGE CPP #-} {-# OPTIONS_NHC98 -I/usr/include #-} + ----------------------------------------------------------------------------- -- | -- Module : NHC.PosixTypes @@ -51,7 +53,9 @@ import Control.Monad -- Curious hack to ensure that the CTypes macros are expanded *after* hsc2hs. ##include "CTypes.h" -- C header files that contain all the types we are looking for here. +#if __APPLE__ #include +#endif #include #include #include