Skip to content

Commit c3515e1

Browse files
committed
C.M.IOSim.STM.tryReadTBQueueDefault: remove misleading comment
1 parent 4f5a4cd commit c3515e1

File tree

1 file changed

+0
-2
lines changed
  • io-sim/src/Control/Monad/IOSim

1 file changed

+0
-2
lines changed

io-sim/src/Control/Monad/IOSim/STM.hs

Lines changed: 0 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -148,8 +148,6 @@ tryReadTBQueueDefault (TBQueue queue _size) = do
148148
case reverse ys of
149149
[] -> return Nothing
150150

151-
-- NB. lazy: we want the transaction to be
152-
-- short, otherwise it will conflict
153151
(z:zs) -> do
154152
writeTVar queue $! (zs, r', [], w)
155153
return (Just z)

0 commit comments

Comments
 (0)