packages feed

stratosphere-dynamodb-1.0.0: gen/Stratosphere/DynamoDB/GlobalTable/ReplicaStreamSpecificationProperty.hs

module Stratosphere.DynamoDB.GlobalTable.ReplicaStreamSpecificationProperty (
        module Exports, ReplicaStreamSpecificationProperty(..),
        mkReplicaStreamSpecificationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DynamoDB.GlobalTable.ResourcePolicyProperty as Exports
import Stratosphere.ResourceProperties
data ReplicaStreamSpecificationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dynamodb-globaltable-replicastreamspecification.html>
    ReplicaStreamSpecificationProperty {haddock_workaround_ :: (),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-dynamodb-globaltable-replicastreamspecification.html#cfn-dynamodb-globaltable-replicastreamspecification-resourcepolicy>
                                        resourcePolicy :: ResourcePolicyProperty}
  deriving stock (Prelude.Eq, Prelude.Show)
mkReplicaStreamSpecificationProperty ::
  ResourcePolicyProperty -> ReplicaStreamSpecificationProperty
mkReplicaStreamSpecificationProperty resourcePolicy
  = ReplicaStreamSpecificationProperty
      {haddock_workaround_ = (), resourcePolicy = resourcePolicy}
instance ToResourceProperties ReplicaStreamSpecificationProperty where
  toResourceProperties ReplicaStreamSpecificationProperty {..}
    = ResourceProperties
        {awsType = "AWS::DynamoDB::GlobalTable.ReplicaStreamSpecification",
         supportsTags = Prelude.False,
         properties = ["ResourcePolicy" JSON..= resourcePolicy]}
instance JSON.ToJSON ReplicaStreamSpecificationProperty where
  toJSON ReplicaStreamSpecificationProperty {..}
    = JSON.object ["ResourcePolicy" JSON..= resourcePolicy]
instance Property "ResourcePolicy" ReplicaStreamSpecificationProperty where
  type PropertyType "ResourcePolicy" ReplicaStreamSpecificationProperty = ResourcePolicyProperty
  set newValue ReplicaStreamSpecificationProperty {..}
    = ReplicaStreamSpecificationProperty
        {resourcePolicy = newValue, ..}