Control.Concurrent.Utils

Documentation

data Lock

Opaque lock.

mkExclusiveLock :: IO Lock

Create exclusive lock. Only one process could take such lock.

mkQLock :: Int -> IO Lock

Create quantity lock. A fixed number of processes can take this lock simultaniously.

withLock :: (MonadMask m, MonadIO m) => Lock -> m a -> m a

Run action under a held lock.