Get rid of compilation warning on Windows

haskell · Nov 24, 2023 · 7e194bf · 7e194bf
1 parent e8c2c40
commit 7e194bf
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/System/Random/MWC/SeedSource.hs b/System/Random/MWC/SeedSource.hs
@@ -22,9 +22,10 @@ import Foreign.Marshal.Array   (peekArray)
 #if defined(mingw32_HOST_OS)
 import Foreign.Ptr
 import Foreign.C.Types
+#else
+import System.IO        (IOMode(..), hGetBuf, withBinaryFile)
 #endif
 import System.CPUTime   (cpuTimePrecision, getCPUTime)
-import System.IO        (IOMode(..), hGetBuf, withBinaryFile)
 
 -- Acquire seed from current time. This is horrible fallback for
 -- Windows system.