Control.Concurrent.STM.TMVar.ReadOnly
data ReadOnlyTMVar b
toReadOnlyTMVar
takeTMVar
readTMVar
tryTakeTMVar
isEmptyTMVar