summaryrefslogtreecommitdiff
path: root/libraries/base/Control/Concurrent/QSemN.hs
diff options
context:
space:
mode:
authorBas van Dijk <v.dijk.bas@gmail.com>2010-12-01 08:03:07 +0000
committerBas van Dijk <v.dijk.bas@gmail.com>2010-12-01 08:03:07 +0000
commita6d475c4688a43138d4f505800a0d2001b857105 (patch)
treed8b574983d948be2246cdf729a09a2c676bf9a46 /libraries/base/Control/Concurrent/QSemN.hs
parent511cbda65bc3640adae32a27e0ecc8168b80e4bb (diff)
downloadhaskell-a6d475c4688a43138d4f505800a0d2001b857105.tar.gz
Derived Eq instance for QSem and QSemN
Diffstat (limited to 'libraries/base/Control/Concurrent/QSemN.hs')
-rw-r--r--libraries/base/Control/Concurrent/QSemN.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/Control/Concurrent/QSemN.hs b/libraries/base/Control/Concurrent/QSemN.hs
index 30c6785d31..7e43908094 100644
--- a/libraries/base/Control/Concurrent/QSemN.hs
+++ b/libraries/base/Control/Concurrent/QSemN.hs
@@ -31,7 +31,7 @@ import Data.Typeable
-- |A 'QSemN' is a quantity semaphore, in which the available
-- \"quantity\" may be signalled or waited for in arbitrary amounts.
-newtype QSemN = QSemN (MVar (Int,[(Int,MVar ())]))
+newtype QSemN = QSemN (MVar (Int,[(Int,MVar ())])) deriving Eq
INSTANCE_TYPEABLE0(QSemN,qSemNTc,"QSemN")