diff options
| author | sof <unknown> | 1999-01-14 18:21:51 +0000 |
|---|---|---|
| committer | sof <unknown> | 1999-01-14 18:21:51 +0000 |
| commit | abcfc36e5458b4b9c19a3f1c0fb49154ab8b479c (patch) | |
| tree | 211fdacc6eb0ddae20bfeb3317c8b6be39154b7a /ghc/lib/concurrent/Semaphore.lhs | |
| parent | 08af80d89e259668327c533a717617836ddeca7c (diff) | |
| download | haskell-abcfc36e5458b4b9c19a3f1c0fb49154ab8b479c.tar.gz | |
[project @ 1999-01-14 18:21:49 by sof]
Haskell 98 related changes + the addition of the MVar primop,
isEmptyMVar :: MVar a -> IO Bool
-- use with care.
Diffstat (limited to 'ghc/lib/concurrent/Semaphore.lhs')
| -rw-r--r-- | ghc/lib/concurrent/Semaphore.lhs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/ghc/lib/concurrent/Semaphore.lhs b/ghc/lib/concurrent/Semaphore.lhs index 9fc8a0b148..e7bd0d4189 100644 --- a/ghc/lib/concurrent/Semaphore.lhs +++ b/ghc/lib/concurrent/Semaphore.lhs @@ -11,15 +11,15 @@ module Semaphore {- abstract -} QSem, - newQSem, --:: Int -> IO QSem - waitQSem, --:: QSem -> IO () - signalQSem, --:: QSem -> IO () + newQSem, -- :: Int -> IO QSem + waitQSem, -- :: QSem -> IO () + signalQSem, -- :: QSem -> IO () {- abstract -} QSemN, - newQSemN, --:: Int -> IO QSemN - waitQSemN, --:: QSemN -> Int -> IO () - signalQSemN --:: QSemN -> Int -> IO () + newQSemN, -- :: Int -> IO QSemN + waitQSemN, -- :: QSemN -> Int -> IO () + signalQSemN -- :: QSemN -> Int -> IO () ) where |