{-# 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.AWSHealth.DescribeEventTypes
(
DescribeEventTypes (..),
newDescribeEventTypes,
describeEventTypes_filter,
describeEventTypes_locale,
describeEventTypes_maxResults,
describeEventTypes_nextToken,
DescribeEventTypesResponse (..),
newDescribeEventTypesResponse,
describeEventTypesResponse_eventTypes,
describeEventTypesResponse_nextToken,
describeEventTypesResponse_httpStatus,
)
where
import Amazonka.AWSHealth.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeEventTypes = DescribeEventTypes'
{
DescribeEventTypes -> Maybe EventTypeFilter
filter' :: Prelude.Maybe EventTypeFilter,
DescribeEventTypes -> Maybe Text
locale :: Prelude.Maybe Prelude.Text,
DescribeEventTypes -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
DescribeEventTypes -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
}
deriving (DescribeEventTypes -> DescribeEventTypes -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeEventTypes -> DescribeEventTypes -> Bool
$c/= :: DescribeEventTypes -> DescribeEventTypes -> Bool
== :: DescribeEventTypes -> DescribeEventTypes -> Bool
$c== :: DescribeEventTypes -> DescribeEventTypes -> Bool
Prelude.Eq, ReadPrec [DescribeEventTypes]
ReadPrec DescribeEventTypes
Int -> ReadS DescribeEventTypes
ReadS [DescribeEventTypes]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeEventTypes]
$creadListPrec :: ReadPrec [DescribeEventTypes]
readPrec :: ReadPrec DescribeEventTypes
$creadPrec :: ReadPrec DescribeEventTypes
readList :: ReadS [DescribeEventTypes]
$creadList :: ReadS [DescribeEventTypes]
readsPrec :: Int -> ReadS DescribeEventTypes
$creadsPrec :: Int -> ReadS DescribeEventTypes
Prelude.Read, Int -> DescribeEventTypes -> ShowS
[DescribeEventTypes] -> ShowS
DescribeEventTypes -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeEventTypes] -> ShowS
$cshowList :: [DescribeEventTypes] -> ShowS
show :: DescribeEventTypes -> String
$cshow :: DescribeEventTypes -> String
showsPrec :: Int -> DescribeEventTypes -> ShowS
$cshowsPrec :: Int -> DescribeEventTypes -> ShowS
Prelude.Show, forall x. Rep DescribeEventTypes x -> DescribeEventTypes
forall x. DescribeEventTypes -> Rep DescribeEventTypes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeEventTypes x -> DescribeEventTypes
$cfrom :: forall x. DescribeEventTypes -> Rep DescribeEventTypes x
Prelude.Generic)
newDescribeEventTypes ::
DescribeEventTypes
newDescribeEventTypes :: DescribeEventTypes
newDescribeEventTypes =
DescribeEventTypes'
{ $sel:filter':DescribeEventTypes' :: Maybe EventTypeFilter
filter' = forall a. Maybe a
Prelude.Nothing,
$sel:locale:DescribeEventTypes' :: Maybe Text
locale = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:DescribeEventTypes' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeEventTypes' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
}
describeEventTypes_filter :: Lens.Lens' DescribeEventTypes (Prelude.Maybe EventTypeFilter)
describeEventTypes_filter :: Lens' DescribeEventTypes (Maybe EventTypeFilter)
describeEventTypes_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypes' {Maybe EventTypeFilter
filter' :: Maybe EventTypeFilter
$sel:filter':DescribeEventTypes' :: DescribeEventTypes -> Maybe EventTypeFilter
filter'} -> Maybe EventTypeFilter
filter') (\s :: DescribeEventTypes
s@DescribeEventTypes' {} Maybe EventTypeFilter
a -> DescribeEventTypes
s {$sel:filter':DescribeEventTypes' :: Maybe EventTypeFilter
filter' = Maybe EventTypeFilter
a} :: DescribeEventTypes)
describeEventTypes_locale :: Lens.Lens' DescribeEventTypes (Prelude.Maybe Prelude.Text)
describeEventTypes_locale :: Lens' DescribeEventTypes (Maybe Text)
describeEventTypes_locale = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypes' {Maybe Text
locale :: Maybe Text
$sel:locale:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
locale} -> Maybe Text
locale) (\s :: DescribeEventTypes
s@DescribeEventTypes' {} Maybe Text
a -> DescribeEventTypes
s {$sel:locale:DescribeEventTypes' :: Maybe Text
locale = Maybe Text
a} :: DescribeEventTypes)
describeEventTypes_maxResults :: Lens.Lens' DescribeEventTypes (Prelude.Maybe Prelude.Natural)
describeEventTypes_maxResults :: Lens' DescribeEventTypes (Maybe Natural)
describeEventTypes_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypes' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:DescribeEventTypes' :: DescribeEventTypes -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: DescribeEventTypes
s@DescribeEventTypes' {} Maybe Natural
a -> DescribeEventTypes
s {$sel:maxResults:DescribeEventTypes' :: Maybe Natural
maxResults = Maybe Natural
a} :: DescribeEventTypes)
describeEventTypes_nextToken :: Lens.Lens' DescribeEventTypes (Prelude.Maybe Prelude.Text)
describeEventTypes_nextToken :: Lens' DescribeEventTypes (Maybe Text)
describeEventTypes_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypes' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeEventTypes
s@DescribeEventTypes' {} Maybe Text
a -> DescribeEventTypes
s {$sel:nextToken:DescribeEventTypes' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeEventTypes)
instance Core.AWSPager DescribeEventTypes where
page :: DescribeEventTypes
-> AWSResponse DescribeEventTypes -> Maybe DescribeEventTypes
page DescribeEventTypes
rq AWSResponse DescribeEventTypes
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeEventTypes
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeEventTypesResponse (Maybe Text)
describeEventTypesResponse_nextToken
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 DescribeEventTypes
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeEventTypesResponse (Maybe [EventType])
describeEventTypesResponse_eventTypes
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.$ DescribeEventTypes
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeEventTypes (Maybe Text)
describeEventTypes_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeEventTypes
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeEventTypesResponse (Maybe Text)
describeEventTypesResponse_nextToken
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 DescribeEventTypes where
type
AWSResponse DescribeEventTypes =
DescribeEventTypesResponse
request :: (Service -> Service)
-> DescribeEventTypes -> Request DescribeEventTypes
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 DescribeEventTypes
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeEventTypes)))
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 [EventType]
-> Maybe Text -> Int -> DescribeEventTypesResponse
DescribeEventTypesResponse'
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
"eventTypes" 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
"nextToken")
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 DescribeEventTypes where
hashWithSalt :: Int -> DescribeEventTypes -> Int
hashWithSalt Int
_salt DescribeEventTypes' {Maybe Natural
Maybe Text
Maybe EventTypeFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
locale :: Maybe Text
filter' :: Maybe EventTypeFilter
$sel:nextToken:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
$sel:maxResults:DescribeEventTypes' :: DescribeEventTypes -> Maybe Natural
$sel:locale:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
$sel:filter':DescribeEventTypes' :: DescribeEventTypes -> Maybe EventTypeFilter
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe EventTypeFilter
filter'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
locale
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
instance Prelude.NFData DescribeEventTypes where
rnf :: DescribeEventTypes -> ()
rnf DescribeEventTypes' {Maybe Natural
Maybe Text
Maybe EventTypeFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
locale :: Maybe Text
filter' :: Maybe EventTypeFilter
$sel:nextToken:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
$sel:maxResults:DescribeEventTypes' :: DescribeEventTypes -> Maybe Natural
$sel:locale:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
$sel:filter':DescribeEventTypes' :: DescribeEventTypes -> Maybe EventTypeFilter
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe EventTypeFilter
filter'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
locale
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
instance Data.ToHeaders DescribeEventTypes where
toHeaders :: DescribeEventTypes -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"AWSHealth_20160804.DescribeEventTypes" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON DescribeEventTypes where
toJSON :: DescribeEventTypes -> Value
toJSON DescribeEventTypes' {Maybe Natural
Maybe Text
Maybe EventTypeFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
locale :: Maybe Text
filter' :: Maybe EventTypeFilter
$sel:nextToken:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
$sel:maxResults:DescribeEventTypes' :: DescribeEventTypes -> Maybe Natural
$sel:locale:DescribeEventTypes' :: DescribeEventTypes -> Maybe Text
$sel:filter':DescribeEventTypes' :: DescribeEventTypes -> Maybe EventTypeFilter
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"filter" 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 EventTypeFilter
filter',
(Key
"locale" 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
locale,
(Key
"maxResults" 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 Natural
maxResults,
(Key
"nextToken" 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
nextToken
]
)
instance Data.ToPath DescribeEventTypes where
toPath :: DescribeEventTypes -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeEventTypes where
toQuery :: DescribeEventTypes -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeEventTypesResponse = DescribeEventTypesResponse'
{
DescribeEventTypesResponse -> Maybe [EventType]
eventTypes :: Prelude.Maybe [EventType],
DescribeEventTypesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeEventTypesResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeEventTypesResponse -> DescribeEventTypesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeEventTypesResponse -> DescribeEventTypesResponse -> Bool
$c/= :: DescribeEventTypesResponse -> DescribeEventTypesResponse -> Bool
== :: DescribeEventTypesResponse -> DescribeEventTypesResponse -> Bool
$c== :: DescribeEventTypesResponse -> DescribeEventTypesResponse -> Bool
Prelude.Eq, ReadPrec [DescribeEventTypesResponse]
ReadPrec DescribeEventTypesResponse
Int -> ReadS DescribeEventTypesResponse
ReadS [DescribeEventTypesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeEventTypesResponse]
$creadListPrec :: ReadPrec [DescribeEventTypesResponse]
readPrec :: ReadPrec DescribeEventTypesResponse
$creadPrec :: ReadPrec DescribeEventTypesResponse
readList :: ReadS [DescribeEventTypesResponse]
$creadList :: ReadS [DescribeEventTypesResponse]
readsPrec :: Int -> ReadS DescribeEventTypesResponse
$creadsPrec :: Int -> ReadS DescribeEventTypesResponse
Prelude.Read, Int -> DescribeEventTypesResponse -> ShowS
[DescribeEventTypesResponse] -> ShowS
DescribeEventTypesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeEventTypesResponse] -> ShowS
$cshowList :: [DescribeEventTypesResponse] -> ShowS
show :: DescribeEventTypesResponse -> String
$cshow :: DescribeEventTypesResponse -> String
showsPrec :: Int -> DescribeEventTypesResponse -> ShowS
$cshowsPrec :: Int -> DescribeEventTypesResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeEventTypesResponse x -> DescribeEventTypesResponse
forall x.
DescribeEventTypesResponse -> Rep DescribeEventTypesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeEventTypesResponse x -> DescribeEventTypesResponse
$cfrom :: forall x.
DescribeEventTypesResponse -> Rep DescribeEventTypesResponse x
Prelude.Generic)
newDescribeEventTypesResponse ::
Prelude.Int ->
DescribeEventTypesResponse
newDescribeEventTypesResponse :: Int -> DescribeEventTypesResponse
newDescribeEventTypesResponse Int
pHttpStatus_ =
DescribeEventTypesResponse'
{ $sel:eventTypes:DescribeEventTypesResponse' :: Maybe [EventType]
eventTypes =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeEventTypesResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeEventTypesResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeEventTypesResponse_eventTypes :: Lens.Lens' DescribeEventTypesResponse (Prelude.Maybe [EventType])
describeEventTypesResponse_eventTypes :: Lens' DescribeEventTypesResponse (Maybe [EventType])
describeEventTypesResponse_eventTypes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypesResponse' {Maybe [EventType]
eventTypes :: Maybe [EventType]
$sel:eventTypes:DescribeEventTypesResponse' :: DescribeEventTypesResponse -> Maybe [EventType]
eventTypes} -> Maybe [EventType]
eventTypes) (\s :: DescribeEventTypesResponse
s@DescribeEventTypesResponse' {} Maybe [EventType]
a -> DescribeEventTypesResponse
s {$sel:eventTypes:DescribeEventTypesResponse' :: Maybe [EventType]
eventTypes = Maybe [EventType]
a} :: DescribeEventTypesResponse) 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
describeEventTypesResponse_nextToken :: Lens.Lens' DescribeEventTypesResponse (Prelude.Maybe Prelude.Text)
describeEventTypesResponse_nextToken :: Lens' DescribeEventTypesResponse (Maybe Text)
describeEventTypesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeEventTypesResponse' :: DescribeEventTypesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeEventTypesResponse
s@DescribeEventTypesResponse' {} Maybe Text
a -> DescribeEventTypesResponse
s {$sel:nextToken:DescribeEventTypesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeEventTypesResponse)
describeEventTypesResponse_httpStatus :: Lens.Lens' DescribeEventTypesResponse Prelude.Int
describeEventTypesResponse_httpStatus :: Lens' DescribeEventTypesResponse Int
describeEventTypesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEventTypesResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeEventTypesResponse' :: DescribeEventTypesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeEventTypesResponse
s@DescribeEventTypesResponse' {} Int
a -> DescribeEventTypesResponse
s {$sel:httpStatus:DescribeEventTypesResponse' :: Int
httpStatus = Int
a} :: DescribeEventTypesResponse)
instance Prelude.NFData DescribeEventTypesResponse where
rnf :: DescribeEventTypesResponse -> ()
rnf DescribeEventTypesResponse' {Int
Maybe [EventType]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
eventTypes :: Maybe [EventType]
$sel:httpStatus:DescribeEventTypesResponse' :: DescribeEventTypesResponse -> Int
$sel:nextToken:DescribeEventTypesResponse' :: DescribeEventTypesResponse -> Maybe Text
$sel:eventTypes:DescribeEventTypesResponse' :: DescribeEventTypesResponse -> Maybe [EventType]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [EventType]
eventTypes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus