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