module Stratosphere.Greengrass.FunctionDefinition.FunctionConfigurationProperty (
        module Exports, FunctionConfigurationProperty(..),
        mkFunctionConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Greengrass.FunctionDefinition.EnvironmentProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data FunctionConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html>
    FunctionConfigurationProperty {FunctionConfigurationProperty -> ()
haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-encodingtype>
                                   FunctionConfigurationProperty -> Maybe (Value Text)
encodingType :: (Prelude.Maybe (Value Prelude.Text)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-environment>
                                   FunctionConfigurationProperty -> Maybe EnvironmentProperty
environment :: (Prelude.Maybe EnvironmentProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-execargs>
                                   FunctionConfigurationProperty -> Maybe (Value Text)
execArgs :: (Prelude.Maybe (Value Prelude.Text)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-executable>
                                   FunctionConfigurationProperty -> Maybe (Value Text)
executable :: (Prelude.Maybe (Value Prelude.Text)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-memorysize>
                                   FunctionConfigurationProperty -> Maybe (Value Integer)
memorySize :: (Prelude.Maybe (Value Prelude.Integer)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-pinned>
                                   FunctionConfigurationProperty -> Maybe (Value Bool)
pinned :: (Prelude.Maybe (Value Prelude.Bool)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-greengrass-functiondefinition-functionconfiguration.html#cfn-greengrass-functiondefinition-functionconfiguration-timeout>
                                   FunctionConfigurationProperty -> Maybe (Value Integer)
timeout :: (Prelude.Maybe (Value Prelude.Integer))}
  deriving stock (FunctionConfigurationProperty
-> FunctionConfigurationProperty -> Bool
(FunctionConfigurationProperty
 -> FunctionConfigurationProperty -> Bool)
-> (FunctionConfigurationProperty
    -> FunctionConfigurationProperty -> Bool)
-> Eq FunctionConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FunctionConfigurationProperty
-> FunctionConfigurationProperty -> Bool
== :: FunctionConfigurationProperty
-> FunctionConfigurationProperty -> Bool
$c/= :: FunctionConfigurationProperty
-> FunctionConfigurationProperty -> Bool
/= :: FunctionConfigurationProperty
-> FunctionConfigurationProperty -> Bool
Prelude.Eq, Int -> FunctionConfigurationProperty -> ShowS
[FunctionConfigurationProperty] -> ShowS
FunctionConfigurationProperty -> String
(Int -> FunctionConfigurationProperty -> ShowS)
-> (FunctionConfigurationProperty -> String)
-> ([FunctionConfigurationProperty] -> ShowS)
-> Show FunctionConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> FunctionConfigurationProperty -> ShowS
showsPrec :: Int -> FunctionConfigurationProperty -> ShowS
$cshow :: FunctionConfigurationProperty -> String
show :: FunctionConfigurationProperty -> String
$cshowList :: [FunctionConfigurationProperty] -> ShowS
showList :: [FunctionConfigurationProperty] -> ShowS
Prelude.Show)
mkFunctionConfigurationProperty :: FunctionConfigurationProperty
mkFunctionConfigurationProperty :: FunctionConfigurationProperty
mkFunctionConfigurationProperty
  = FunctionConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), encodingType :: Maybe (Value Text)
encodingType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       environment :: Maybe EnvironmentProperty
environment = Maybe EnvironmentProperty
forall a. Maybe a
Prelude.Nothing, execArgs :: Maybe (Value Text)
execArgs = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       executable :: Maybe (Value Text)
executable = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, memorySize :: Maybe (Value Integer)
memorySize = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       pinned :: Maybe (Value Bool)
pinned = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, timeout :: Maybe (Value Integer)
timeout = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties FunctionConfigurationProperty where
  toResourceProperties :: FunctionConfigurationProperty -> ResourceProperties
toResourceProperties FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Greengrass::FunctionDefinition.FunctionConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [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..=) Key
"EncodingType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
encodingType,
                            Key -> EnvironmentProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Environment" (EnvironmentProperty -> (Key, Value))
-> Maybe EnvironmentProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EnvironmentProperty
environment,
                            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..=) Key
"ExecArgs" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
execArgs,
                            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..=) Key
"Executable" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
executable,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MemorySize" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
memorySize,
                            Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Pinned" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
pinned,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Timeout" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
timeout])}
instance JSON.ToJSON FunctionConfigurationProperty where
  toJSON :: FunctionConfigurationProperty -> Value
toJSON FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [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..=) Key
"EncodingType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
encodingType,
               Key -> EnvironmentProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Environment" (EnvironmentProperty -> (Key, Value))
-> Maybe EnvironmentProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EnvironmentProperty
environment,
               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..=) Key
