Fix GHC 8.2 build

haskell-fswatch · Jul 29, 2017 · 0b14cf7 · 0b14cf7
1 parent ad5b449
commit 0b14cf7
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/System/Win32/FileNotify.hsc b/src/System/Win32/FileNotify.hsc
@@ -62,10 +62,12 @@ faToAction fa = toEnum $ fromEnum fa - 1
 -- Defined in System.Win32.File, but with too few cases:
 -- type AccessMode = UINT
 
+#if !(MIN_VERSION_Win32(2,4,0))
 #{enum AccessMode,
  , fILE_LIST_DIRECTORY = FILE_LIST_DIRECTORY
  }
 -- there are many more cases but I only need this one.
+#endif
 
 type FileAction = DWORD