mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

lock pools to work around non-concurrency/composition safety of POSIX fcntl

Browse source
This commit is contained in:
Joey Hess 2015-05-18 14:16:49 -04:00
parent af6b313456
commit 6915b71c57
8 changed files with 327 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Utility/LockFile/Windows.hs
View file

@ -22,7 +22,7 @@ type LockFile = FilePath
type LockHandle = HANDLE
{- Tries to lock a file with a shared lock, which allows other processes to
- also lock it shared. Fails is the file is exclusively locked. -}
- also lock it shared. Fails if the file is exclusively locked. -}
lockShared :: LockFile -> IO (Maybe LockHandle)
lockShared = openLock fILE_SHARE_READ