"ExecArgs" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
execArgs,
               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..=) Key
"Executable" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
executable,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MemorySize" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
memorySize,
               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Pinned" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
pinned,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Timeout" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
timeout]))
instance Property "EncodingType" FunctionConfigurationProperty where
  type PropertyType "EncodingType" FunctionConfigurationProperty = Value Prelude.Text
  set :: PropertyType "EncodingType" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "EncodingType" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {encodingType :: Maybe (Value Text)
encodingType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EncodingType" FunctionConfigurationProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: ()
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
haddock_workaround_ :: ()
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
instance Property "Environment" FunctionConfigurationProperty where
  type PropertyType "Environment" FunctionConfigurationProperty = EnvironmentProperty
  set :: PropertyType "Environment" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "Environment" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {environment :: Maybe EnvironmentProperty
environment = EnvironmentProperty -> Maybe EnvironmentProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Environment" FunctionConfigurationProperty
EnvironmentProperty
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
instance Property "ExecArgs" FunctionConfigurationProperty where
  type PropertyType "ExecArgs" FunctionConfigurationProperty = Value Prelude.Text
  set :: PropertyType "ExecArgs" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "ExecArgs" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {execArgs :: Maybe (Value Text)
execArgs = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ExecArgs" FunctionConfigurationProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
instance Property "Executable" FunctionConfigurationProperty where
  type PropertyType "Executable" FunctionConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Executable" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "Executable" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {executable :: Maybe (Value Text)
executable = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Executable" FunctionConfigurationProperty
Value Text
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
instance Property "MemorySize" FunctionConfigurationProperty where
  type PropertyType "MemorySize" FunctionConfigurationProperty = Value Prelude.Integer
  set :: PropertyType "MemorySize" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "MemorySize" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {memorySize :: Maybe (Value Integer)
memorySize = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MemorySize" FunctionConfigurationProperty
Value Integer
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
instance Property "Pinned" FunctionConfigurationProperty where
  type PropertyType "Pinned" FunctionConfigurationProperty = Value Prelude.Bool
  set :: PropertyType "Pinned" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "Pinned" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {pinned :: Maybe (Value Bool)
pinned = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Pinned" FunctionConfigurationProperty
Value Bool
newValue, Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
timeout :: Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
timeout :: Maybe (Value Integer)
..}
instance Property "Timeout" FunctionConfigurationProperty where
  type PropertyType "Timeout" FunctionConfigurationProperty = Value Prelude.Integer
  set :: PropertyType "Timeout" FunctionConfigurationProperty
-> FunctionConfigurationProperty -> FunctionConfigurationProperty
set PropertyType "Timeout" FunctionConfigurationProperty
newValue FunctionConfigurationProperty {Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: FunctionConfigurationProperty -> ()
encodingType :: FunctionConfigurationProperty -> Maybe (Value Text)
environment :: FunctionConfigurationProperty -> Maybe EnvironmentProperty
execArgs :: FunctionConfigurationProperty -> Maybe (Value Text)
executable :: FunctionConfigurationProperty -> Maybe (Value Text)
memorySize :: FunctionConfigurationProperty -> Maybe (Value Integer)
pinned :: FunctionConfigurationProperty -> Maybe (Value Bool)
timeout :: FunctionConfigurationProperty -> Maybe (Value Integer)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
timeout :: Maybe (Value Integer)
..}
    = FunctionConfigurationProperty
        {timeout :: Maybe (Value Integer)
timeout = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Timeout" FunctionConfigurationProperty
Value Integer
newValue, Maybe (Value Bool)
Maybe (Value Integer)
Maybe (Value Text)
Maybe EnvironmentProperty
()
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
haddock_workaround_ :: ()
encodingType :: Maybe (Value Text)
environment :: Maybe EnvironmentProperty
execArgs :: Maybe (Value Text)
executable :: Maybe (Value Text)
memorySize :: Maybe (Value Integer)
pinned :: Maybe (Value Bool)
..}