enqueueD :: IOLoop a -> ([B.ByteString], IO Bool) -> IO Bool
enqueueD p a = tryWriteChan (pollOutQ p) a
enqueueD :: IOLoop a -> ([B.ByteString], IO Bool) -> IO Bool
enqueueD p a = tryWriteChan (pollOutQ p) a
enqueueD p a = tryWriteChan (pollOutQ p) a