module Stratosphere.Lex.Bot.TextLogDestinationProperty (
        module Exports, TextLogDestinationProperty(..),
        mkTextLogDestinationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Lex.Bot.CloudWatchLogGroupLogDestinationProperty as Exports
import Stratosphere.ResourceProperties
data TextLogDestinationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lex-bot-textlogdestination.html>
    TextLogDestinationProperty {TextLogDestinationProperty -> ()
haddock_workaround_ :: (),
                                -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lex-bot-textlogdestination.html#cfn-lex-bot-textlogdestination-cloudwatch>
                                TextLogDestinationProperty
-> CloudWatchLogGroupLogDestinationProperty
cloudWatch :: CloudWatchLogGroupLogDestinationProperty}
  deriving stock (TextLogDestinationProperty -> TextLogDestinationProperty -> Bool
(TextLogDestinationProperty -> TextLogDestinationProperty -> Bool)
-> (TextLogDestinationProperty
    -> TextLogDestinationProperty -> Bool)
-> Eq TextLogDestinationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TextLogDestinationProperty -> TextLogDestinationProperty -> Bool
== :: TextLogDestinationProperty -> TextLogDestinationProperty -> Bool
$c/= :: TextLogDestinationProperty -> TextLogDestinationProperty -> Bool
/= :: TextLogDestinationProperty -> TextLogDestinationProperty -> Bool
Prelude.Eq, Int -> TextLogDestinationProperty -> ShowS
[TextLogDestinationProperty] -> ShowS
TextLogDestinationProperty -> String
(Int -> TextLogDestinationProperty -> ShowS)
-> (TextLogDestinationProperty -> String)
-> ([TextLogDestinationProperty] -> ShowS)
-> Show TextLogDestinationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TextLogDestinationProperty -> ShowS
showsPrec :: Int -> TextLogDestinationProperty -> ShowS
$cshow :: TextLogDestinationProperty -> String
show :: TextLogDestinationProperty -> String
$cshowList :: [TextLogDestinationProperty] -> ShowS
showList :: [TextLogDestinationProperty] -> ShowS
Prelude.Show)
mkTextLogDestinationProperty ::
  CloudWatchLogGroupLogDestinationProperty
  -> TextLogDestinationProperty
mkTextLogDestinationProperty :: CloudWatchLogGroupLogDestinationProperty
-> TextLogDestinationProperty
mkTextLogDestinationProperty CloudWatchLogGroupLogDestinationProperty
cloudWatch
  = TextLogDestinationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), cloudWatch :: CloudWatchLogGroupLogDestinationProperty
cloudWatch = CloudWatchLogGroupLogDestinationProperty
cloudWatch}
instance ToResourceProperties TextLogDestinationProperty where
  toResourceProperties :: TextLogDestinationProperty -> ResourceProperties
toResourceProperties TextLogDestinationProperty {()
CloudWatchLogGroupLogDestinationProperty
haddock_workaround_ :: TextLogDestinationProperty -> ()
cloudWatch :: TextLogDestinationProperty
-> CloudWatchLogGroupLogDestinationProperty
haddock_workaround_ :: ()
cloudWatch :: CloudWatchLogGroupLogDestinationProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Lex::Bot.TextLogDestination",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"CloudWatch" Key -> CloudWatchLogGroupLogDestinationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CloudWatchLogGroupLogDestinationProperty
cloudWatch]}
instance JSON.ToJSON TextLogDestinationProperty where
  toJSON :: TextLogDestinationProperty -> Value
toJSON TextLogDestinationProperty {()
CloudWatchLogGroupLogDestinationProperty
haddock_workaround_ :: TextLogDestinationProperty -> ()
cloudWatch :: TextLogDestinationProperty
-> CloudWatchLogGroupLogDestinationProperty
haddock_workaround_ :: ()
cloudWatch :: CloudWatchLogGroupLogDestinationProperty
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"CloudWatch" Key -> CloudWatchLogGroupLogDestinationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= CloudWatchLogGroupLogDestinationProperty
cloudWatch]
instance Property "CloudWatch" TextLogDestinationProperty where
  type PropertyType "CloudWatch" TextLogDestinationProperty = CloudWatchLogGroupLogDestinationProperty
  set :: PropertyType "CloudWatch" TextLogDestinationProperty
-> TextLogDestinationProperty -> TextLogDestinationProperty
set PropertyType "CloudWatch" TextLogDestinationProperty
newValue TextLogDestinationProperty {()
CloudWatchLogGroupLogDestinationProperty
haddock_workaround_ :: TextLogDestinationProperty -> ()
cloudWatch :: TextLogDestinationProperty
-> CloudWatchLogGroupLogDestinationProperty
haddock_workaround_ :: ()
cloudWatch :: CloudWatchLogGroupLogDestinationProperty
..}
    = TextLogDestinationProperty {cloudWatch :: CloudWatchLogGroupLogDestinationProperty
cloudWatch = PropertyType "CloudWatch" TextLogDestinationProperty
CloudWatchLogGroupLogDestinationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}