Network.AMQP.Worker.Poll
poll :: MonadIO m => Int -> m (Maybe a) -> m a Source #
Keep trying action every N microseconds until it returns Just a