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