module Stratosphere.Greengrass.ConnectorDefinition.ConnectorDefinitionVersionProperty (
module Exports, ConnectorDefinitionVersionProperty(..),
mkConnectorDefinitionVersionProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Greengrass.ConnectorDefinition.ConnectorProperty as Exports
import Stratosphere.ResourceProperties
data ConnectorDefinitionVersionProperty
=
ConnectorDefinitionVersionProperty {ConnectorDefinitionVersionProperty -> ()
haddock_workaround_ :: (),
ConnectorDefinitionVersionProperty -> [ConnectorProperty]
connectors :: [ConnectorProperty]}
deriving stock (ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool
(ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool)
-> (ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool)
-> Eq ConnectorDefinitionVersionProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool
== :: ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool
$c/= :: ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool
/= :: ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty -> Bool
Prelude.Eq, Int -> ConnectorDefinitionVersionProperty -> ShowS
[ConnectorDefinitionVersionProperty] -> ShowS
ConnectorDefinitionVersionProperty -> String
(Int -> ConnectorDefinitionVersionProperty -> ShowS)
-> (ConnectorDefinitionVersionProperty -> String)
-> ([ConnectorDefinitionVersionProperty] -> ShowS)
-> Show ConnectorDefinitionVersionProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ConnectorDefinitionVersionProperty -> ShowS
showsPrec :: Int -> ConnectorDefinitionVersionProperty -> ShowS
$cshow :: ConnectorDefinitionVersionProperty -> String
show :: ConnectorDefinitionVersionProperty -> String
$cshowList :: [ConnectorDefinitionVersionProperty] -> ShowS
showList :: [ConnectorDefinitionVersionProperty] -> ShowS
Prelude.Show)
mkConnectorDefinitionVersionProperty ::
[ConnectorProperty] -> ConnectorDefinitionVersionProperty
mkConnectorDefinitionVersionProperty :: [ConnectorProperty] -> ConnectorDefinitionVersionProperty
mkConnectorDefinitionVersionProperty [ConnectorProperty]
connectors
= ConnectorDefinitionVersionProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), connectors :: [ConnectorProperty]
connectors = [ConnectorProperty]
connectors}
instance ToResourceProperties ConnectorDefinitionVersionProperty where
toResourceProperties :: ConnectorDefinitionVersionProperty -> ResourceProperties
toResourceProperties ConnectorDefinitionVersionProperty {[ConnectorProperty]
()
haddock_workaround_ :: ConnectorDefinitionVersionProperty -> ()
connectors :: ConnectorDefinitionVersionProperty -> [ConnectorProperty]
haddock_workaround_ :: ()
connectors :: [ConnectorProperty]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Greengrass::ConnectorDefinition.ConnectorDefinitionVersion",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Connectors" Key -> [ConnectorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [ConnectorProperty]
connectors]}
instance JSON.ToJSON ConnectorDefinitionVersionProperty where
toJSON :: ConnectorDefinitionVersionProperty -> Value
toJSON ConnectorDefinitionVersionProperty {[ConnectorProperty]
()
haddock_workaround_ :: ConnectorDefinitionVersionProperty -> ()
connectors :: ConnectorDefinitionVersionProperty -> [ConnectorProperty]
haddock_workaround_ :: ()
connectors :: [ConnectorProperty]
..}
= [(Key, Value)] -> Value
JSON.object [Key
"Connectors" Key -> [ConnectorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [ConnectorProperty]
connectors]
instance Property "Connectors" ConnectorDefinitionVersionProperty where
type PropertyType "Connectors" ConnectorDefinitionVersionProperty = [ConnectorProperty]
set :: PropertyType "Connectors" ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty
-> ConnectorDefinitionVersionProperty
set PropertyType "Connectors" ConnectorDefinitionVersionProperty
newValue ConnectorDefinitionVersionProperty {[ConnectorProperty]
()
haddock_workaround_ :: ConnectorDefinitionVersionProperty -> ()
connectors :: ConnectorDefinitionVersionProperty -> [ConnectorProperty]
haddock_workaround_ :: ()
connectors :: [ConnectorProperty]
..}
= ConnectorDefinitionVersionProperty {connectors :: [ConnectorProperty]
connectors = [ConnectorProperty]
PropertyType "Connectors" ConnectorDefinitionVersionProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}