Fix DirIO portability for Windows

Author: harendra-kumar

core/src/Streamly/FileSystem/DirIO.hs

@@ -20,17 +20,12 @@
 module Streamly.FileSystem.DirIO
     (
     -- * Configuration
-#if defined(mingw32_HOST_OS) || defined(__MINGW32__)
-    -- | Only the default ReadOptions are supported for Windows. Please use "id"
-    -- as the configuration modifier.
-      ReadOptions
-#else
       ReadOptions
     , followSymlinks
     , ignoreMissing
     , ignoreSymlinkLoops
     , ignoreInaccessible
-#endif
+
     -- * Streams
     , read
     , readEither

hie.yaml

@@ -126,6 +126,8 @@ cradle:
               component: "test:Data.Unbox"
             - path: "./test/Streamly/Test/Data/Unfold.hs"
               component: "test:Data.Unfold"
+            - path: "./test/Streamly/Test/FileSystem/DirIO.hs"
+              component: "test:FileSystem.DirIO"
             - path: "./test/Streamly/Test/FileSystem/Event.hs"
               component: "test:FileSystem.Event"
             - path: "./test/Streamly/Test/FileSystem/Event/Common.hs"

test/Streamly/Test/FileSystem/DirIO.hs

@@ -30,7 +30,7 @@ import qualified Streamly.Internal.Unicode.Stream as Unicode (lines)
 import qualified Streamly.Data.Stream.Prelude as Stream
 import qualified Streamly.Data.Fold as Fold
 import qualified Streamly.Data.StreamK as StreamK
-import qualified Streamly.Internal.FileSystem.DirIO as Dir
+import qualified Streamly.FileSystem.DirIO as Dir
 
 import Prelude hiding (last, length)
 import BenchTestLib.DirIO