module Stratosphere.KinesisAnalyticsV2.ApplicationOutput.KinesisFirehoseOutputProperty (
KinesisFirehoseOutputProperty(..), mkKinesisFirehoseOutputProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data KinesisFirehoseOutputProperty
=
KinesisFirehoseOutputProperty {KinesisFirehoseOutputProperty -> ()
haddock_workaround_ :: (),
KinesisFirehoseOutputProperty -> Value Text
resourceARN :: (Value Prelude.Text)}
deriving stock (KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool
(KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool)
-> (KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool)
-> Eq KinesisFirehoseOutputProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool
== :: KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool
$c/= :: KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool
/= :: KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> Bool
Prelude.Eq, Int -> KinesisFirehoseOutputProperty -> ShowS
[KinesisFirehoseOutputProperty] -> ShowS
KinesisFirehoseOutputProperty -> String
(Int -> KinesisFirehoseOutputProperty -> ShowS)
-> (KinesisFirehoseOutputProperty -> String)
-> ([KinesisFirehoseOutputProperty] -> ShowS)
-> Show KinesisFirehoseOutputProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> KinesisFirehoseOutputProperty -> ShowS
showsPrec :: Int -> KinesisFirehoseOutputProperty -> ShowS
$cshow :: KinesisFirehoseOutputProperty -> String
show :: KinesisFirehoseOutputProperty -> String
$cshowList :: [KinesisFirehoseOutputProperty] -> ShowS
showList :: [KinesisFirehoseOutputProperty] -> ShowS
Prelude.Show)
mkKinesisFirehoseOutputProperty ::
Value Prelude.Text -> KinesisFirehoseOutputProperty
mkKinesisFirehoseOutputProperty :: Value Text -> KinesisFirehoseOutputProperty
mkKinesisFirehoseOutputProperty Value Text
resourceARN
= KinesisFirehoseOutputProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), resourceARN :: Value Text
resourceARN = Value Text
resourceARN}
instance ToResourceProperties KinesisFirehoseOutputProperty where
toResourceProperties :: KinesisFirehoseOutputProperty -> ResourceProperties
toResourceProperties KinesisFirehoseOutputProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseOutputProperty -> ()
resourceARN :: KinesisFirehoseOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::KinesisAnalyticsV2::ApplicationOutput.KinesisFirehoseOutput",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"ResourceARN" 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
resourceARN]}
instance JSON.ToJSON KinesisFirehoseOutputProperty where
toJSON :: KinesisFirehoseOutputProperty -> Value
toJSON KinesisFirehoseOutputProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseOutputProperty -> ()
resourceARN :: KinesisFirehoseOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"ResourceARN" 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
resourceARN]
instance Property "ResourceARN" KinesisFirehoseOutputProperty where
type PropertyType "ResourceARN" KinesisFirehoseOutputProperty = Value Prelude.Text
set :: PropertyType "ResourceARN" KinesisFirehoseOutputProperty
-> KinesisFirehoseOutputProperty -> KinesisFirehoseOutputProperty
set PropertyType "ResourceARN" KinesisFirehoseOutputProperty
newValue KinesisFirehoseOutputProperty {()
Value Text
haddock_workaround_ :: KinesisFirehoseOutputProperty -> ()
resourceARN :: KinesisFirehoseOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
..}
= KinesisFirehoseOutputProperty {resourceARN :: Value Text
resourceARN = PropertyType "ResourceARN" KinesisFirehoseOutputProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}