{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.EC2.ModifyLocalGatewayRoute
(
ModifyLocalGatewayRoute (..),
newModifyLocalGatewayRoute,
modifyLocalGatewayRoute_dryRun,
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId,
modifyLocalGatewayRoute_networkInterfaceId,
modifyLocalGatewayRoute_destinationCidrBlock,
modifyLocalGatewayRoute_localGatewayRouteTableId,
ModifyLocalGatewayRouteResponse (..),
newModifyLocalGatewayRouteResponse,
modifyLocalGatewayRouteResponse_route,
modifyLocalGatewayRouteResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.EC2.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ModifyLocalGatewayRoute = ModifyLocalGatewayRoute'
{
ModifyLocalGatewayRoute -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
ModifyLocalGatewayRoute -> Maybe Text
localGatewayVirtualInterfaceGroupId :: Prelude.Maybe Prelude.Text,
ModifyLocalGatewayRoute -> Maybe Text
networkInterfaceId :: Prelude.Maybe Prelude.Text,
ModifyLocalGatewayRoute -> Text
destinationCidrBlock :: Prelude.Text,
ModifyLocalGatewayRoute -> Text
localGatewayRouteTableId :: Prelude.Text
}
deriving (ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
$c/= :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
== :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
$c== :: ModifyLocalGatewayRoute -> ModifyLocalGatewayRoute -> Bool
Prelude.Eq, ReadPrec [ModifyLocalGatewayRoute]
ReadPrec ModifyLocalGatewayRoute
Int -> ReadS ModifyLocalGatewayRoute
ReadS [ModifyLocalGatewayRoute]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyLocalGatewayRoute]
$creadListPrec :: ReadPrec [ModifyLocalGatewayRoute]
readPrec :: ReadPrec ModifyLocalGatewayRoute
$creadPrec :: ReadPrec ModifyLocalGatewayRoute
readList :: ReadS [ModifyLocalGatewayRoute]
$creadList :: ReadS [ModifyLocalGatewayRoute]
readsPrec :: Int -> ReadS ModifyLocalGatewayRoute
$creadsPrec :: Int -> ReadS ModifyLocalGatewayRoute
Prelude.Read, Int -> ModifyLocalGatewayRoute -> ShowS
[ModifyLocalGatewayRoute] -> ShowS
ModifyLocalGatewayRoute -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyLocalGatewayRoute] -> ShowS
$cshowList :: [ModifyLocalGatewayRoute] -> ShowS
show :: ModifyLocalGatewayRoute -> String
$cshow :: ModifyLocalGatewayRoute -> String
showsPrec :: Int -> ModifyLocalGatewayRoute -> ShowS
$cshowsPrec :: Int -> ModifyLocalGatewayRoute -> ShowS
Prelude.Show, forall x. Rep ModifyLocalGatewayRoute x -> ModifyLocalGatewayRoute
forall x. ModifyLocalGatewayRoute -> Rep ModifyLocalGatewayRoute x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ModifyLocalGatewayRoute x -> ModifyLocalGatewayRoute
$cfrom :: forall x. ModifyLocalGatewayRoute -> Rep ModifyLocalGatewayRoute x
Prelude.Generic)
newModifyLocalGatewayRoute ::
Prelude.Text ->
Prelude.Text ->
ModifyLocalGatewayRoute
newModifyLocalGatewayRoute :: Text -> Text -> ModifyLocalGatewayRoute
newModifyLocalGatewayRoute
Text
pDestinationCidrBlock_
Text
pLocalGatewayRouteTableId_ =
ModifyLocalGatewayRoute'
{ $sel:dryRun:ModifyLocalGatewayRoute' :: Maybe Bool
dryRun = forall a. Maybe a
Prelude.Nothing,
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: Maybe Text
localGatewayVirtualInterfaceGroupId =
forall a. Maybe a
Prelude.Nothing,
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: Maybe Text
networkInterfaceId = forall a. Maybe a
Prelude.Nothing,
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: Text
destinationCidrBlock = Text
pDestinationCidrBlock_,
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: Text
localGatewayRouteTableId =
Text
pLocalGatewayRouteTableId_
}
modifyLocalGatewayRoute_dryRun :: Lens.Lens' ModifyLocalGatewayRoute (Prelude.Maybe Prelude.Bool)
modifyLocalGatewayRoute_dryRun :: Lens' ModifyLocalGatewayRoute (Maybe Bool)
modifyLocalGatewayRoute_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Maybe Bool
a -> ModifyLocalGatewayRoute
s {$sel:dryRun:ModifyLocalGatewayRoute' :: Maybe Bool
dryRun = Maybe Bool
a} :: ModifyLocalGatewayRoute)
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId :: Lens.Lens' ModifyLocalGatewayRoute (Prelude.Maybe Prelude.Text)
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId :: Lens' ModifyLocalGatewayRoute (Maybe Text)
modifyLocalGatewayRoute_localGatewayVirtualInterfaceGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
localGatewayVirtualInterfaceGroupId} -> Maybe Text
localGatewayVirtualInterfaceGroupId) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Maybe Text
a -> ModifyLocalGatewayRoute
s {$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: Maybe Text
localGatewayVirtualInterfaceGroupId = Maybe Text
a} :: ModifyLocalGatewayRoute)
modifyLocalGatewayRoute_networkInterfaceId :: Lens.Lens' ModifyLocalGatewayRoute (Prelude.Maybe Prelude.Text)
modifyLocalGatewayRoute_networkInterfaceId :: Lens' ModifyLocalGatewayRoute (Maybe Text)
modifyLocalGatewayRoute_networkInterfaceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Maybe Text
networkInterfaceId :: Maybe Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
networkInterfaceId} -> Maybe Text
networkInterfaceId) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Maybe Text
a -> ModifyLocalGatewayRoute
s {$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: Maybe Text
networkInterfaceId = Maybe Text
a} :: ModifyLocalGatewayRoute)
modifyLocalGatewayRoute_destinationCidrBlock :: Lens.Lens' ModifyLocalGatewayRoute Prelude.Text
modifyLocalGatewayRoute_destinationCidrBlock :: Lens' ModifyLocalGatewayRoute Text
modifyLocalGatewayRoute_destinationCidrBlock = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Text
destinationCidrBlock :: Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
destinationCidrBlock} -> Text
destinationCidrBlock) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Text
a -> ModifyLocalGatewayRoute
s {$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: Text
destinationCidrBlock = Text
a} :: ModifyLocalGatewayRoute)
modifyLocalGatewayRoute_localGatewayRouteTableId :: Lens.Lens' ModifyLocalGatewayRoute Prelude.Text
modifyLocalGatewayRoute_localGatewayRouteTableId :: Lens' ModifyLocalGatewayRoute Text
modifyLocalGatewayRoute_localGatewayRouteTableId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRoute' {Text
localGatewayRouteTableId :: Text
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
localGatewayRouteTableId} -> Text
localGatewayRouteTableId) (\s :: ModifyLocalGatewayRoute
s@ModifyLocalGatewayRoute' {} Text
a -> ModifyLocalGatewayRoute
s {$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: Text
localGatewayRouteTableId = Text
a} :: ModifyLocalGatewayRoute)
instance Core.AWSRequest ModifyLocalGatewayRoute where
type
AWSResponse ModifyLocalGatewayRoute =
ModifyLocalGatewayRouteResponse
request :: (Service -> Service)
-> ModifyLocalGatewayRoute -> Request ModifyLocalGatewayRoute
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ModifyLocalGatewayRoute
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ModifyLocalGatewayRoute)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXML
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe LocalGatewayRoute -> Int -> ModifyLocalGatewayRouteResponse
ModifyLocalGatewayRouteResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"route")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable ModifyLocalGatewayRoute where
hashWithSalt :: Int -> ModifyLocalGatewayRoute -> Int
hashWithSalt Int
_salt ModifyLocalGatewayRoute' {Maybe Bool
Maybe Text
Text
localGatewayRouteTableId :: Text
destinationCidrBlock :: Text
networkInterfaceId :: Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
dryRun :: Maybe Bool
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
dryRun
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
localGatewayVirtualInterfaceGroupId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
networkInterfaceId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
destinationCidrBlock
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
localGatewayRouteTableId
instance Prelude.NFData ModifyLocalGatewayRoute where
rnf :: ModifyLocalGatewayRoute -> ()
rnf ModifyLocalGatewayRoute' {Maybe Bool
Maybe Text
Text
localGatewayRouteTableId :: Text
destinationCidrBlock :: Text
networkInterfaceId :: Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
dryRun :: Maybe Bool
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
dryRun
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
localGatewayVirtualInterfaceGroupId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
networkInterfaceId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
destinationCidrBlock
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
localGatewayRouteTableId
instance Data.ToHeaders ModifyLocalGatewayRoute where
toHeaders :: ModifyLocalGatewayRoute -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath ModifyLocalGatewayRoute where
toPath :: ModifyLocalGatewayRoute -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery ModifyLocalGatewayRoute where
toQuery :: ModifyLocalGatewayRoute -> QueryString
toQuery ModifyLocalGatewayRoute' {Maybe Bool
Maybe Text
Text
localGatewayRouteTableId :: Text
destinationCidrBlock :: Text
networkInterfaceId :: Maybe Text
localGatewayVirtualInterfaceGroupId :: Maybe Text
dryRun :: Maybe Bool
$sel:localGatewayRouteTableId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:destinationCidrBlock:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Text
$sel:networkInterfaceId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:localGatewayVirtualInterfaceGroupId:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Text
$sel:dryRun:ModifyLocalGatewayRoute' :: ModifyLocalGatewayRoute -> Maybe Bool
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"ModifyLocalGatewayRoute" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2016-11-15" :: Prelude.ByteString),
ByteString
"DryRun" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Bool
dryRun,
ByteString
"LocalGatewayVirtualInterfaceGroupId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
localGatewayVirtualInterfaceGroupId,
ByteString
"NetworkInterfaceId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
networkInterfaceId,
ByteString
"DestinationCidrBlock" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
destinationCidrBlock,
ByteString
"LocalGatewayRouteTableId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Text
localGatewayRouteTableId
]
data ModifyLocalGatewayRouteResponse = ModifyLocalGatewayRouteResponse'
{
ModifyLocalGatewayRouteResponse -> Maybe LocalGatewayRoute
route :: Prelude.Maybe LocalGatewayRoute,
ModifyLocalGatewayRouteResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
$c/= :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
== :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
$c== :: ModifyLocalGatewayRouteResponse
-> ModifyLocalGatewayRouteResponse -> Bool
Prelude.Eq, ReadPrec [ModifyLocalGatewayRouteResponse]
ReadPrec ModifyLocalGatewayRouteResponse
Int -> ReadS ModifyLocalGatewayRouteResponse
ReadS [ModifyLocalGatewayRouteResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ModifyLocalGatewayRouteResponse]
$creadListPrec :: ReadPrec [ModifyLocalGatewayRouteResponse]
readPrec :: ReadPrec ModifyLocalGatewayRouteResponse
$creadPrec :: ReadPrec ModifyLocalGatewayRouteResponse
readList :: ReadS [ModifyLocalGatewayRouteResponse]
$creadList :: ReadS [ModifyLocalGatewayRouteResponse]
readsPrec :: Int -> ReadS ModifyLocalGatewayRouteResponse
$creadsPrec :: Int -> ReadS ModifyLocalGatewayRouteResponse
Prelude.Read, Int -> ModifyLocalGatewayRouteResponse -> ShowS
[ModifyLocalGatewayRouteResponse] -> ShowS
ModifyLocalGatewayRouteResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ModifyLocalGatewayRouteResponse] -> ShowS
$cshowList :: [ModifyLocalGatewayRouteResponse] -> ShowS
show :: ModifyLocalGatewayRouteResponse -> String
$cshow :: ModifyLocalGatewayRouteResponse -> String
showsPrec :: Int -> ModifyLocalGatewayRouteResponse -> ShowS
$cshowsPrec :: Int -> ModifyLocalGatewayRouteResponse -> ShowS
Prelude.Show, forall x.
Rep ModifyLocalGatewayRouteResponse x
-> ModifyLocalGatewayRouteResponse
forall x.
ModifyLocalGatewayRouteResponse
-> Rep ModifyLocalGatewayRouteResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ModifyLocalGatewayRouteResponse x
-> ModifyLocalGatewayRouteResponse
$cfrom :: forall x.
ModifyLocalGatewayRouteResponse
-> Rep ModifyLocalGatewayRouteResponse x
Prelude.Generic)
newModifyLocalGatewayRouteResponse ::
Prelude.Int ->
ModifyLocalGatewayRouteResponse
newModifyLocalGatewayRouteResponse :: Int -> ModifyLocalGatewayRouteResponse
newModifyLocalGatewayRouteResponse Int
pHttpStatus_ =
ModifyLocalGatewayRouteResponse'
{ $sel:route:ModifyLocalGatewayRouteResponse' :: Maybe LocalGatewayRoute
route =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: Int
httpStatus = Int
pHttpStatus_
}
modifyLocalGatewayRouteResponse_route :: Lens.Lens' ModifyLocalGatewayRouteResponse (Prelude.Maybe LocalGatewayRoute)
modifyLocalGatewayRouteResponse_route :: Lens' ModifyLocalGatewayRouteResponse (Maybe LocalGatewayRoute)
modifyLocalGatewayRouteResponse_route = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRouteResponse' {Maybe LocalGatewayRoute
route :: Maybe LocalGatewayRoute
$sel:route:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Maybe LocalGatewayRoute
route} -> Maybe LocalGatewayRoute
route) (\s :: ModifyLocalGatewayRouteResponse
s@ModifyLocalGatewayRouteResponse' {} Maybe LocalGatewayRoute
a -> ModifyLocalGatewayRouteResponse
s {$sel:route:ModifyLocalGatewayRouteResponse' :: Maybe LocalGatewayRoute
route = Maybe LocalGatewayRoute
a} :: ModifyLocalGatewayRouteResponse)
modifyLocalGatewayRouteResponse_httpStatus :: Lens.Lens' ModifyLocalGatewayRouteResponse Prelude.Int
modifyLocalGatewayRouteResponse_httpStatus :: Lens' ModifyLocalGatewayRouteResponse Int
modifyLocalGatewayRouteResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ModifyLocalGatewayRouteResponse' {Int
httpStatus :: Int
$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ModifyLocalGatewayRouteResponse
s@ModifyLocalGatewayRouteResponse' {} Int
a -> ModifyLocalGatewayRouteResponse
s {$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: Int
httpStatus = Int
a} :: ModifyLocalGatewayRouteResponse)
instance
Prelude.NFData
ModifyLocalGatewayRouteResponse
where
rnf :: ModifyLocalGatewayRouteResponse -> ()
rnf ModifyLocalGatewayRouteResponse' {Int
Maybe LocalGatewayRoute
httpStatus :: Int
route :: Maybe LocalGatewayRoute
$sel:httpStatus:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Int
$sel:route:ModifyLocalGatewayRouteResponse' :: ModifyLocalGatewayRouteResponse -> Maybe LocalGatewayRoute
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe LocalGatewayRoute
route
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus