{-# 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.RegisterTransitGatewayMulticastGroupMembers
(
RegisterTransitGatewayMulticastGroupMembers (..),
newRegisterTransitGatewayMulticastGroupMembers,
registerTransitGatewayMulticastGroupMembers_dryRun,
registerTransitGatewayMulticastGroupMembers_groupIpAddress,
registerTransitGatewayMulticastGroupMembers_networkInterfaceIds,
registerTransitGatewayMulticastGroupMembers_transitGatewayMulticastDomainId,
RegisterTransitGatewayMulticastGroupMembersResponse (..),
newRegisterTransitGatewayMulticastGroupMembersResponse,
registerTransitGatewayMulticastGroupMembersResponse_registeredMulticastGroupMembers,
registerTransitGatewayMulticastGroupMembersResponse_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 RegisterTransitGatewayMulticastGroupMembers = RegisterTransitGatewayMulticastGroupMembers'
{
RegisterTransitGatewayMulticastGroupMembers -> Maybe Bool
dryRun :: Prelude.Maybe Prelude.Bool,
RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
groupIpAddress :: Prelude.Maybe Prelude.Text,
RegisterTransitGatewayMulticastGroupMembers -> Maybe [Text]
networkInterfaceIds :: Prelude.Maybe [Prelude.Text],
RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
transitGatewayMulticastDomainId :: Prelude.Maybe Prelude.Text
}
deriving (RegisterTransitGatewayMulticastGroupMembers
-> RegisterTransitGatewayMulticastGroupMembers -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RegisterTransitGatewayMulticastGroupMembers
-> RegisterTransitGatewayMulticastGroupMembers -> Bool
$c/= :: RegisterTransitGatewayMulticastGroupMembers
-> RegisterTransitGatewayMulticastGroupMembers -> Bool
== :: RegisterTransitGatewayMulticastGroupMembers
-> RegisterTransitGatewayMulticastGroupMembers -> Bool
$c== :: RegisterTransitGatewayMulticastGroupMembers
-> RegisterTransitGatewayMulticastGroupMembers -> Bool
Prelude.Eq, ReadPrec [RegisterTransitGatewayMulticastGroupMembers]
ReadPrec RegisterTransitGatewayMulticastGroupMembers
Int -> ReadS RegisterTransitGatewayMulticastGroupMembers
ReadS [RegisterTransitGatewayMulticastGroupMembers]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RegisterTransitGatewayMulticastGroupMembers]
$creadListPrec :: ReadPrec [RegisterTransitGatewayMulticastGroupMembers]
readPrec :: ReadPrec RegisterTransitGatewayMulticastGroupMembers
$creadPrec :: ReadPrec RegisterTransitGatewayMulticastGroupMembers
readList :: ReadS [RegisterTransitGatewayMulticastGroupMembers]
$creadList :: ReadS [RegisterTransitGatewayMulticastGroupMembers]
readsPrec :: Int -> ReadS RegisterTransitGatewayMulticastGroupMembers
$creadsPrec :: Int -> ReadS RegisterTransitGatewayMulticastGroupMembers
Prelude.Read, Int -> RegisterTransitGatewayMulticastGroupMembers -> ShowS
[RegisterTransitGatewayMulticastGroupMembers] -> ShowS
RegisterTransitGatewayMulticastGroupMembers -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RegisterTransitGatewayMulticastGroupMembers] -> ShowS
$cshowList :: [RegisterTransitGatewayMulticastGroupMembers] -> ShowS
show :: RegisterTransitGatewayMulticastGroupMembers -> String
$cshow :: RegisterTransitGatewayMulticastGroupMembers -> String
showsPrec :: Int -> RegisterTransitGatewayMulticastGroupMembers -> ShowS
$cshowsPrec :: Int -> RegisterTransitGatewayMulticastGroupMembers -> ShowS
Prelude.Show, forall x.
Rep RegisterTransitGatewayMulticastGroupMembers x
-> RegisterTransitGatewayMulticastGroupMembers
forall x.
RegisterTransitGatewayMulticastGroupMembers
-> Rep RegisterTransitGatewayMulticastGroupMembers x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RegisterTransitGatewayMulticastGroupMembers x
-> RegisterTransitGatewayMulticastGroupMembers
$cfrom :: forall x.
RegisterTransitGatewayMulticastGroupMembers
-> Rep RegisterTransitGatewayMulticastGroupMembers x
Prelude.Generic)
newRegisterTransitGatewayMulticastGroupMembers ::
RegisterTransitGatewayMulticastGroupMembers
newRegisterTransitGatewayMulticastGroupMembers :: RegisterTransitGatewayMulticastGroupMembers
newRegisterTransitGatewayMulticastGroupMembers =
RegisterTransitGatewayMulticastGroupMembers'
{ $sel:dryRun:RegisterTransitGatewayMulticastGroupMembers' :: Maybe Bool
dryRun =
forall a. Maybe a
Prelude.Nothing,
$sel:groupIpAddress:RegisterTransitGatewayMulticastGroupMembers' :: Maybe Text
groupIpAddress =
forall a. Maybe a
Prelude.Nothing,
$sel:networkInterfaceIds:RegisterTransitGatewayMulticastGroupMembers' :: Maybe [Text]
networkInterfaceIds =
forall a. Maybe a
Prelude.Nothing,
$sel:transitGatewayMulticastDomainId:RegisterTransitGatewayMulticastGroupMembers' :: Maybe Text
transitGatewayMulticastDomainId =
forall a. Maybe a
Prelude.Nothing
}
registerTransitGatewayMulticastGroupMembers_dryRun :: Lens.Lens' RegisterTransitGatewayMulticastGroupMembers (Prelude.Maybe Prelude.Bool)
registerTransitGatewayMulticastGroupMembers_dryRun :: Lens' RegisterTransitGatewayMulticastGroupMembers (Maybe Bool)
registerTransitGatewayMulticastGroupMembers_dryRun = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RegisterTransitGatewayMulticastGroupMembers' {Maybe Bool
dryRun :: Maybe Bool
$sel:dryRun:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Bool
dryRun} -> Maybe Bool
dryRun) (\s :: RegisterTransitGatewayMulticastGroupMembers
s@RegisterTransitGatewayMulticastGroupMembers' {} Maybe Bool
a -> RegisterTransitGatewayMulticastGroupMembers
s {$sel:dryRun:RegisterTransitGatewayMulticastGroupMembers' :: Maybe Bool
dryRun = Maybe Bool
a} :: RegisterTransitGatewayMulticastGroupMembers)
registerTransitGatewayMulticastGroupMembers_groupIpAddress :: Lens.Lens' RegisterTransitGatewayMulticastGroupMembers (Prelude.Maybe Prelude.Text)
registerTransitGatewayMulticastGroupMembers_groupIpAddress :: Lens' RegisterTransitGatewayMulticastGroupMembers (Maybe Text)
registerTransitGatewayMulticastGroupMembers_groupIpAddress = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RegisterTransitGatewayMulticastGroupMembers' {Maybe Text
groupIpAddress :: Maybe Text
$sel:groupIpAddress:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
groupIpAddress} -> Maybe Text
groupIpAddress) (\s :: RegisterTransitGatewayMulticastGroupMembers
s@RegisterTransitGatewayMulticastGroupMembers' {} Maybe Text
a -> RegisterTransitGatewayMulticastGroupMembers
s {$sel:groupIpAddress:RegisterTransitGatewayMulticastGroupMembers' :: Maybe Text
groupIpAddress = Maybe Text
a} :: RegisterTransitGatewayMulticastGroupMembers)
registerTransitGatewayMulticastGroupMembers_networkInterfaceIds :: Lens.Lens' RegisterTransitGatewayMulticastGroupMembers (Prelude.Maybe [Prelude.Text])
registerTransitGatewayMulticastGroupMembers_networkInterfaceIds :: Lens' RegisterTransitGatewayMulticastGroupMembers (Maybe [Text])
registerTransitGatewayMulticastGroupMembers_networkInterfaceIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RegisterTransitGatewayMulticastGroupMembers' {Maybe [Text]
networkInterfaceIds :: Maybe [Text]
$sel:networkInterfaceIds:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe [Text]
networkInterfaceIds} -> Maybe [Text]
networkInterfaceIds) (\s :: RegisterTransitGatewayMulticastGroupMembers
s@RegisterTransitGatewayMulticastGroupMembers' {} Maybe [Text]
a -> RegisterTransitGatewayMulticastGroupMembers
s {$sel:networkInterfaceIds:RegisterTransitGatewayMulticastGroupMembers' :: Maybe [Text]
networkInterfaceIds = Maybe [Text]
a} :: RegisterTransitGatewayMulticastGroupMembers) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
registerTransitGatewayMulticastGroupMembers_transitGatewayMulticastDomainId :: Lens.Lens' RegisterTransitGatewayMulticastGroupMembers (Prelude.Maybe Prelude.Text)
registerTransitGatewayMulticastGroupMembers_transitGatewayMulticastDomainId :: Lens' RegisterTransitGatewayMulticastGroupMembers (Maybe Text)
registerTransitGatewayMulticastGroupMembers_transitGatewayMulticastDomainId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RegisterTransitGatewayMulticastGroupMembers' {Maybe Text
transitGatewayMulticastDomainId :: Maybe Text
$sel:transitGatewayMulticastDomainId:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
transitGatewayMulticastDomainId} -> Maybe Text
transitGatewayMulticastDomainId) (\s :: RegisterTransitGatewayMulticastGroupMembers
s@RegisterTransitGatewayMulticastGroupMembers' {} Maybe Text
a -> RegisterTransitGatewayMulticastGroupMembers
s {$sel:transitGatewayMulticastDomainId:RegisterTransitGatewayMulticastGroupMembers' :: Maybe Text
transitGatewayMulticastDomainId = Maybe Text
a} :: RegisterTransitGatewayMulticastGroupMembers)
instance
Core.AWSRequest
RegisterTransitGatewayMulticastGroupMembers
where
type
AWSResponse
RegisterTransitGatewayMulticastGroupMembers =
RegisterTransitGatewayMulticastGroupMembersResponse
request :: (Service -> Service)
-> RegisterTransitGatewayMulticastGroupMembers
-> Request RegisterTransitGatewayMulticastGroupMembers
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 RegisterTransitGatewayMulticastGroupMembers
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse RegisterTransitGatewayMulticastGroupMembers)))
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 TransitGatewayMulticastRegisteredGroupMembers
-> Int -> RegisterTransitGatewayMulticastGroupMembersResponse
RegisterTransitGatewayMulticastGroupMembersResponse'
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
"registeredMulticastGroupMembers")
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
RegisterTransitGatewayMulticastGroupMembers
where
hashWithSalt :: Int -> RegisterTransitGatewayMulticastGroupMembers -> Int
hashWithSalt
Int
_salt
RegisterTransitGatewayMulticastGroupMembers' {Maybe Bool
Maybe [Text]
Maybe Text
transitGatewayMulticastDomainId :: Maybe Text
networkInterfaceIds :: Maybe [Text]
groupIpAddress :: Maybe Text
dryRun :: Maybe Bool
$sel:transitGatewayMulticastDomainId:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
$sel:networkInterfaceIds:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe [Text]
$sel:groupIpAddress:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
$sel:dryRun:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> 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
groupIpAddress
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
networkInterfaceIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
transitGatewayMulticastDomainId
instance
Prelude.NFData
RegisterTransitGatewayMulticastGroupMembers
where
rnf :: RegisterTransitGatewayMulticastGroupMembers -> ()
rnf RegisterTransitGatewayMulticastGroupMembers' {Maybe Bool
Maybe [Text]
Maybe Text
transitGatewayMulticastDomainId :: Maybe Text
networkInterfaceIds :: Maybe [Text]
groupIpAddress :: Maybe Text
dryRun :: Maybe Bool
$sel:transitGatewayMulticastDomainId:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
$sel:networkInterfaceIds:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe [Text]
$sel:groupIpAddress:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
$sel:dryRun:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> 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
groupIpAddress
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
networkInterfaceIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
transitGatewayMulticastDomainId
instance
Data.ToHeaders
RegisterTransitGatewayMulticastGroupMembers
where
toHeaders :: RegisterTransitGatewayMulticastGroupMembers -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance
Data.ToPath
RegisterTransitGatewayMulticastGroupMembers
where
toPath :: RegisterTransitGatewayMulticastGroupMembers -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
RegisterTransitGatewayMulticastGroupMembers
where
toQuery :: RegisterTransitGatewayMulticastGroupMembers -> QueryString
toQuery
RegisterTransitGatewayMulticastGroupMembers' {Maybe Bool
Maybe [Text]
Maybe Text
transitGatewayMulticastDomainId :: Maybe Text
networkInterfaceIds :: Maybe [Text]
groupIpAddress :: Maybe Text
dryRun :: Maybe Bool
$sel:transitGatewayMulticastDomainId:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
$sel:networkInterfaceIds:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe [Text]
$sel:groupIpAddress:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Text
$sel:dryRun:RegisterTransitGatewayMulticastGroupMembers' :: RegisterTransitGatewayMulticastGroupMembers -> Maybe Bool
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"RegisterTransitGatewayMulticastGroupMembers" ::
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
"GroupIpAddress" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
groupIpAddress,
forall a. ToQuery a => a -> QueryString
Data.toQuery
( forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Data.toQueryList ByteString
"NetworkInterfaceIds"
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
networkInterfaceIds
),
ByteString
"TransitGatewayMulticastDomainId"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
transitGatewayMulticastDomainId
]
data RegisterTransitGatewayMulticastGroupMembersResponse = RegisterTransitGatewayMulticastGroupMembersResponse'
{
RegisterTransitGatewayMulticastGroupMembersResponse
-> Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers :: Prelude.Maybe TransitGatewayMulticastRegisteredGroupMembers,
RegisterTransitGatewayMulticastGroupMembersResponse -> Int
httpStatus :: Prelude.Int
}
deriving (RegisterTransitGatewayMulticastGroupMembersResponse
-> RegisterTransitGatewayMulticastGroupMembersResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RegisterTransitGatewayMulticastGroupMembersResponse
-> RegisterTransitGatewayMulticastGroupMembersResponse -> Bool
$c/= :: RegisterTransitGatewayMulticastGroupMembersResponse
-> RegisterTransitGatewayMulticastGroupMembersResponse -> Bool
== :: RegisterTransitGatewayMulticastGroupMembersResponse
-> RegisterTransitGatewayMulticastGroupMembersResponse -> Bool
$c== :: RegisterTransitGatewayMulticastGroupMembersResponse
-> RegisterTransitGatewayMulticastGroupMembersResponse -> Bool
Prelude.Eq, ReadPrec [RegisterTransitGatewayMulticastGroupMembersResponse]
ReadPrec RegisterTransitGatewayMulticastGroupMembersResponse
Int -> ReadS RegisterTransitGatewayMulticastGroupMembersResponse
ReadS [RegisterTransitGatewayMulticastGroupMembersResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RegisterTransitGatewayMulticastGroupMembersResponse]
$creadListPrec :: ReadPrec [RegisterTransitGatewayMulticastGroupMembersResponse]
readPrec :: ReadPrec RegisterTransitGatewayMulticastGroupMembersResponse
$creadPrec :: ReadPrec RegisterTransitGatewayMulticastGroupMembersResponse
readList :: ReadS [RegisterTransitGatewayMulticastGroupMembersResponse]
$creadList :: ReadS [RegisterTransitGatewayMulticastGroupMembersResponse]
readsPrec :: Int -> ReadS RegisterTransitGatewayMulticastGroupMembersResponse
$creadsPrec :: Int -> ReadS RegisterTransitGatewayMulticastGroupMembersResponse
Prelude.Read, Int -> RegisterTransitGatewayMulticastGroupMembersResponse -> ShowS
[RegisterTransitGatewayMulticastGroupMembersResponse] -> ShowS
RegisterTransitGatewayMulticastGroupMembersResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RegisterTransitGatewayMulticastGroupMembersResponse] -> ShowS
$cshowList :: [RegisterTransitGatewayMulticastGroupMembersResponse] -> ShowS
show :: RegisterTransitGatewayMulticastGroupMembersResponse -> String
$cshow :: RegisterTransitGatewayMulticastGroupMembersResponse -> String
showsPrec :: Int -> RegisterTransitGatewayMulticastGroupMembersResponse -> ShowS
$cshowsPrec :: Int -> RegisterTransitGatewayMulticastGroupMembersResponse -> ShowS
Prelude.Show, forall x.
Rep RegisterTransitGatewayMulticastGroupMembersResponse x
-> RegisterTransitGatewayMulticastGroupMembersResponse
forall x.
RegisterTransitGatewayMulticastGroupMembersResponse
-> Rep RegisterTransitGatewayMulticastGroupMembersResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RegisterTransitGatewayMulticastGroupMembersResponse x
-> RegisterTransitGatewayMulticastGroupMembersResponse
$cfrom :: forall x.
RegisterTransitGatewayMulticastGroupMembersResponse
-> Rep RegisterTransitGatewayMulticastGroupMembersResponse x
Prelude.Generic)
newRegisterTransitGatewayMulticastGroupMembersResponse ::
Prelude.Int ->
RegisterTransitGatewayMulticastGroupMembersResponse
newRegisterTransitGatewayMulticastGroupMembersResponse :: Int -> RegisterTransitGatewayMulticastGroupMembersResponse
newRegisterTransitGatewayMulticastGroupMembersResponse
Int
pHttpStatus_ =
RegisterTransitGatewayMulticastGroupMembersResponse'
{ $sel:registeredMulticastGroupMembers:RegisterTransitGatewayMulticastGroupMembersResponse' :: Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:RegisterTransitGatewayMulticastGroupMembersResponse' :: Int
httpStatus =
Int
pHttpStatus_
}
registerTransitGatewayMulticastGroupMembersResponse_registeredMulticastGroupMembers :: Lens.Lens' RegisterTransitGatewayMulticastGroupMembersResponse (Prelude.Maybe TransitGatewayMulticastRegisteredGroupMembers)
registerTransitGatewayMulticastGroupMembersResponse_registeredMulticastGroupMembers :: Lens'
RegisterTransitGatewayMulticastGroupMembersResponse
(Maybe TransitGatewayMulticastRegisteredGroupMembers)
registerTransitGatewayMulticastGroupMembersResponse_registeredMulticastGroupMembers = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RegisterTransitGatewayMulticastGroupMembersResponse' {Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers :: Maybe TransitGatewayMulticastRegisteredGroupMembers
$sel:registeredMulticastGroupMembers:RegisterTransitGatewayMulticastGroupMembersResponse' :: RegisterTransitGatewayMulticastGroupMembersResponse
-> Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers} -> Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers) (\s :: RegisterTransitGatewayMulticastGroupMembersResponse
s@RegisterTransitGatewayMulticastGroupMembersResponse' {} Maybe TransitGatewayMulticastRegisteredGroupMembers
a -> RegisterTransitGatewayMulticastGroupMembersResponse
s {$sel:registeredMulticastGroupMembers:RegisterTransitGatewayMulticastGroupMembersResponse' :: Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers = Maybe TransitGatewayMulticastRegisteredGroupMembers
a} :: RegisterTransitGatewayMulticastGroupMembersResponse)
registerTransitGatewayMulticastGroupMembersResponse_httpStatus :: Lens.Lens' RegisterTransitGatewayMulticastGroupMembersResponse Prelude.Int
registerTransitGatewayMulticastGroupMembersResponse_httpStatus :: Lens' RegisterTransitGatewayMulticastGroupMembersResponse Int
registerTransitGatewayMulticastGroupMembersResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RegisterTransitGatewayMulticastGroupMembersResponse' {Int
httpStatus :: Int
$sel:httpStatus:RegisterTransitGatewayMulticastGroupMembersResponse' :: RegisterTransitGatewayMulticastGroupMembersResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: RegisterTransitGatewayMulticastGroupMembersResponse
s@RegisterTransitGatewayMulticastGroupMembersResponse' {} Int
a -> RegisterTransitGatewayMulticastGroupMembersResponse
s {$sel:httpStatus:RegisterTransitGatewayMulticastGroupMembersResponse' :: Int
httpStatus = Int
a} :: RegisterTransitGatewayMulticastGroupMembersResponse)
instance
Prelude.NFData
RegisterTransitGatewayMulticastGroupMembersResponse
where
rnf :: RegisterTransitGatewayMulticastGroupMembersResponse -> ()
rnf
RegisterTransitGatewayMulticastGroupMembersResponse' {Int
Maybe TransitGatewayMulticastRegisteredGroupMembers
httpStatus :: Int
registeredMulticastGroupMembers :: Maybe TransitGatewayMulticastRegisteredGroupMembers
$sel:httpStatus:RegisterTransitGatewayMulticastGroupMembersResponse' :: RegisterTransitGatewayMulticastGroupMembersResponse -> Int
$sel:registeredMulticastGroupMembers:RegisterTransitGatewayMulticastGroupMembersResponse' :: RegisterTransitGatewayMulticastGroupMembersResponse
-> Maybe TransitGatewayMulticastRegisteredGroupMembers
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe TransitGatewayMulticastRegisteredGroupMembers
registeredMulticastGroupMembers
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus