{-# 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.IoTWireless.StartBulkDisassociateWirelessDeviceFromMulticastGroup
(
StartBulkDisassociateWirelessDeviceFromMulticastGroup (..),
newStartBulkDisassociateWirelessDeviceFromMulticastGroup,
startBulkDisassociateWirelessDeviceFromMulticastGroup_queryString,
startBulkDisassociateWirelessDeviceFromMulticastGroup_tags,
startBulkDisassociateWirelessDeviceFromMulticastGroup_id,
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse (..),
newStartBulkDisassociateWirelessDeviceFromMulticastGroupResponse,
startBulkDisassociateWirelessDeviceFromMulticastGroupResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoTWireless.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data StartBulkDisassociateWirelessDeviceFromMulticastGroup = StartBulkDisassociateWirelessDeviceFromMulticastGroup'
{ StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Maybe Text
queryString :: Prelude.Maybe Prelude.Text,
StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Text
id :: Prelude.Text
}
deriving (StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Bool
$c/= :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Bool
== :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Bool
$c== :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Bool
Prelude.Eq, ReadPrec [StartBulkDisassociateWirelessDeviceFromMulticastGroup]
ReadPrec StartBulkDisassociateWirelessDeviceFromMulticastGroup
Int -> ReadS StartBulkDisassociateWirelessDeviceFromMulticastGroup
ReadS [StartBulkDisassociateWirelessDeviceFromMulticastGroup]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartBulkDisassociateWirelessDeviceFromMulticastGroup]
$creadListPrec :: ReadPrec [StartBulkDisassociateWirelessDeviceFromMulticastGroup]
readPrec :: ReadPrec StartBulkDisassociateWirelessDeviceFromMulticastGroup
$creadPrec :: ReadPrec StartBulkDisassociateWirelessDeviceFromMulticastGroup
readList :: ReadS [StartBulkDisassociateWirelessDeviceFromMulticastGroup]
$creadList :: ReadS [StartBulkDisassociateWirelessDeviceFromMulticastGroup]
readsPrec :: Int -> ReadS StartBulkDisassociateWirelessDeviceFromMulticastGroup
$creadsPrec :: Int -> ReadS StartBulkDisassociateWirelessDeviceFromMulticastGroup
Prelude.Read, Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> ShowS
[StartBulkDisassociateWirelessDeviceFromMulticastGroup] -> ShowS
StartBulkDisassociateWirelessDeviceFromMulticastGroup -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartBulkDisassociateWirelessDeviceFromMulticastGroup] -> ShowS
$cshowList :: [StartBulkDisassociateWirelessDeviceFromMulticastGroup] -> ShowS
show :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> String
$cshow :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> String
showsPrec :: Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> ShowS
$cshowsPrec :: Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> ShowS
Prelude.Show, forall x.
Rep StartBulkDisassociateWirelessDeviceFromMulticastGroup x
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup
forall x.
StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Rep StartBulkDisassociateWirelessDeviceFromMulticastGroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartBulkDisassociateWirelessDeviceFromMulticastGroup x
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup
$cfrom :: forall x.
StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Rep StartBulkDisassociateWirelessDeviceFromMulticastGroup x
Prelude.Generic)
newStartBulkDisassociateWirelessDeviceFromMulticastGroup ::
Prelude.Text ->
StartBulkDisassociateWirelessDeviceFromMulticastGroup
newStartBulkDisassociateWirelessDeviceFromMulticastGroup :: Text -> StartBulkDisassociateWirelessDeviceFromMulticastGroup
newStartBulkDisassociateWirelessDeviceFromMulticastGroup
Text
pId_ =
StartBulkDisassociateWirelessDeviceFromMulticastGroup'
{ $sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: Maybe Text
queryString =
forall a. Maybe a
Prelude.Nothing,
$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: Maybe [Tag]
tags =
forall a. Maybe a
Prelude.Nothing,
$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: Text
id = Text
pId_
}
startBulkDisassociateWirelessDeviceFromMulticastGroup_queryString :: Lens.Lens' StartBulkDisassociateWirelessDeviceFromMulticastGroup (Prelude.Maybe Prelude.Text)
startBulkDisassociateWirelessDeviceFromMulticastGroup_queryString :: Lens'
StartBulkDisassociateWirelessDeviceFromMulticastGroup (Maybe Text)
startBulkDisassociateWirelessDeviceFromMulticastGroup_queryString = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Maybe Text
queryString :: Maybe Text
$sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Maybe Text
queryString} -> Maybe Text
queryString) (\s :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
s@StartBulkDisassociateWirelessDeviceFromMulticastGroup' {} Maybe Text
a -> StartBulkDisassociateWirelessDeviceFromMulticastGroup
s {$sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: Maybe Text
queryString = Maybe Text
a} :: StartBulkDisassociateWirelessDeviceFromMulticastGroup)
startBulkDisassociateWirelessDeviceFromMulticastGroup_tags :: Lens.Lens' StartBulkDisassociateWirelessDeviceFromMulticastGroup (Prelude.Maybe [Tag])
startBulkDisassociateWirelessDeviceFromMulticastGroup_tags :: Lens'
StartBulkDisassociateWirelessDeviceFromMulticastGroup (Maybe [Tag])
startBulkDisassociateWirelessDeviceFromMulticastGroup_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
s@StartBulkDisassociateWirelessDeviceFromMulticastGroup' {} Maybe [Tag]
a -> StartBulkDisassociateWirelessDeviceFromMulticastGroup
s {$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: StartBulkDisassociateWirelessDeviceFromMulticastGroup) 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
startBulkDisassociateWirelessDeviceFromMulticastGroup_id :: Lens.Lens' StartBulkDisassociateWirelessDeviceFromMulticastGroup Prelude.Text
startBulkDisassociateWirelessDeviceFromMulticastGroup_id :: Lens' StartBulkDisassociateWirelessDeviceFromMulticastGroup Text
startBulkDisassociateWirelessDeviceFromMulticastGroup_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Text
id :: Text
$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Text
id} -> Text
id) (\s :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
s@StartBulkDisassociateWirelessDeviceFromMulticastGroup' {} Text
a -> StartBulkDisassociateWirelessDeviceFromMulticastGroup
s {$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: Text
id = Text
a} :: StartBulkDisassociateWirelessDeviceFromMulticastGroup)
instance
Core.AWSRequest
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
type
AWSResponse
StartBulkDisassociateWirelessDeviceFromMulticastGroup =
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
request :: (Service -> Service)
-> StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Request StartBulkDisassociateWirelessDeviceFromMulticastGroup
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse
StartBulkDisassociateWirelessDeviceFromMulticastGroup)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> () -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveEmpty
( \Int
s ResponseHeaders
h ()
x ->
Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse'
forall (f :: * -> *) a b. Functor 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
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
hashWithSalt :: Int -> StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Int
hashWithSalt
Int
_salt
StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Maybe [Tag]
Maybe Text
Text
id :: Text
tags :: Maybe [Tag]
queryString :: Maybe Text
$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Text
$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Maybe [Tag]
$sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
queryString
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
id
instance
Prelude.NFData
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
rnf :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> ()
rnf
StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Maybe [Tag]
Maybe Text
Text
id :: Text
tags :: Maybe [Tag]
queryString :: Maybe Text
$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Text
$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Maybe [Tag]
$sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
queryString
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Tag]
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
id
instance
Data.ToHeaders
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
toHeaders :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance
Data.ToJSON
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
toJSON :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Value
toJSON
StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Maybe [Tag]
Maybe Text
Text
id :: Text
tags :: Maybe [Tag]
queryString :: Maybe Text
$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Text
$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Maybe [Tag]
$sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"QueryString" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
queryString,
(Key
"Tags" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags
]
)
instance
Data.ToPath
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
toPath :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> ByteString
toPath
StartBulkDisassociateWirelessDeviceFromMulticastGroup' {Maybe [Tag]
Maybe Text
Text
id :: Text
tags :: Maybe [Tag]
queryString :: Maybe Text
$sel:id:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Text
$sel:tags:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> Maybe [Tag]
$sel:queryString:StartBulkDisassociateWirelessDeviceFromMulticastGroup' :: StartBulkDisassociateWirelessDeviceFromMulticastGroup -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/multicast-groups/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
id, ByteString
"/bulk"]
instance
Data.ToQuery
StartBulkDisassociateWirelessDeviceFromMulticastGroup
where
toQuery :: StartBulkDisassociateWirelessDeviceFromMulticastGroup
-> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse = StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse'
{
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Int
httpStatus :: Prelude.Int
}
deriving (StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Bool
$c/= :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Bool
== :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Bool
$c== :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Bool
Prelude.Eq, ReadPrec
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
ReadPrec
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
Int
-> ReadS
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
ReadS
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
$creadListPrec :: ReadPrec
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
readPrec :: ReadPrec
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
$creadPrec :: ReadPrec
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
readList :: ReadS
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
$creadList :: ReadS
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
readsPrec :: Int
-> ReadS
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
$creadsPrec :: Int
-> ReadS
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
Prelude.Read, Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> ShowS
[StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
-> ShowS
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
-> ShowS
$cshowList :: [StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse]
-> ShowS
show :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> String
$cshow :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> String
showsPrec :: Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> ShowS
$cshowsPrec :: Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> ShowS
Prelude.Show, forall x.
Rep StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse x
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
forall x.
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Rep
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse x
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
$cfrom :: forall x.
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Rep
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse x
Prelude.Generic)
newStartBulkDisassociateWirelessDeviceFromMulticastGroupResponse ::
Prelude.Int ->
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
newStartBulkDisassociateWirelessDeviceFromMulticastGroupResponse :: Int
-> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
newStartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
Int
pHttpStatus_ =
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse'
{ $sel:httpStatus:StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' :: Int
httpStatus =
Int
pHttpStatus_
}
startBulkDisassociateWirelessDeviceFromMulticastGroupResponse_httpStatus :: Lens.Lens' StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse Prelude.Int
startBulkDisassociateWirelessDeviceFromMulticastGroupResponse_httpStatus :: Lens'
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse Int
startBulkDisassociateWirelessDeviceFromMulticastGroupResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' {Int
httpStatus :: Int
$sel:httpStatus:StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Int
httpStatus} -> Int
httpStatus) (\s :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
s@StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' {} Int
a -> StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
s {$sel:httpStatus:StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' :: Int
httpStatus = Int
a} :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse)
instance
Prelude.NFData
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
where
rnf :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse -> ()
rnf
StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' {Int
httpStatus :: Int
$sel:httpStatus:StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse' :: StartBulkDisassociateWirelessDeviceFromMulticastGroupResponse
-> Int
..} =
forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus