{-# 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.Lambda.ListFunctionEventInvokeConfigs
(
ListFunctionEventInvokeConfigs (..),
newListFunctionEventInvokeConfigs,
listFunctionEventInvokeConfigs_marker,
listFunctionEventInvokeConfigs_maxItems,
listFunctionEventInvokeConfigs_functionName,
ListFunctionEventInvokeConfigsResponse (..),
newListFunctionEventInvokeConfigsResponse,
listFunctionEventInvokeConfigsResponse_functionEventInvokeConfigs,
listFunctionEventInvokeConfigsResponse_nextMarker,
listFunctionEventInvokeConfigsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Lambda.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListFunctionEventInvokeConfigs = ListFunctionEventInvokeConfigs'
{
ListFunctionEventInvokeConfigs -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
ListFunctionEventInvokeConfigs -> Maybe Natural
maxItems :: Prelude.Maybe Prelude.Natural,
ListFunctionEventInvokeConfigs -> Text
functionName :: Prelude.Text
}
deriving (ListFunctionEventInvokeConfigs
-> ListFunctionEventInvokeConfigs -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListFunctionEventInvokeConfigs
-> ListFunctionEventInvokeConfigs -> Bool
$c/= :: ListFunctionEventInvokeConfigs
-> ListFunctionEventInvokeConfigs -> Bool
== :: ListFunctionEventInvokeConfigs
-> ListFunctionEventInvokeConfigs -> Bool
$c== :: ListFunctionEventInvokeConfigs
-> ListFunctionEventInvokeConfigs -> Bool
Prelude.Eq, ReadPrec [ListFunctionEventInvokeConfigs]
ReadPrec ListFunctionEventInvokeConfigs
Int -> ReadS ListFunctionEventInvokeConfigs
ReadS [ListFunctionEventInvokeConfigs]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListFunctionEventInvokeConfigs]
$creadListPrec :: ReadPrec [ListFunctionEventInvokeConfigs]
readPrec :: ReadPrec ListFunctionEventInvokeConfigs
$creadPrec :: ReadPrec ListFunctionEventInvokeConfigs
readList :: ReadS [ListFunctionEventInvokeConfigs]
$creadList :: ReadS [ListFunctionEventInvokeConfigs]
readsPrec :: Int -> ReadS ListFunctionEventInvokeConfigs
$creadsPrec :: Int -> ReadS ListFunctionEventInvokeConfigs
Prelude.Read, Int -> ListFunctionEventInvokeConfigs -> ShowS
[ListFunctionEventInvokeConfigs] -> ShowS
ListFunctionEventInvokeConfigs -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListFunctionEventInvokeConfigs] -> ShowS
$cshowList :: [ListFunctionEventInvokeConfigs] -> ShowS
show :: ListFunctionEventInvokeConfigs -> String
$cshow :: ListFunctionEventInvokeConfigs -> String
showsPrec :: Int -> ListFunctionEventInvokeConfigs -> ShowS
$cshowsPrec :: Int -> ListFunctionEventInvokeConfigs -> ShowS
Prelude.Show, forall x.
Rep ListFunctionEventInvokeConfigs x
-> ListFunctionEventInvokeConfigs
forall x.
ListFunctionEventInvokeConfigs
-> Rep ListFunctionEventInvokeConfigs x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListFunctionEventInvokeConfigs x
-> ListFunctionEventInvokeConfigs
$cfrom :: forall x.
ListFunctionEventInvokeConfigs
-> Rep ListFunctionEventInvokeConfigs x
Prelude.Generic)
newListFunctionEventInvokeConfigs ::
Prelude.Text ->
ListFunctionEventInvokeConfigs
newListFunctionEventInvokeConfigs :: Text -> ListFunctionEventInvokeConfigs
newListFunctionEventInvokeConfigs Text
pFunctionName_ =
ListFunctionEventInvokeConfigs'
{ $sel:marker:ListFunctionEventInvokeConfigs' :: Maybe Text
marker =
forall a. Maybe a
Prelude.Nothing,
$sel:maxItems:ListFunctionEventInvokeConfigs' :: Maybe Natural
maxItems = forall a. Maybe a
Prelude.Nothing,
$sel:functionName:ListFunctionEventInvokeConfigs' :: Text
functionName = Text
pFunctionName_
}
listFunctionEventInvokeConfigs_marker :: Lens.Lens' ListFunctionEventInvokeConfigs (Prelude.Maybe Prelude.Text)
listFunctionEventInvokeConfigs_marker :: Lens' ListFunctionEventInvokeConfigs (Maybe Text)
listFunctionEventInvokeConfigs_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListFunctionEventInvokeConfigs' {Maybe Text
marker :: Maybe Text
$sel:marker:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Text
marker} -> Maybe Text
marker) (\s :: ListFunctionEventInvokeConfigs
s@ListFunctionEventInvokeConfigs' {} Maybe Text
a -> ListFunctionEventInvokeConfigs
s {$sel:marker:ListFunctionEventInvokeConfigs' :: Maybe Text
marker = Maybe Text
a} :: ListFunctionEventInvokeConfigs)
listFunctionEventInvokeConfigs_maxItems :: Lens.Lens' ListFunctionEventInvokeConfigs (Prelude.Maybe Prelude.Natural)
listFunctionEventInvokeConfigs_maxItems :: Lens' ListFunctionEventInvokeConfigs (Maybe Natural)
listFunctionEventInvokeConfigs_maxItems = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListFunctionEventInvokeConfigs' {Maybe Natural
maxItems :: Maybe Natural
$sel:maxItems:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Natural
maxItems} -> Maybe Natural
maxItems) (\s :: ListFunctionEventInvokeConfigs
s@ListFunctionEventInvokeConfigs' {} Maybe Natural
a -> ListFunctionEventInvokeConfigs
s {$sel:maxItems:ListFunctionEventInvokeConfigs' :: Maybe Natural
maxItems = Maybe Natural
a} :: ListFunctionEventInvokeConfigs)
listFunctionEventInvokeConfigs_functionName :: Lens.Lens' ListFunctionEventInvokeConfigs Prelude.Text
listFunctionEventInvokeConfigs_functionName :: Lens' ListFunctionEventInvokeConfigs Text
listFunctionEventInvokeConfigs_functionName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListFunctionEventInvokeConfigs' {Text
functionName :: Text
$sel:functionName:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Text
functionName} -> Text
functionName) (\s :: ListFunctionEventInvokeConfigs
s@ListFunctionEventInvokeConfigs' {} Text
a -> ListFunctionEventInvokeConfigs
s {$sel:functionName:ListFunctionEventInvokeConfigs' :: Text
functionName = Text
a} :: ListFunctionEventInvokeConfigs)
instance Core.AWSPager ListFunctionEventInvokeConfigs where
page :: ListFunctionEventInvokeConfigs
-> AWSResponse ListFunctionEventInvokeConfigs
-> Maybe ListFunctionEventInvokeConfigs
page ListFunctionEventInvokeConfigs
rq AWSResponse ListFunctionEventInvokeConfigs
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListFunctionEventInvokeConfigs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListFunctionEventInvokeConfigsResponse (Maybe Text)
listFunctionEventInvokeConfigsResponse_nextMarker
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListFunctionEventInvokeConfigs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
ListFunctionEventInvokeConfigsResponse
(Maybe [FunctionEventInvokeConfig])
listFunctionEventInvokeConfigsResponse_functionEventInvokeConfigs
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListFunctionEventInvokeConfigs
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListFunctionEventInvokeConfigs (Maybe Text)
listFunctionEventInvokeConfigs_marker
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListFunctionEventInvokeConfigs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListFunctionEventInvokeConfigsResponse (Maybe Text)
listFunctionEventInvokeConfigsResponse_nextMarker
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance
Core.AWSRequest
ListFunctionEventInvokeConfigs
where
type
AWSResponse ListFunctionEventInvokeConfigs =
ListFunctionEventInvokeConfigsResponse
request :: (Service -> Service)
-> ListFunctionEventInvokeConfigs
-> Request ListFunctionEventInvokeConfigs
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListFunctionEventInvokeConfigs
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ListFunctionEventInvokeConfigs)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe [FunctionEventInvokeConfig]
-> Maybe Text -> Int -> ListFunctionEventInvokeConfigsResponse
ListFunctionEventInvokeConfigsResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"FunctionEventInvokeConfigs"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"NextMarker")
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
ListFunctionEventInvokeConfigs
where
hashWithSalt :: Int -> ListFunctionEventInvokeConfigs -> Int
hashWithSalt
Int
_salt
ListFunctionEventInvokeConfigs' {Maybe Natural
Maybe Text
Text
functionName :: Text
maxItems :: Maybe Natural
marker :: Maybe Text
$sel:functionName:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Text
$sel:maxItems:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Natural
$sel:marker:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
marker
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxItems
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
functionName
instance
Prelude.NFData
ListFunctionEventInvokeConfigs
where
rnf :: ListFunctionEventInvokeConfigs -> ()
rnf ListFunctionEventInvokeConfigs' {Maybe Natural
Maybe Text
Text
functionName :: Text
maxItems :: Maybe Natural
marker :: Maybe Text
$sel:functionName:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Text
$sel:maxItems:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Natural
$sel:marker:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxItems
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
functionName
instance
Data.ToHeaders
ListFunctionEventInvokeConfigs
where
toHeaders :: ListFunctionEventInvokeConfigs -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath ListFunctionEventInvokeConfigs where
toPath :: ListFunctionEventInvokeConfigs -> ByteString
toPath ListFunctionEventInvokeConfigs' {Maybe Natural
Maybe Text
Text
functionName :: Text
maxItems :: Maybe Natural
marker :: Maybe Text
$sel:functionName:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Text
$sel:maxItems:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Natural
$sel:marker:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/2019-09-25/functions/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
functionName,
ByteString
"/event-invoke-config/list"
]
instance Data.ToQuery ListFunctionEventInvokeConfigs where
toQuery :: ListFunctionEventInvokeConfigs -> QueryString
toQuery ListFunctionEventInvokeConfigs' {Maybe Natural
Maybe Text
Text
functionName :: Text
maxItems :: Maybe Natural
marker :: Maybe Text
$sel:functionName:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Text
$sel:maxItems:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Natural
$sel:marker:ListFunctionEventInvokeConfigs' :: ListFunctionEventInvokeConfigs -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Marker" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
marker,
ByteString
"MaxItems" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxItems
]
data ListFunctionEventInvokeConfigsResponse = ListFunctionEventInvokeConfigsResponse'
{
ListFunctionEventInvokeConfigsResponse
-> Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs :: Prelude.Maybe [FunctionEventInvokeConfig],
ListFunctionEventInvokeConfigsResponse -> Maybe Text
nextMarker :: Prelude.Maybe Prelude.Text,
ListFunctionEventInvokeConfigsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListFunctionEventInvokeConfigsResponse
-> ListFunctionEventInvokeConfigsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListFunctionEventInvokeConfigsResponse
-> ListFunctionEventInvokeConfigsResponse -> Bool
$c/= :: ListFunctionEventInvokeConfigsResponse
-> ListFunctionEventInvokeConfigsResponse -> Bool
== :: ListFunctionEventInvokeConfigsResponse
-> ListFunctionEventInvokeConfigsResponse -> Bool
$c== :: ListFunctionEventInvokeConfigsResponse
-> ListFunctionEventInvokeConfigsResponse -> Bool
Prelude.Eq, ReadPrec [ListFunctionEventInvokeConfigsResponse]
ReadPrec ListFunctionEventInvokeConfigsResponse
Int -> ReadS ListFunctionEventInvokeConfigsResponse
ReadS [ListFunctionEventInvokeConfigsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListFunctionEventInvokeConfigsResponse]
$creadListPrec :: ReadPrec [ListFunctionEventInvokeConfigsResponse]
readPrec :: ReadPrec ListFunctionEventInvokeConfigsResponse
$creadPrec :: ReadPrec ListFunctionEventInvokeConfigsResponse
readList :: ReadS [ListFunctionEventInvokeConfigsResponse]
$creadList :: ReadS [ListFunctionEventInvokeConfigsResponse]
readsPrec :: Int -> ReadS ListFunctionEventInvokeConfigsResponse
$creadsPrec :: Int -> ReadS ListFunctionEventInvokeConfigsResponse
Prelude.Read, Int -> ListFunctionEventInvokeConfigsResponse -> ShowS
[ListFunctionEventInvokeConfigsResponse] -> ShowS
ListFunctionEventInvokeConfigsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListFunctionEventInvokeConfigsResponse] -> ShowS
$cshowList :: [ListFunctionEventInvokeConfigsResponse] -> ShowS
show :: ListFunctionEventInvokeConfigsResponse -> String
$cshow :: ListFunctionEventInvokeConfigsResponse -> String
showsPrec :: Int -> ListFunctionEventInvokeConfigsResponse -> ShowS
$cshowsPrec :: Int -> ListFunctionEventInvokeConfigsResponse -> ShowS
Prelude.Show, forall x.
Rep ListFunctionEventInvokeConfigsResponse x
-> ListFunctionEventInvokeConfigsResponse
forall x.
ListFunctionEventInvokeConfigsResponse
-> Rep ListFunctionEventInvokeConfigsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListFunctionEventInvokeConfigsResponse x
-> ListFunctionEventInvokeConfigsResponse
$cfrom :: forall x.
ListFunctionEventInvokeConfigsResponse
-> Rep ListFunctionEventInvokeConfigsResponse x
Prelude.Generic)
newListFunctionEventInvokeConfigsResponse ::
Prelude.Int ->
ListFunctionEventInvokeConfigsResponse
newListFunctionEventInvokeConfigsResponse :: Int -> ListFunctionEventInvokeConfigsResponse
newListFunctionEventInvokeConfigsResponse
Int
pHttpStatus_ =
ListFunctionEventInvokeConfigsResponse'
{ $sel:functionEventInvokeConfigs:ListFunctionEventInvokeConfigsResponse' :: Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs =
forall a. Maybe a
Prelude.Nothing,
$sel:nextMarker:ListFunctionEventInvokeConfigsResponse' :: Maybe Text
nextMarker = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListFunctionEventInvokeConfigsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listFunctionEventInvokeConfigsResponse_functionEventInvokeConfigs :: Lens.Lens' ListFunctionEventInvokeConfigsResponse (Prelude.Maybe [FunctionEventInvokeConfig])
listFunctionEventInvokeConfigsResponse_functionEventInvokeConfigs :: Lens'
ListFunctionEventInvokeConfigsResponse
(Maybe [FunctionEventInvokeConfig])
listFunctionEventInvokeConfigsResponse_functionEventInvokeConfigs = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListFunctionEventInvokeConfigsResponse' {Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs :: Maybe [FunctionEventInvokeConfig]
$sel:functionEventInvokeConfigs:ListFunctionEventInvokeConfigsResponse' :: ListFunctionEventInvokeConfigsResponse
-> Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs} -> Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs) (\s :: ListFunctionEventInvokeConfigsResponse
s@ListFunctionEventInvokeConfigsResponse' {} Maybe [FunctionEventInvokeConfig]
a -> ListFunctionEventInvokeConfigsResponse
s {$sel:functionEventInvokeConfigs:ListFunctionEventInvokeConfigsResponse' :: Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs = Maybe [FunctionEventInvokeConfig]
a} :: ListFunctionEventInvokeConfigsResponse) 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
listFunctionEventInvokeConfigsResponse_nextMarker :: Lens.Lens' ListFunctionEventInvokeConfigsResponse (Prelude.Maybe Prelude.Text)
listFunctionEventInvokeConfigsResponse_nextMarker :: Lens' ListFunctionEventInvokeConfigsResponse (Maybe Text)
listFunctionEventInvokeConfigsResponse_nextMarker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListFunctionEventInvokeConfigsResponse' {Maybe Text
nextMarker :: Maybe Text
$sel:nextMarker:ListFunctionEventInvokeConfigsResponse' :: ListFunctionEventInvokeConfigsResponse -> Maybe Text
nextMarker} -> Maybe Text
nextMarker) (\s :: ListFunctionEventInvokeConfigsResponse
s@ListFunctionEventInvokeConfigsResponse' {} Maybe Text
a -> ListFunctionEventInvokeConfigsResponse
s {$sel:nextMarker:ListFunctionEventInvokeConfigsResponse' :: Maybe Text
nextMarker = Maybe Text
a} :: ListFunctionEventInvokeConfigsResponse)
listFunctionEventInvokeConfigsResponse_httpStatus :: Lens.Lens' ListFunctionEventInvokeConfigsResponse Prelude.Int
listFunctionEventInvokeConfigsResponse_httpStatus :: Lens' ListFunctionEventInvokeConfigsResponse Int
listFunctionEventInvokeConfigsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListFunctionEventInvokeConfigsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListFunctionEventInvokeConfigsResponse' :: ListFunctionEventInvokeConfigsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListFunctionEventInvokeConfigsResponse
s@ListFunctionEventInvokeConfigsResponse' {} Int
a -> ListFunctionEventInvokeConfigsResponse
s {$sel:httpStatus:ListFunctionEventInvokeConfigsResponse' :: Int
httpStatus = Int
a} :: ListFunctionEventInvokeConfigsResponse)
instance
Prelude.NFData
ListFunctionEventInvokeConfigsResponse
where
rnf :: ListFunctionEventInvokeConfigsResponse -> ()
rnf ListFunctionEventInvokeConfigsResponse' {Int
Maybe [FunctionEventInvokeConfig]
Maybe Text
httpStatus :: Int
nextMarker :: Maybe Text
functionEventInvokeConfigs :: Maybe [FunctionEventInvokeConfig]
$sel:httpStatus:ListFunctionEventInvokeConfigsResponse' :: ListFunctionEventInvokeConfigsResponse -> Int
$sel:nextMarker:ListFunctionEventInvokeConfigsResponse' :: ListFunctionEventInvokeConfigsResponse -> Maybe Text
$sel:functionEventInvokeConfigs:ListFunctionEventInvokeConfigsResponse' :: ListFunctionEventInvokeConfigsResponse
-> Maybe [FunctionEventInvokeConfig]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [FunctionEventInvokeConfig]
functionEventInvokeConfigs
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextMarker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus