content: module Stratosphere.VpcLattice.Listener.FixedResponseProperty (
          FixedResponseProperty(..), mkFixedResponseProperty
      ) where
  import qualified Data.Aeson as JSON
  import qualified Stratosphere.Prelude as Prelude
  import Stratosphere.Property
  import Stratosphere.ResourceProperties
  import Stratosphere.Value
  data FixedResponseProperty
    = FixedResponseProperty {statusCode :: (Value Prelude.Integer)}
    deriving stock (Prelude.Eq, Prelude.Show)
  mkFixedResponseProperty ::
    Value Prelude.Integer -> FixedResponseProperty
  mkFixedResponseProperty statusCode
    = FixedResponseProperty {statusCode = statusCode}
  instance ToResourceProperties FixedResponseProperty where
    toResourceProperties FixedResponseProperty {..}
      = ResourceProperties
          {awsType = "AWS::VpcLattice::Listener.FixedResponse",
           supportsTags = Prelude.False,
           properties = ["StatusCode" JSON..= statusCode]}
  instance JSON.ToJSON FixedResponseProperty where
    toJSON FixedResponseProperty {..}
      = JSON.object ["StatusCode" JSON..= statusCode]
  instance Property "StatusCode" FixedResponseProperty where
    type PropertyType "StatusCode" FixedResponseProperty = Value Prelude.Integer
    set newValue FixedResponseProperty {}
      = FixedResponseProperty {statusCode = newValue, ..}