Polysemy.Conc.Queue.Timeout
Description
withTimeout :: TimeUnit t => Members [Race, Embed IO] r => t -> STM (Maybe d) -> Sem r (QueueResult d) Source #
Run an STM action atomically with a time limit
STM