Control.Concurrent.MSem
data
MSem
i
new
with
wait
signal
peekAvail