buildTCPServer :: PortNumber -> Int -> (Handle -> Int -> IO ()) -> TCPServer
buildTCPServer port maxConnections cb = TCPServer { _port = port, _maxConnections = maxConnections, _cb = cb }
buildTCPServer :: PortNumber -> Int -> (Handle -> Int -> IO ()) -> TCPServer
buildTCPServer port maxConnections cb = TCPServer { _port = port, _maxConnections = maxConnections, _cb = cb }
buildTCPServer port maxConnections cb = TCPServer { _port = port, _maxConnections = maxConnections, _cb = cb }