{- ORMOLU_DISABLE -}
{- HLINT ignore -}
-- THIS IS A GENERATED FILE, DO NOT EDIT

{-# OPTIONS_GHC -Wno-unused-imports #-}
{-# OPTIONS_GHC -Wno-unused-matches #-}
{-# OPTIONS_GHC -Wno-deprecations #-}
module Language.LSP.Protocol.Internal.Types.ErrorCodes where

import Control.DeepSeq
import Data.Hashable
import GHC.Generics
import Language.LSP.Protocol.Utils.Misc
import Prettyprinter
import qualified Data.Aeson as Aeson
import qualified Data.Row.Aeson as Aeson
import qualified Data.Row.Hashable as Hashable
import qualified Data.Set
import qualified Data.String
import qualified Language.LSP.Protocol.Types.Common
import qualified Language.LSP.Protocol.Types.LspEnum

{-|
Predefined error codes.
-}
data ErrorCodes = 
    {-|

  -}
  ErrorCodes_ParseError
  | {-|

  -}
  ErrorCodes_InvalidRequest
  | {-|

  -}
  ErrorCodes_MethodNotFound
  | {-|

  -}
  ErrorCodes_InvalidParams
  | {-|

  -}
  ErrorCodes_InternalError
  | {-|
  Error code indicating that a server received a notification or
  request before the server has received the `initialize` request.
  -}
  ErrorCodes_ServerNotInitialized
  | {-|

  -}
  ErrorCodes_UnknownErrorCode
  | ErrorCodes_Custom Language.LSP.Protocol.Types.Common.Int32
  deriving stock (Int -> ErrorCodes -> ShowS
[ErrorCodes] -> ShowS
ErrorCodes -> String
(Int -> ErrorCodes -> ShowS)
-> (ErrorCodes -> String)
-> ([ErrorCodes] -> ShowS)
-> Show ErrorCodes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ErrorCodes -> ShowS
showsPrec :: Int -> ErrorCodes -> ShowS
$cshow :: ErrorCodes -> String
show :: ErrorCodes -> String
$cshowList :: [ErrorCodes] -> ShowS
showList :: [ErrorCodes] -> ShowS
Show, ErrorCodes -> ErrorCodes -> Bool
(ErrorCodes -> ErrorCodes -> Bool)
-> (ErrorCodes -> ErrorCodes -> Bool) -> Eq ErrorCodes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ErrorCodes -> ErrorCodes -> Bool
== :: ErrorCodes -> ErrorCodes -> Bool
$c/= :: ErrorCodes -> ErrorCodes -> Bool
/= :: ErrorCodes -> ErrorCodes -> Bool
Eq, Eq ErrorCodes
Eq ErrorCodes =>
(ErrorCodes -> ErrorCodes -> Ordering)
-> (ErrorCodes -> ErrorCodes -> Bool)
-> (ErrorCodes -> ErrorCodes -> Bool)
-> (ErrorCodes -> ErrorCodes -> Bool)
-> (ErrorCodes -> ErrorCodes -> Bool)
-> (ErrorCodes -> ErrorCodes -> ErrorCodes)
-> (ErrorCodes -> ErrorCodes -> ErrorCodes)
-> Ord ErrorCodes
ErrorCodes -> ErrorCodes -> Bool
ErrorCodes -> ErrorCodes -> Ordering
ErrorCodes -> ErrorCodes -> ErrorCodes
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: ErrorCodes -> ErrorCodes -> Ordering
compare :: ErrorCodes -> ErrorCodes -> Ordering
$c< :: ErrorCodes -> ErrorCodes -> Bool
< :: ErrorCodes -> ErrorCodes -> Bool
$c<= :: ErrorCodes -> ErrorCodes -> Bool
<= :: ErrorCodes -> ErrorCodes -> Bool
$c> :: ErrorCodes -> ErrorCodes -> Bool
> :: ErrorCodes -> ErrorCodes -> Bool
$c>= :: ErrorCodes -> ErrorCodes -> Bool
>= :: ErrorCodes -> ErrorCodes -> Bool
$cmax :: ErrorCodes -> ErrorCodes -> ErrorCodes
max :: ErrorCodes -> ErrorCodes -> ErrorCodes
$cmin :: ErrorCodes -> ErrorCodes -> ErrorCodes
min :: ErrorCodes -> ErrorCodes -> ErrorCodes
Ord, (forall x. ErrorCodes -> Rep ErrorCodes x)
-> (forall x. Rep ErrorCodes x -> ErrorCodes) -> Generic ErrorCodes
forall x. Rep ErrorCodes x -> ErrorCodes
forall x. ErrorCodes -> Rep ErrorCodes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x. ErrorCodes -> Rep ErrorCodes x
from :: forall x. ErrorCodes -> Rep ErrorCodes x
$cto :: forall x. Rep ErrorCodes x -> ErrorCodes
to :: forall x. Rep ErrorCodes x -> ErrorCodes
Generic)
  deriving anyclass (ErrorCodes -> ()
(ErrorCodes -> ()) -> NFData ErrorCodes
forall a. (a -> ()) -> NFData a
$crnf :: ErrorCodes -> ()
rnf :: ErrorCodes -> ()
NFData, Eq ErrorCodes
Eq ErrorCodes =>
(Int -> ErrorCodes -> Int)
-> (ErrorCodes -> Int) -> Hashable ErrorCodes
Int -> ErrorCodes -> Int
ErrorCodes -> Int
forall a. Eq a => (Int -> a -> Int) -> (a -> Int) -> Hashable a
$chashWithSalt :: Int -> ErrorCodes -> Int
hashWithSalt :: Int -> ErrorCodes -> Int
$chash :: ErrorCodes -> Int
hash :: ErrorCodes -> Int
Hashable)
  deriving ( [ErrorCodes] -> Value
[ErrorCodes] -> Encoding
ErrorCodes -> Bool
ErrorCodes -> Value
ErrorCodes -> Encoding
(ErrorCodes -> Value)
-> (ErrorCodes -> Encoding)
-> ([ErrorCodes] -> Value)
-> ([ErrorCodes] -> Encoding)
-> (ErrorCodes -> Bool)
-> ToJSON ErrorCodes
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> (a -> Bool)
-> ToJSON a
$ctoJSON :: ErrorCodes -> Value
toJSON :: ErrorCodes -> Value
$ctoEncoding :: ErrorCodes -> Encoding
toEncoding :: ErrorCodes -> Encoding
$ctoJSONList :: [ErrorCodes] -> Value
toJSONList :: [ErrorCodes] -> Value
$ctoEncodingList :: [ErrorCodes] -> Encoding
toEncodingList :: [ErrorCodes] -> Encoding
$comitField :: ErrorCodes -> Bool
omitField :: ErrorCodes -> Bool
Aeson.ToJSON
  , Maybe ErrorCodes
Value -> Parser [ErrorCodes]
Value -> Parser ErrorCodes
(Value -> Parser ErrorCodes)
-> (Value -> Parser [ErrorCodes])
-> Maybe ErrorCodes
-> FromJSON ErrorCodes
forall a.
(Value -> Parser a)
-> (Value -> Parser [a]) -> Maybe a -> FromJSON a
$cparseJSON :: Value -> Parser ErrorCodes
parseJSON :: Value -> Parser ErrorCodes
$cparseJSONList :: Value -> Parser [ErrorCodes]
parseJSONList :: Value -> Parser [ErrorCodes]
$comittedField :: Maybe ErrorCodes
omittedField :: Maybe ErrorCodes
Aeson.FromJSON ) via (Language.LSP.Protocol.Types.LspEnum.AsLspEnum ErrorCodes)
  deriving (forall ann. ErrorCodes -> Doc ann)
-> (forall ann. [ErrorCodes] -> Doc ann) -> Pretty ErrorCodes
forall ann. [ErrorCodes] -> Doc ann
forall ann. ErrorCodes -> Doc ann
forall a.
(forall ann. a -> Doc ann)
-> (forall ann. [a] -> Doc ann) -> Pretty a
$cpretty :: forall ann. ErrorCodes -> Doc ann
pretty :: forall ann. ErrorCodes -> Doc ann
$cprettyList :: forall ann. [ErrorCodes] -> Doc ann
prettyList :: forall ann. [ErrorCodes] -> Doc ann
Pretty via (ViaJSON ErrorCodes)

instance Language.LSP.Protocol.Types.LspEnum.LspEnum ErrorCodes where
  knownValues :: Set ErrorCodes
knownValues = [ErrorCodes] -> Set ErrorCodes
forall a. Ord a => [a] -> Set a
Data.Set.fromList [ErrorCodes
ErrorCodes_ParseError
    ,ErrorCodes
ErrorCodes_InvalidRequest
    ,ErrorCodes
ErrorCodes_MethodNotFound
    ,ErrorCodes
ErrorCodes_InvalidParams
    ,ErrorCodes
ErrorCodes_InternalError
    ,ErrorCodes
ErrorCodes_ServerNotInitialized
    ,ErrorCodes
ErrorCodes_UnknownErrorCode]
  type EnumBaseType ErrorCodes = Language.LSP.Protocol.Types.Common.Int32
  toEnumBaseType :: ErrorCodes -> EnumBaseType ErrorCodes
toEnumBaseType ErrorCodes
ErrorCodes_ParseError = Int32
EnumBaseType ErrorCodes
-32700
  toEnumBaseType ErrorCodes
ErrorCodes_InvalidRequest = Int32
EnumBaseType ErrorCodes
-32600
  toEnumBaseType ErrorCodes
ErrorCodes_MethodNotFound = Int32
EnumBaseType ErrorCodes
-32601
  toEnumBaseType ErrorCodes
ErrorCodes_InvalidParams = Int32
EnumBaseType ErrorCodes
-32602
  toEnumBaseType ErrorCodes
ErrorCodes_InternalError = Int32
EnumBaseType ErrorCodes
-32603
  toEnumBaseType ErrorCodes
ErrorCodes_ServerNotInitialized = Int32
EnumBaseType ErrorCodes
-32002
  toEnumBaseType ErrorCodes
ErrorCodes_UnknownErrorCode = Int32
EnumBaseType ErrorCodes
-32001
  toEnumBaseType (ErrorCodes_Custom Int32
arg) = Int32
EnumBaseType ErrorCodes
arg

instance Language.LSP.Protocol.Types.LspEnum.LspOpenEnum ErrorCodes where
  fromOpenEnumBaseType :: EnumBaseType ErrorCodes -> ErrorCodes
fromOpenEnumBaseType EnumBaseType ErrorCodes
-32700 = ErrorCodes
ErrorCodes_ParseError
  fromOpenEnumBaseType EnumBaseType ErrorCodes
-32600 = ErrorCodes
ErrorCodes_InvalidRequest
  fromOpenEnumBaseType EnumBaseType ErrorCodes
-32601 = ErrorCodes
ErrorCodes_MethodNotFound
  fromOpenEnumBaseType EnumBaseType ErrorCodes
-32602 = ErrorCodes
ErrorCodes_InvalidParams
  fromOpenEnumBaseType EnumBaseType ErrorCodes
-32603 = ErrorCodes
ErrorCodes_InternalError
  fromOpenEnumBaseType EnumBaseType ErrorCodes
-32002 = ErrorCodes
ErrorCodes_ServerNotInitialized
  fromOpenEnumBaseType EnumBaseType ErrorCodes
-32001 = ErrorCodes
ErrorCodes_UnknownErrorCode
  fromOpenEnumBaseType EnumBaseType ErrorCodes
arg = Int32 -> ErrorCodes
ErrorCodes_Custom Int32
EnumBaseType ErrorCodes
arg