stratosphere-appmesh-1.0.0: gen/Stratosphere/AppMesh/VirtualNode/VirtualNodeGrpcConnectionPoolProperty.hs

module Stratosphere.AppMesh.VirtualNode.VirtualNodeGrpcConnectionPoolProperty (
        VirtualNodeGrpcConnectionPoolProperty(..),
        mkVirtualNodeGrpcConnectionPoolProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data VirtualNodeGrpcConnectionPoolProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodegrpcconnectionpool.html>
    VirtualNodeGrpcConnectionPoolProperty {haddock_workaround_ :: (),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualnode-virtualnodegrpcconnectionpool.html#cfn-appmesh-virtualnode-virtualnodegrpcconnectionpool-maxrequests>
                                           maxRequests :: (Value Prelude.Integer)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkVirtualNodeGrpcConnectionPoolProperty ::
  Value Prelude.Integer -> VirtualNodeGrpcConnectionPoolProperty
mkVirtualNodeGrpcConnectionPoolProperty maxRequests
  = VirtualNodeGrpcConnectionPoolProperty
      {haddock_workaround_ = (), maxRequests = maxRequests}
instance ToResourceProperties VirtualNodeGrpcConnectionPoolProperty where
  toResourceProperties VirtualNodeGrpcConnectionPoolProperty {..}
    = ResourceProperties
        {awsType = "AWS::AppMesh::VirtualNode.VirtualNodeGrpcConnectionPool",
         supportsTags = Prelude.False,
         properties = ["MaxRequests" JSON..= maxRequests]}
instance JSON.ToJSON VirtualNodeGrpcConnectionPoolProperty where
  toJSON VirtualNodeGrpcConnectionPoolProperty {..}
    = JSON.object ["MaxRequests" JSON..= maxRequests]
instance Property "MaxRequests" VirtualNodeGrpcConnectionPoolProperty where
  type PropertyType "MaxRequests" VirtualNodeGrpcConnectionPoolProperty = Value Prelude.Integer
  set newValue VirtualNodeGrpcConnectionPoolProperty {..}
    = VirtualNodeGrpcConnectionPoolProperty
        {maxRequests = newValue, ..}