getErrorCode :: Int -> LolError
getErrorCode i =
    case i of
        400 -> BadRequest
        401 -> Unauthorized
        404 -> NotFound
        429 -> RateLimitExceeded
        500 -> InternalServerError
        503 -> ServiceUnavailable
        e   -> error $ "Unknown error code: " ++ show e
getErrorCode :: Int -> LolError
getErrorCode i =
    case i of
        400 -> BadRequest
        401 -> Unauthorized
        404 -> NotFound
        429 -> RateLimitExceeded
        500 -> InternalServerError
        503 -> ServiceUnavailable
        e   -> error $ "Unknown error code: " ++ show e
getErrorCode i =
    case i of
        400 -> BadRequest
        401 -> Unauthorized
        404 -> NotFound
        429 -> RateLimitExceeded
        500 -> InternalServerError
        503 -> ServiceUnavailable
        e   -> error $ "Unknown error code: " ++ show e