openLock :: ShareMode -> LockFile -> IO (Maybe LockHandle)
openLock sharemode f = do
f' <- convertToNativeNamespace f
-#if MIN_VERSION_Win32(2,13,3)
+#if MIN_VERSION_Win32(2,13,4)
r <- tryNonAsync $ createFile_NoRetry f' gENERIC_READ sharemode
security_attributes oPEN_ALWAYS fILE_ATTRIBUTE_NORMAL
(maybePtr Nothing)
if (os(windows))
Build-Depends:
- Win32 ((>= 2.6.1.0 && < 2.12.0.0) || >= 2.13.3.1),
+ Win32 ((>= 2.6.1.0 && < 2.12.0.0) || >= 2.13.4.0),
setenv,
process (>= 1.6.2.0),
silently (>= 1.2.5.1)