Control.Concurrent.STM.TChan.ReadOnly
data ReadOnlyTChan b
toReadOnlyTChan
readTChan
dupReadOnlyTChan