readUserEnteredRoomNotification :: IO Word8 -> (Int -> IO [Word8]) -> IO Word16 -> IO Int -> (Int -> IO String) -> IO Inbound.InboundMessage
readUserEnteredRoomNotification readByte readBytes readShort readInt readText =
  do
    userData <- readSingleUser readByte readBytes readShort readInt readText
    return $ Inbound.UserEnteredRoomMessage userData
readUserEnteredRoomNotification :: IO Word8 -> (Int -> IO [Word8]) -> IO Word16 -> IO Int -> (Int -> IO String) -> IO Inbound.InboundMessage
readUserEnteredRoomNotification readByte readBytes readShort readInt readText =
  do
    userData <- readSingleUser readByte readBytes readShort readInt readText
    return $ Inbound.UserEnteredRoomMessage userData
readUserEnteredRoomNotification readByte readBytes readShort readInt readText =
  do
    userData <- readSingleUser readByte readBytes readShort readInt readText
    return $ Inbound.UserEnteredRoomMessage userData