{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Amazonka.IVSChat.Types.ChatTokenCapability
( ChatTokenCapability
( ..,
ChatTokenCapability_DELETE_MESSAGE,
ChatTokenCapability_DISCONNECT_USER,
ChatTokenCapability_SEND_MESSAGE
),
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
newtype ChatTokenCapability = ChatTokenCapability'
{ ChatTokenCapability -> Text
fromChatTokenCapability ::
Data.Text
}
deriving stock
( Int -> ChatTokenCapability -> ShowS
[ChatTokenCapability] -> ShowS
ChatTokenCapability -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatTokenCapability] -> ShowS
$cshowList :: [ChatTokenCapability] -> ShowS
show :: ChatTokenCapability -> String
$cshow :: ChatTokenCapability -> String
showsPrec :: Int -> ChatTokenCapability -> ShowS
$cshowsPrec :: Int -> ChatTokenCapability -> ShowS
Prelude.Show,
ReadPrec [ChatTokenCapability]
ReadPrec ChatTokenCapability
Int -> ReadS ChatTokenCapability
ReadS [ChatTokenCapability]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ChatTokenCapability]
$creadListPrec :: ReadPrec [ChatTokenCapability]
readPrec :: ReadPrec ChatTokenCapability
$creadPrec :: ReadPrec ChatTokenCapability
readList :: ReadS [ChatTokenCapability]
$creadList :: ReadS [ChatTokenCapability]
readsPrec :: Int -> ReadS ChatTokenCapability
$creadsPrec :: Int -> ReadS ChatTokenCapability
Prelude.Read,
ChatTokenCapability -> ChatTokenCapability -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatTokenCapability -> ChatTokenCapability -> Bool
$c/= :: ChatTokenCapability -> ChatTokenCapability -> Bool
== :: ChatTokenCapability -> ChatTokenCapability -> Bool
$c== :: ChatTokenCapability -> ChatTokenCapability -> Bool
Prelude.Eq,
Eq ChatTokenCapability
ChatTokenCapability -> ChatTokenCapability -> Bool
ChatTokenCapability -> ChatTokenCapability -> Ordering
ChatTokenCapability -> ChatTokenCapability -> ChatTokenCapability
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 :: ChatTokenCapability -> ChatTokenCapability -> ChatTokenCapability
$cmin :: ChatTokenCapability -> ChatTokenCapability -> ChatTokenCapability
max :: ChatTokenCapability -> ChatTokenCapability -> ChatTokenCapability
$cmax :: ChatTokenCapability -> ChatTokenCapability -> ChatTokenCapability
>= :: ChatTokenCapability -> ChatTokenCapability -> Bool
$c>= :: ChatTokenCapability -> ChatTokenCapability -> Bool
> :: ChatTokenCapability -> ChatTokenCapability -> Bool
$c> :: ChatTokenCapability -> ChatTokenCapability -> Bool
<= :: ChatTokenCapability -> ChatTokenCapability -> Bool
$c<= :: ChatTokenCapability -> ChatTokenCapability -> Bool
< :: ChatTokenCapability -> ChatTokenCapability -> Bool
$c< :: ChatTokenCapability -> ChatTokenCapability -> Bool
compare :: ChatTokenCapability -> ChatTokenCapability -> Ordering
$ccompare :: ChatTokenCapability -> ChatTokenCapability -> Ordering
Prelude.Ord,
forall x. Rep ChatTokenCapability x -> ChatTokenCapability
forall x. ChatTokenCapability -> Rep ChatTokenCapability x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatTokenCapability x -> ChatTokenCapability
$cfrom :: forall x. ChatTokenCapability -> Rep ChatTokenCapability x
Prelude.Generic
)
deriving newtype
( Eq ChatTokenCapability
Int -> ChatTokenCapability -> Int
ChatTokenCapability -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: ChatTokenCapability -> Int
$chash :: ChatTokenCapability -> Int
hashWithSalt :: Int -> ChatTokenCapability -> Int
$chashWithSalt :: Int -> ChatTokenCapability -> Int
Prelude.Hashable,
ChatTokenCapability -> ()
forall a. (a -> ()) -> NFData a
rnf :: ChatTokenCapability -> ()
$crnf :: ChatTokenCapability -> ()
Prelude.NFData,
Text -> Either String ChatTokenCapability
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String ChatTokenCapability
$cfromText :: Text -> Either String ChatTokenCapability
Data.FromText,
ChatTokenCapability -> Text
forall a. (a -> Text) -> ToText a
toText :: ChatTokenCapability -> Text
$ctoText :: ChatTokenCapability -> Text
Data.ToText,
ChatTokenCapability -> ByteString
forall a. (a -> ByteString) -> ToByteString a
toBS :: ChatTokenCapability -> ByteString
$ctoBS :: ChatTokenCapability -> ByteString
Data.ToByteString,
ChatTokenCapability -> ByteStringBuilder
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: ChatTokenCapability -> ByteStringBuilder
$cbuild :: ChatTokenCapability -> ByteStringBuilder
Data.ToLog,
HeaderName -> ChatTokenCapability -> [Header]
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> ChatTokenCapability -> [Header]
$ctoHeader :: HeaderName -> ChatTokenCapability -> [Header]
Data.ToHeader,
ChatTokenCapability -> QueryString
forall a. (a -> QueryString) -> ToQuery a
toQuery :: ChatTokenCapability -> QueryString
$ctoQuery :: ChatTokenCapability -> QueryString
Data.ToQuery,
Value -> Parser [ChatTokenCapability]
Value -> Parser ChatTokenCapability
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [ChatTokenCapability]
$cparseJSONList :: Value -> Parser [ChatTokenCapability]
parseJSON :: Value -> Parser ChatTokenCapability
$cparseJSON :: Value -> Parser ChatTokenCapability
Data.FromJSON,
FromJSONKeyFunction [ChatTokenCapability]
FromJSONKeyFunction ChatTokenCapability
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [ChatTokenCapability]
$cfromJSONKeyList :: FromJSONKeyFunction [ChatTokenCapability]
fromJSONKey :: FromJSONKeyFunction ChatTokenCapability
$cfromJSONKey :: FromJSONKeyFunction ChatTokenCapability
Data.FromJSONKey,
[ChatTokenCapability] -> Encoding
[ChatTokenCapability] -> Value
ChatTokenCapability -> Encoding
ChatTokenCapability -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [ChatTokenCapability] -> Encoding
$ctoEncodingList :: [ChatTokenCapability] -> Encoding
toJSONList :: [ChatTokenCapability] -> Value
$ctoJSONList :: [ChatTokenCapability] -> Value
toEncoding :: ChatTokenCapability -> Encoding
$ctoEncoding :: ChatTokenCapability -> Encoding
toJSON :: ChatTokenCapability -> Value
$ctoJSON :: ChatTokenCapability -> Value
Data.ToJSON,
ToJSONKeyFunction [ChatTokenCapability]
ToJSONKeyFunction ChatTokenCapability
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [ChatTokenCapability]
$ctoJSONKeyList :: ToJSONKeyFunction [ChatTokenCapability]
toJSONKey :: ToJSONKeyFunction ChatTokenCapability
$ctoJSONKey :: ToJSONKeyFunction ChatTokenCapability
Data.ToJSONKey,
[Node] -> Either String ChatTokenCapability
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String ChatTokenCapability
$cparseXML :: [Node] -> Either String ChatTokenCapability
Data.FromXML,
ChatTokenCapability -> XML
forall a. (a -> XML) -> ToXML a
toXML :: ChatTokenCapability -> XML
$ctoXML :: ChatTokenCapability -> XML
Data.ToXML
)
pattern ChatTokenCapability_DELETE_MESSAGE :: ChatTokenCapability
pattern $bChatTokenCapability_DELETE_MESSAGE :: ChatTokenCapability
$mChatTokenCapability_DELETE_MESSAGE :: forall {r}.
ChatTokenCapability -> ((# #) -> r) -> ((# #) -> r) -> r
ChatTokenCapability_DELETE_MESSAGE = ChatTokenCapability' "DELETE_MESSAGE"
pattern ChatTokenCapability_DISCONNECT_USER :: ChatTokenCapability
pattern $bChatTokenCapability_DISCONNECT_USER :: ChatTokenCapability
$mChatTokenCapability_DISCONNECT_USER :: forall {r}.
ChatTokenCapability -> ((# #) -> r) -> ((# #) -> r) -> r
ChatTokenCapability_DISCONNECT_USER = ChatTokenCapability' "DISCONNECT_USER"
pattern ChatTokenCapability_SEND_MESSAGE :: ChatTokenCapability
pattern $bChatTokenCapability_SEND_MESSAGE :: ChatTokenCapability
$mChatTokenCapability_SEND_MESSAGE :: forall {r}.
ChatTokenCapability -> ((# #) -> r) -> ((# #) -> r) -> r
ChatTokenCapability_SEND_MESSAGE = ChatTokenCapability' "SEND_MESSAGE"
{-# COMPLETE
ChatTokenCapability_DELETE_MESSAGE,
ChatTokenCapability_DISCONNECT_USER,
ChatTokenCapability_SEND_MESSAGE,
ChatTokenCapability'
#-}