diff options
author | Ian Lynagh <ian@well-typed.com> | 2013-06-09 15:52:29 +0100 |
---|---|---|
committer | Ian Lynagh <ian@well-typed.com> | 2013-06-09 15:52:29 +0100 |
commit | 68ba223fb3650630b4d2ec699ec72d5e73d4146b (patch) | |
tree | 32218c5e9f0b0060c36212163ae0a2ffdb8b6849 /rts/PrimOps.cmm | |
parent | f7c8c3d47be1ced027847d832a1b57ca4a7b223d (diff) | |
download | haskell-68ba223fb3650630b4d2ec699ec72d5e73d4146b.tar.gz |
Fix a comment
Diffstat (limited to 'rts/PrimOps.cmm')
-rw-r--r-- | rts/PrimOps.cmm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm index e292e0adbb..230b9292f8 100644 --- a/rts/PrimOps.cmm +++ b/rts/PrimOps.cmm @@ -1289,9 +1289,7 @@ stg_tryTakeMVarzh ( P_ mvar /* :: MVar a */ ) info = GET_INFO(mvar); #endif - /* If the MVar is empty, put ourselves on its blocking queue, - * and wait until we're woken up. - */ + /* If the MVar is empty, return 0. */ if (StgMVar_value(mvar) == stg_END_TSO_QUEUE_closure) { #if defined(THREADED_RTS) unlockClosure(mvar, info); |