diff --git a/Utility/OpenFd.hs b/Utility/OpenFd.hs index c46e36f25d..16a364a4d1 100644 --- a/Utility/OpenFd.hs +++ b/Utility/OpenFd.hs @@ -8,9 +8,9 @@ {-# LANGUAGE CPP #-} {-# OPTIONS_GHC -fno-warn-tabs #-} -module Utility.OpenFd ( - openFdWithMode, -) where +module Utility.OpenFd where + +#ifndef mingw32_HOST_OS import System.Posix.IO.ByteString import System.Posix.Types @@ -23,3 +23,5 @@ openFdWithMode f openmode filemode flags = #else openFdWithMode = openFd #endif + +#endif