-- 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.InlineValue where

import Control.DeepSeq
import Data.Hashable
import GHC.Generics
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.Internal.Types.InlineValueEvaluatableExpression
import qualified Language.LSP.Protocol.Internal.Types.InlineValueText
import qualified Language.LSP.Protocol.Internal.Types.InlineValueVariableLookup
import qualified Language.LSP.Protocol.Types.Common

{-|
Inline value information can be provided by different means:
- directly as a text value (class InlineValueText).
- as a name to use for a variable lookup (class InlineValueVariableLookup)
- as an evaluatable expression (class InlineValueEvaluatableExpression)
The InlineValue types combines all inline value types into one type.

@since 3.17.0
-}
newtype InlineValue = InlineValue (Language.LSP.Protocol.Internal.Types.InlineValueText.InlineValueText Language.LSP.Protocol.Types.Common.|? (Language.LSP.Protocol.Internal.Types.InlineValueVariableLookup.InlineValueVariableLookup Language.LSP.Protocol.Types.Common.|? Language.LSP.Protocol.Internal.Types.InlineValueEvaluatableExpression.InlineValueEvaluatableExpression))
  deriving newtype ([InlineValue] -> Encoding
[InlineValue] -> Value
InlineValue -> Encoding
InlineValue -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [InlineValue] -> Encoding
$ctoEncodingList :: [InlineValue] -> Encoding
toJSONList :: [InlineValue] -> Value
$ctoJSONList :: [InlineValue] -> Value
toEncoding :: InlineValue -> Encoding
$ctoEncoding :: InlineValue -> Encoding
toJSON :: InlineValue -> Value
$ctoJSON :: InlineValue -> Value
Aeson.ToJSON, Value -> Parser [InlineValue]
Value -> Parser InlineValue
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [InlineValue]
$cparseJSONList :: Value -> Parser [InlineValue]
parseJSON :: Value -> Parser InlineValue
$cparseJSON :: Value -> Parser InlineValue
Aeson.FromJSON)
  deriving stock (Int -> InlineValue -> ShowS
[InlineValue] -> ShowS
InlineValue -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InlineValue] -> ShowS
$cshowList :: [InlineValue] -> ShowS
show :: InlineValue -> String
$cshow :: InlineValue -> String
showsPrec :: Int -> InlineValue -> ShowS
$cshowsPrec :: Int -> InlineValue -> ShowS
Show, InlineValue -> InlineValue -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InlineValue -> InlineValue -> Bool
$c/= :: InlineValue -> InlineValue -> Bool
== :: InlineValue -> InlineValue -> Bool
$c== :: InlineValue -> InlineValue -> Bool
Eq, Eq InlineValue
InlineValue -> InlineValue -> Bool
InlineValue -> InlineValue -> Ordering
InlineValue -> InlineValue -> InlineValue
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 :: InlineValue -> InlineValue -> InlineValue
$cmin :: InlineValue -> InlineValue -> InlineValue
max :: InlineValue -> InlineValue -> InlineValue
$cmax :: InlineValue -> InlineValue -> InlineValue
>= :: InlineValue -> InlineValue -> Bool
$c>= :: InlineValue -> InlineValue -> Bool
> :: InlineValue -> InlineValue -> Bool
$c> :: InlineValue -> InlineValue -> Bool
<= :: InlineValue -> InlineValue -> Bool
$c<= :: InlineValue -> InlineValue -> Bool
< :: InlineValue -> InlineValue -> Bool
$c< :: InlineValue -> InlineValue -> Bool
compare :: InlineValue -> InlineValue -> Ordering
$ccompare :: InlineValue -> InlineValue -> Ordering
Ord, forall x. Rep InlineValue x -> InlineValue
forall x. InlineValue -> Rep InlineValue x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InlineValue x -> InlineValue
$cfrom :: forall x. InlineValue -> Rep InlineValue x
Generic)
  deriving anyclass (InlineValue -> ()
forall a. (a -> ()) -> NFData a
rnf :: InlineValue -> ()
$crnf :: InlineValue -> ()
NFData, Eq InlineValue
Int -> InlineValue -> Int
InlineValue -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: InlineValue -> Int
$chash :: InlineValue -> Int
hashWithSalt :: Int -> InlineValue -> Int
$chashWithSalt :: Int -> InlineValue -> Int
Hashable)