module Stratosphere.RefactorSpaces.Service.LambdaEndpointInputProperty (
        LambdaEndpointInputProperty(..), mkLambdaEndpointInputProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data LambdaEndpointInputProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-refactorspaces-service-lambdaendpointinput.html>
    LambdaEndpointInputProperty {LambdaEndpointInputProperty -> ()
haddock_workaround_ :: (),
                                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-refactorspaces-service-lambdaendpointinput.html#cfn-refactorspaces-service-lambdaendpointinput-arn>
                                 LambdaEndpointInputProperty -> Value Text
arn :: (Value Prelude.Text)}
  deriving stock (LambdaEndpointInputProperty -> LambdaEndpointInputProperty -> Bool
(LambdaEndpointInputProperty
 -> LambdaEndpointInputProperty -> Bool)
-> (LambdaEndpointInputProperty
    -> LambdaEndpointInputProperty -> Bool)
-> Eq LambdaEndpointInputProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LambdaEndpointInputProperty -> LambdaEndpointInputProperty -> Bool
== :: LambdaEndpointInputProperty -> LambdaEndpointInputProperty -> Bool
$c/= :: LambdaEndpointInputProperty -> LambdaEndpointInputProperty -> Bool
/= :: LambdaEndpointInputProperty -> LambdaEndpointInputProperty -> Bool
Prelude.Eq, Int -> LambdaEndpointInputProperty -> ShowS
[LambdaEndpointInputProperty] -> ShowS
LambdaEndpointInputProperty -> String
(Int -> LambdaEndpointInputProperty -> ShowS)
-> (LambdaEndpointInputProperty -> String)
-> ([LambdaEndpointInputProperty] -> ShowS)
-> Show LambdaEndpointInputProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LambdaEndpointInputProperty -> ShowS
showsPrec :: Int -> LambdaEndpointInputProperty -> ShowS
$cshow :: LambdaEndpointInputProperty -> String
show :: LambdaEndpointInputProperty -> String
$cshowList :: [LambdaEndpointInputProperty] -> ShowS
showList :: [LambdaEndpointInputProperty] -> ShowS
Prelude.Show)
mkLambdaEndpointInputProperty ::
  Value Prelude.Text -> LambdaEndpointInputProperty
mkLambdaEndpointInputProperty :: Value Text -> LambdaEndpointInputProperty
mkLambdaEndpointInputProperty Value Text
arn
  = LambdaEndpointInputProperty {haddock_workaround_ :: ()
haddock_workaround_ = (), arn :: Value Text
arn = Value Text
arn}
instance ToResourceProperties LambdaEndpointInputProperty where
  toResourceProperties :: LambdaEndpointInputProperty -> ResourceProperties
toResourceProperties LambdaEndpointInputProperty {()
Value Text
haddock_workaround_ :: LambdaEndpointInputProperty -> ()
arn :: LambdaEndpointInputProperty -> Value Text
haddock_workaround_ :: ()
arn :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::RefactorSpaces::Service.LambdaEndpointInput",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False, properties :: Object
properties = [Key
"Arn" 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
arn]}
instance JSON.ToJSON LambdaEndpointInputProperty where
  toJSON :: LambdaEndpointInputProperty -> Value
toJSON LambdaEndpointInputProperty {()
Value Text
haddock_workaround_ :: LambdaEndpointInputProperty -> ()
arn :: LambdaEndpointInputProperty -> Value Text
haddock_workaround_ :: ()
arn :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Arn" 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
arn]
instance Property "Arn" LambdaEndpointInputProperty where
  type PropertyType "Arn" LambdaEndpointInputProperty = Value Prelude.Text
  set :: PropertyType "Arn" LambdaEndpointInputProperty
-> LambdaEndpointInputProperty -> LambdaEndpointInputProperty
set PropertyType "Arn" LambdaEndpointInputProperty
newValue LambdaEndpointInputProperty {()
Value Text
haddock_workaround_ :: LambdaEndpointInputProperty -> ()
arn :: LambdaEndpointInputProperty -> Value Text
haddock_workaround_ :: ()
arn :: Value Text
..}
    = LambdaEndpointInputProperty {arn :: Value Text
arn = PropertyType "Arn" LambdaEndpointInputProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}