module Stratosphere.AppSync.DomainNameApiAssociation (
DomainNameApiAssociation(..), mkDomainNameApiAssociation
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DomainNameApiAssociation
=
DomainNameApiAssociation {DomainNameApiAssociation -> ()
haddock_workaround_ :: (),
DomainNameApiAssociation -> Value Text
apiId :: (Value Prelude.Text),
DomainNameApiAssociation -> Value Text
domainName :: (Value Prelude.Text)}
deriving stock (DomainNameApiAssociation -> DomainNameApiAssociation -> Bool
(DomainNameApiAssociation -> DomainNameApiAssociation -> Bool)
-> (DomainNameApiAssociation -> DomainNameApiAssociation -> Bool)
-> Eq DomainNameApiAssociation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DomainNameApiAssociation -> DomainNameApiAssociation -> Bool
== :: DomainNameApiAssociation -> DomainNameApiAssociation -> Bool
$c/= :: DomainNameApiAssociation -> DomainNameApiAssociation -> Bool
/= :: DomainNameApiAssociation -> DomainNameApiAssociation -> Bool
Prelude.Eq, Int -> DomainNameApiAssociation -> ShowS
[DomainNameApiAssociation] -> ShowS
DomainNameApiAssociation -> String
(Int -> DomainNameApiAssociation -> ShowS)
-> (DomainNameApiAssociation -> String)
-> ([DomainNameApiAssociation] -> ShowS)
-> Show DomainNameApiAssociation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DomainNameApiAssociation -> ShowS
showsPrec :: Int -> DomainNameApiAssociation -> ShowS
$cshow :: DomainNameApiAssociation -> String
show :: DomainNameApiAssociation -> String
$cshowList :: [DomainNameApiAssociation] -> ShowS
showList :: [DomainNameApiAssociation] -> ShowS
Prelude.Show)
mkDomainNameApiAssociation ::
Value Prelude.Text
-> Value Prelude.Text -> DomainNameApiAssociation
mkDomainNameApiAssociation :: Value Text -> Value Text -> DomainNameApiAssociation
mkDomainNameApiAssociation Value Text
apiId Value Text
domainName
= DomainNameApiAssociation
{haddock_workaround_ :: ()
haddock_workaround_ = (), apiId :: Value Text
apiId = Value Text
apiId, domainName :: Value Text
domainName = Value Text
domainName}
instance ToResourceProperties DomainNameApiAssociation where
toResourceProperties :: DomainNameApiAssociation -> ResourceProperties
toResourceProperties DomainNameApiAssociation {()
Value Text
haddock_workaround_ :: DomainNameApiAssociation -> ()
apiId :: DomainNameApiAssociation -> Value Text
domainName :: DomainNameApiAssociation -> Value Text
haddock_workaround_ :: ()
apiId :: Value Text
domainName :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::AppSync::DomainNameApiAssociation",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"ApiId" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
apiId,
Key
"DomainName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
domainName]}
instance JSON.ToJSON DomainNameApiAssociation where
toJSON :: DomainNameApiAssociation -> Value
toJSON DomainNameApiAssociation {()
Value Text
haddock_workaround_ :: DomainNameApiAssociation -> ()
apiId :: DomainNameApiAssociation -> Value Text
domainName :: DomainNameApiAssociation -> Value Text
haddock_workaround_ :: ()
apiId :: Value Text
domainName :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"ApiId" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
apiId, Key
"DomainName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
domainName]
instance Property "ApiId" DomainNameApiAssociation where
type PropertyType "ApiId" DomainNameApiAssociation = Value Prelude.Text
set :: PropertyType "ApiId" DomainNameApiAssociation
-> DomainNameApiAssociation -> DomainNameApiAssociation
set PropertyType "ApiId" DomainNameApiAssociation
newValue DomainNameApiAssociation {()
Value Text
haddock_workaround_ :: DomainNameApiAssociation -> ()
apiId :: DomainNameApiAssociation -> Value Text
domainName :: DomainNameApiAssociation -> Value Text
haddock_workaround_ :: ()
apiId :: Value Text
domainName :: Value Text
..}
= DomainNameApiAssociation {apiId :: Value Text
apiId = PropertyType "ApiId" DomainNameApiAssociation
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
domainName :: Value Text
haddock_workaround_ :: ()
domainName :: Value Text
..}
instance Property "DomainName" DomainNameApiAssociation where
type PropertyType "DomainName" DomainNameApiAssociation = Value Prelude.Text
set :: PropertyType "DomainName" DomainNameApiAssociation
-> DomainNameApiAssociation -> DomainNameApiAssociation
set PropertyType "DomainName" DomainNameApiAssociation
newValue DomainNameApiAssociation {()
Value Text
haddock_workaround_ :: DomainNameApiAssociation -> ()
apiId :: DomainNameApiAssociation -> Value Text
domainName :: DomainNameApiAssociation -> Value Text
haddock_workaround_ :: ()
apiId :: Value Text
domainName :: Value Text
..}
= DomainNameApiAssociation {domainName :: Value Text
domainName = PropertyType "DomainName" DomainNameApiAssociation
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
haddock_workaround_ :: ()
apiId :: Value Text
..}