pollLoop :: (Receiver a, Sender a) => Logger -> IOLoop a -> IO ()
pollLoop syslog = gpollLoop syslog PollRdWrMode receiveMulti sendAll
pollLoop :: (Receiver a, Sender a) => Logger -> IOLoop a -> IO ()
pollLoop syslog = gpollLoop syslog PollRdWrMode receiveMulti sendAll
pollLoop syslog = gpollLoop syslog PollRdWrMode receiveMulti sendAll