diff options
Diffstat (limited to 'libraries')
| -rw-r--r-- | libraries/base/Control/Concurrent/QSem.hs | 2 | ||||
| -rw-r--r-- | libraries/base/Control/Concurrent/QSemN.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/libraries/base/Control/Concurrent/QSem.hs b/libraries/base/Control/Concurrent/QSem.hs index 59ffbc7887..8e8a3016db 100644 --- a/libraries/base/Control/Concurrent/QSem.hs +++ b/libraries/base/Control/Concurrent/QSem.hs @@ -36,7 +36,7 @@ import Data.Typeable -- |A 'QSem' is a simple quantity semaphore, in which the available -- \"quantity\" is always dealt with in units of one. -newtype QSem = QSem (MVar (Int, [MVar ()])) +newtype QSem = QSem (MVar (Int, [MVar ()])) deriving Eq INSTANCE_TYPEABLE0(QSem,qSemTc,"QSem") 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") |