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