packages feed

stratosphere-aps-1.0.0: gen/Stratosphere/APS/Scraper/DestinationProperty.hs

module Stratosphere.APS.Scraper.DestinationProperty (
        module Exports, DestinationProperty(..), mkDestinationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.APS.Scraper.AmpConfigurationProperty as Exports
import Stratosphere.ResourceProperties
data DestinationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-aps-scraper-destination.html>
    DestinationProperty {haddock_workaround_ :: (),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-aps-scraper-destination.html#cfn-aps-scraper-destination-ampconfiguration>
                         ampConfiguration :: AmpConfigurationProperty}
  deriving stock (Prelude.Eq, Prelude.Show)
mkDestinationProperty ::
  AmpConfigurationProperty -> DestinationProperty
mkDestinationProperty ampConfiguration
  = DestinationProperty
      {haddock_workaround_ = (), ampConfiguration = ampConfiguration}
instance ToResourceProperties DestinationProperty where
  toResourceProperties DestinationProperty {..}
    = ResourceProperties
        {awsType = "AWS::APS::Scraper.Destination",
         supportsTags = Prelude.False,
         properties = ["AmpConfiguration" JSON..= ampConfiguration]}
instance JSON.ToJSON DestinationProperty where
  toJSON DestinationProperty {..}
    = JSON.object ["AmpConfiguration" JSON..= ampConfiguration]
instance Property "AmpConfiguration" DestinationProperty where
  type PropertyType "AmpConfiguration" DestinationProperty = AmpConfigurationProperty
  set newValue DestinationProperty {..}
    = DestinationProperty {ampConfiguration = newValue, ..}