{-# OPTIONS_GHC -Wno-unused-imports #-}
{-# OPTIONS_GHC -Wno-unused-matches #-}
{-# OPTIONS_GHC -Wno-deprecations #-}
module Language.LSP.Protocol.Internal.Types.DidChangeConfigurationRegistrationOptions 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.Text
import qualified Language.LSP.Protocol.Types.Common
data DidChangeConfigurationRegistrationOptions = DidChangeConfigurationRegistrationOptions
{
DidChangeConfigurationRegistrationOptions -> Maybe (Text |? [Text])
_section :: (Maybe (Data.Text.Text Language.LSP.Protocol.Types.Common.|? [Data.Text.Text]))
}
deriving stock (Int -> DidChangeConfigurationRegistrationOptions -> ShowS
[DidChangeConfigurationRegistrationOptions] -> ShowS
DidChangeConfigurationRegistrationOptions -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DidChangeConfigurationRegistrationOptions] -> ShowS
$cshowList :: [DidChangeConfigurationRegistrationOptions] -> ShowS
show :: DidChangeConfigurationRegistrationOptions -> String
$cshow :: DidChangeConfigurationRegistrationOptions -> String
showsPrec :: Int -> DidChangeConfigurationRegistrationOptions -> ShowS
$cshowsPrec :: Int -> DidChangeConfigurationRegistrationOptions -> ShowS
Show, DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
$c/= :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
== :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
$c== :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
Eq, Eq DidChangeConfigurationRegistrationOptions
DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Ordering
DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
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
min :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
$cmin :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
max :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
$cmax :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions
>= :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
$c>= :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
> :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
$c> :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
<= :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
$c<= :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
< :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
$c< :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Bool
compare :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Ordering
$ccompare :: DidChangeConfigurationRegistrationOptions
-> DidChangeConfigurationRegistrationOptions -> Ordering
Ord, forall x.
Rep DidChangeConfigurationRegistrationOptions x
-> DidChangeConfigurationRegistrationOptions
forall x.
DidChangeConfigurationRegistrationOptions
-> Rep DidChangeConfigurationRegistrationOptions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DidChangeConfigurationRegistrationOptions x
-> DidChangeConfigurationRegistrationOptions
$cfrom :: forall x.
DidChangeConfigurationRegistrationOptions
-> Rep DidChangeConfigurationRegistrationOptions x
Generic)
deriving anyclass (DidChangeConfigurationRegistrationOptions -> ()
forall a. (a -> ()) -> NFData a
rnf :: DidChangeConfigurationRegistrationOptions -> ()
$crnf :: DidChangeConfigurationRegistrationOptions -> ()
NFData, Eq DidChangeConfigurationRegistrationOptions
Int -> DidChangeConfigurationRegistrationOptions -> Int
DidChangeConfigurationRegistrationOptions -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: DidChangeConfigurationRegistrationOptions -> Int
$chash :: DidChangeConfigurationRegistrationOptions -> Int
hashWithSalt :: Int -> DidChangeConfigurationRegistrationOptions -> Int
$chashWithSalt :: Int -> DidChangeConfigurationRegistrationOptions -> Int
Hashable)
deriving forall ann. [DidChangeConfigurationRegistrationOptions] -> Doc ann
forall ann. DidChangeConfigurationRegistrationOptions -> Doc ann
forall a.
(forall ann. a -> Doc ann)
-> (forall ann. [a] -> Doc ann) -> Pretty a
prettyList :: forall ann. [DidChangeConfigurationRegistrationOptions] -> Doc ann
$cprettyList :: forall ann. [DidChangeConfigurationRegistrationOptions] -> Doc ann
pretty :: forall ann. DidChangeConfigurationRegistrationOptions -> Doc ann
$cpretty :: forall ann. DidChangeConfigurationRegistrationOptions -> Doc ann
Pretty via (ViaJSON DidChangeConfigurationRegistrationOptions)
instance Aeson.ToJSON DidChangeConfigurationRegistrationOptions where
toJSON :: DidChangeConfigurationRegistrationOptions -> Value
toJSON (DidChangeConfigurationRegistrationOptions Maybe (Text |? [Text])
arg0) = [Pair] -> Value
Aeson.object forall a b. (a -> b) -> a -> b
$ forall (t :: * -> *) a. Foldable t => t [a] -> [a]
concat forall a b. (a -> b) -> a -> b
$ [String
"section" forall kv v. (KeyValue kv, ToJSON v) => String -> Maybe v -> [kv]
Language.LSP.Protocol.Types.Common..=? Maybe (Text |? [Text])
arg0]
instance Aeson.FromJSON DidChangeConfigurationRegistrationOptions where
parseJSON :: Value -> Parser DidChangeConfigurationRegistrationOptions
parseJSON = forall a. String -> (Object -> Parser a) -> Value -> Parser a
Aeson.withObject String
"DidChangeConfigurationRegistrationOptions" forall a b. (a -> b) -> a -> b
$ \Object
arg -> Maybe (Text |? [Text]) -> DidChangeConfigurationRegistrationOptions
DidChangeConfigurationRegistrationOptions forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Object
arg forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Aeson..:! Key
"section"