Control.Concurrent.STMSupply

data STMSupply

newSTMSupplyIO

freshId

splitSupply