X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=NHC%2FPosixTypes.hsc;h=efae04eedacc58f5352dd590592799dd327cdf84;hb=f98950484a7cb01e43352e3d88277a2784cd58bf;hp=fabe253b192f300e18b5e1c26567ff1be41e3001;hpb=5dbe5ff5ebd18cfb7470eb63bb906bba60a195a1;p=ghc-base.git diff --git a/NHC/PosixTypes.hsc b/NHC/PosixTypes.hsc index fabe253..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,6 +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