connectSocket host port = connectTo host (PortNumber $ fromInteger port)
connectSocket host port = connectTo host (PortNumber $ fromInteger port)
connectSocket host port = connectTo host (PortNumber $ fromInteger port)