-- | TODO: is it safe to assume that the length of the
-- `Int` representation is 8?
recvInt :: Handle -> IO Int
recvInt h = B.decode <$> BS.hGet h 8
recvInt :: Handle -> IO Int
recvInt h = B.decode <$> BS.hGet h 8
recvInt h = B.decode <$> BS.hGet h 8