youyesyet.outqueue
Queue of messages waiting to be sent to the server.
maybe-process-next
(maybe-process-next q process)
Apply this process
, assumed to be a function of one argument, to the next item in the queue q
, if the queue is not currently locked; return the value returned by process.
take!
(take! q)
Return the first item from the queue q
, rebind the queue to the remaining items. If the queue is empty return nil.
unlock!
(unlock! q)
(unlock! q value)
Unlock the queue q
if not value
is supplied; if a value
is supplied, unlock only if that value is true
, otherwise lock.