@@ -13,6 +13,7 @@ import Network.Wai.Handler.Warp.Types
13#ifdef WINDOWS
13#ifdef WINDOWS
14import Control.Monad (when, void)
14import Control.Monad (when, void)
15import qualified System.IO as IO
15import qualified System.IO as IO
16+import Foreign.Ptr (plusPtr)
17import Control.Exception
18import Control.Exception
18import Foreign.C.Types
19import Foreign.C.Types