concurrent-extra-0.7.0.12: Extra concurrency primitives

Copyright(c) 2010-2011 Bas van Dijk & Roel van Dijk
LicenseBSD3 (see the file LICENSE)
MaintainerBas van Dijk <v.dijk.bas@gmail.com> , Roel van Dijk <vandijk.roel@gmail.com>
Safe HaskellSafe
LanguageHaskell98

Control.Concurrent.Lock

Contents

Description

This module provides the Lock synchronisation mechanism. It was inspired by the Python and Java Lock objects and should behave in a similar way. See:

http://docs.python.org/3.1/library/threading.html#lock-objects

and:

http://java.sun.com/javase/7/docs/api/java/util/concurrent/locks/Lock.html

All functions are exception safe. Throwing asynchronous exceptions will not compromise the internal state of a Lock.

This module is intended to be imported qualified. We suggest importing it like:

import           Control.Concurrent.Lock         ( Lock )
import qualified Control.Concurrent.Lock as Lock ( ... )

Synopsis

Documentation

data Lock Source #

A lock is in one of two states: "locked" or "unlocked".

Instances

Eq Lock Source # 

Methods

(==) :: Lock -> Lock -> Bool #

(/=) :: Lock -> Lock -> Bool #

Creating locks

new :: IO Lock Source #

Create a lock in the "unlocked" state.

newAcquired :: IO Lock Source #

Create a lock in the "locked" state.

Locking and unlocking

acquire :: Lock -> IO () Source #

Acquires the Lock. Blocks if another thread has acquired the Lock.

acquire behaves as follows:

  • When the state is "unlocked" acquire changes the state to "locked".
  • When the state is "locked" acquire blocks until a call to release in another thread wakes the calling thread. Upon awakening it will change the state to "locked".

There are two further important properties of acquire:

  • acquire is single-wakeup. That is, if there are multiple threads blocked on acquire and the lock is released, only one thread will be woken up. The runtime guarantees that the woken thread completes its acquire operation.
  • When multiple threads are blocked on acquire, they are woken up in FIFO order. This is useful for providing fairness properties of abstractions built using locks. (Note that this differs from the Python implementation where the wake-up order is undefined.)

tryAcquire :: Lock -> IO Bool Source #

A non-blocking acquire.

  • When the state is "unlocked" tryAcquire changes the state to "locked" and returns True.
  • When the state is "locked" tryAcquire leaves the state unchanged and returns False.

release :: Lock -> IO () Source #

release changes the state to "unlocked" and returns immediately.

Note that it is an error to release a lock in the "unlocked" state!

If there are any threads blocked on acquire the thread that first called acquire will be woken up.

Convenience functions

with :: Lock -> IO a -> IO a Source #

A convenience function which first acquires the lock and then performs the computation. When the computation terminates, whether normally or by raising an exception, the lock is released.

Note that: with = liftA2 bracket_ acquire release.

tryWith :: Lock -> IO a -> IO (Maybe a) Source #

A non-blocking with. tryWith is a convenience function which first tries to acquire the lock. If that fails, Nothing is returned. If it succeeds, the computation is performed. When the computation terminates, whether normally or by raising an exception, the lock is released and Just the result of the computation is returned.

wait :: Lock -> IO () Source #

  • When the state is "locked", wait blocks until a call to release in another thread changes it to "unlocked".
  • wait is multiple-wakeup, so when multiple waiters are blocked on a Lock, all of them are woken up at the same time.
  • When the state is "unlocked" wait returns immediately.

wait does not alter the state of the lock.

Querying locks

locked :: Lock -> IO Bool Source #

Determines if the lock is in the "locked" state.

Note that this is only a snapshot of the state. By the time a program reacts on its result it may already be out of date.