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