{-# 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.RedshiftServerLess.ListUsageLimits
(
ListUsageLimits (..),
newListUsageLimits,
listUsageLimits_maxResults,
listUsageLimits_nextToken,
listUsageLimits_resourceArn,
listUsageLimits_usageType,
ListUsageLimitsResponse (..),
newListUsageLimitsResponse,
listUsageLimitsResponse_nextToken,
listUsageLimitsResponse_usageLimits,
listUsageLimitsResponse_httpStatus,
)
where
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 Amazonka.RedshiftServerLess.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListUsageLimits = ListUsageLimits'
{
ListUsageLimits -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListUsageLimits -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListUsageLimits -> Maybe Text
resourceArn :: Prelude.Maybe Prelude.Text,
ListUsageLimits -> Maybe UsageLimitUsageType
usageType :: Prelude.Maybe UsageLimitUsageType
}
deriving (ListUsageLimits -> ListUsageLimits -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListUsageLimits -> ListUsageLimits -> Bool
$c/= :: ListUsageLimits -> ListUsageLimits -> Bool
== :: ListUsageLimits -> ListUsageLimits -> Bool
$c== :: ListUsageLimits -> ListUsageLimits -> Bool
Prelude.Eq, ReadPrec [ListUsageLimits]
ReadPrec ListUsageLimits
Int -> ReadS ListUsageLimits
ReadS [ListUsageLimits]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListUsageLimits]
$creadListPrec :: ReadPrec [ListUsageLimits]
readPrec :: ReadPrec ListUsageLimits
$creadPrec :: ReadPrec ListUsageLimits
readList :: ReadS [ListUsageLimits]
$creadList :: ReadS [ListUsageLimits]
readsPrec :: Int -> ReadS ListUsageLimits
$creadsPrec :: Int -> ReadS ListUsageLimits
Prelude.Read, Int -> ListUsageLimits -> ShowS
[ListUsageLimits] -> ShowS
ListUsageLimits -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListUsageLimits] -> ShowS
$cshowList :: [ListUsageLimits] -> ShowS
show :: ListUsageLimits -> String
$cshow :: ListUsageLimits -> String
showsPrec :: Int -> ListUsageLimits -> ShowS
$cshowsPrec :: Int -> ListUsageLimits -> ShowS
Prelude.Show, forall x. Rep ListUsageLimits x -> ListUsageLimits
forall x. ListUsageLimits -> Rep ListUsageLimits x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListUsageLimits x -> ListUsageLimits
$cfrom :: forall x. ListUsageLimits -> Rep ListUsageLimits x
Prelude.Generic)
newListUsageLimits ::
ListUsageLimits
newListUsageLimits :: ListUsageLimits
newListUsageLimits =
ListUsageLimits'
{ $sel:maxResults:ListUsageLimits' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListUsageLimits' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:resourceArn:ListUsageLimits' :: Maybe Text
resourceArn = forall a. Maybe a
Prelude.Nothing,
$sel:usageType:ListUsageLimits' :: Maybe UsageLimitUsageType
usageType = forall a. Maybe a
Prelude.Nothing
}
listUsageLimits_maxResults :: Lens.Lens' ListUsageLimits (Prelude.Maybe Prelude.Natural)
listUsageLimits_maxResults :: Lens' ListUsageLimits (Maybe Natural)
listUsageLimits_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimits' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListUsageLimits' :: ListUsageLimits -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListUsageLimits
s@ListUsageLimits' {} Maybe Natural
a -> ListUsageLimits
s {$sel:maxResults:ListUsageLimits' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListUsageLimits)
listUsageLimits_nextToken :: Lens.Lens' ListUsageLimits (Prelude.Maybe Prelude.Text)
listUsageLimits_nextToken :: Lens' ListUsageLimits (Maybe Text)
listUsageLimits_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimits' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListUsageLimits' :: ListUsageLimits -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListUsageLimits
s@ListUsageLimits' {} Maybe Text
a -> ListUsageLimits
s {$sel:nextToken:ListUsageLimits' :: Maybe Text
nextToken = Maybe Text
a} :: ListUsageLimits)
listUsageLimits_resourceArn :: Lens.Lens' ListUsageLimits (Prelude.Maybe Prelude.Text)
listUsageLimits_resourceArn :: Lens' ListUsageLimits (Maybe Text)
listUsageLimits_resourceArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimits' {Maybe Text
resourceArn :: Maybe Text
$sel:resourceArn:ListUsageLimits' :: ListUsageLimits -> Maybe Text
resourceArn} -> Maybe Text
resourceArn) (\s :: ListUsageLimits
s@ListUsageLimits' {} Maybe Text
a -> ListUsageLimits
s {$sel:resourceArn:ListUsageLimits' :: Maybe Text
resourceArn = Maybe Text
a} :: ListUsageLimits)
listUsageLimits_usageType :: Lens.Lens' ListUsageLimits (Prelude.Maybe UsageLimitUsageType)
listUsageLimits_usageType :: Lens' ListUsageLimits (Maybe UsageLimitUsageType)
listUsageLimits_usageType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimits' {Maybe UsageLimitUsageType
usageType :: Maybe UsageLimitUsageType
$sel:usageType:ListUsageLimits' :: ListUsageLimits -> Maybe UsageLimitUsageType
usageType} -> Maybe UsageLimitUsageType
usageType) (\s :: ListUsageLimits
s@ListUsageLimits' {} Maybe UsageLimitUsageType
a -> ListUsageLimits
s {$sel:usageType:ListUsageLimits' :: Maybe UsageLimitUsageType
usageType = Maybe UsageLimitUsageType
a} :: ListUsageLimits)
instance Core.AWSPager ListUsageLimits where
page :: ListUsageLimits
-> AWSResponse ListUsageLimits -> Maybe ListUsageLimits
page ListUsageLimits
rq AWSResponse ListUsageLimits
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListUsageLimits
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListUsageLimitsResponse (Maybe Text)
listUsageLimitsResponse_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 ListUsageLimits
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListUsageLimitsResponse (Maybe (NonEmpty UsageLimit))
listUsageLimitsResponse_usageLimits
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (p :: * -> * -> *) (f :: * -> *) s a.
(Profunctor p, Contravariant f) =>
(s -> a) -> Optic' p f s a
Lens.to forall l. IsList l => l -> [Item l]
Prelude.toList
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ ListUsageLimits
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListUsageLimits (Maybe Text)
listUsageLimits_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListUsageLimits
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListUsageLimitsResponse (Maybe Text)
listUsageLimitsResponse_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 ListUsageLimits where
type
AWSResponse ListUsageLimits =
ListUsageLimitsResponse
request :: (Service -> Service) -> ListUsageLimits -> Request ListUsageLimits
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 ListUsageLimits
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse ListUsageLimits)))
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 Text
-> Maybe (NonEmpty UsageLimit) -> Int -> ListUsageLimitsResponse
ListUsageLimitsResponse'
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
"nextToken")
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
"usageLimits")
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 ListUsageLimits where
hashWithSalt :: Int -> ListUsageLimits -> Int
hashWithSalt Int
_salt ListUsageLimits' {Maybe Natural
Maybe Text
Maybe UsageLimitUsageType
usageType :: Maybe UsageLimitUsageType
resourceArn :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:usageType:ListUsageLimits' :: ListUsageLimits -> Maybe UsageLimitUsageType
$sel:resourceArn:ListUsageLimits' :: ListUsageLimits -> Maybe Text
$sel:nextToken:ListUsageLimits' :: ListUsageLimits -> Maybe Text
$sel:maxResults:ListUsageLimits' :: ListUsageLimits -> Maybe Natural
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resourceArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe UsageLimitUsageType
usageType
instance Prelude.NFData ListUsageLimits where
rnf :: ListUsageLimits -> ()
rnf ListUsageLimits' {Maybe Natural
Maybe Text
Maybe UsageLimitUsageType
usageType :: Maybe UsageLimitUsageType
resourceArn :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:usageType:ListUsageLimits' :: ListUsageLimits -> Maybe UsageLimitUsageType
$sel:resourceArn:ListUsageLimits' :: ListUsageLimits -> Maybe Text
$sel:nextToken:ListUsageLimits' :: ListUsageLimits -> Maybe Text
$sel:maxResults:ListUsageLimits' :: ListUsageLimits -> Maybe Natural
..} =
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
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe UsageLimitUsageType
usageType
instance Data.ToHeaders ListUsageLimits where
toHeaders :: ListUsageLimits -> 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
"RedshiftServerless.ListUsageLimits" ::
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 ListUsageLimits where
toJSON :: ListUsageLimits -> Value
toJSON ListUsageLimits' {Maybe Natural
Maybe Text
Maybe UsageLimitUsageType
usageType :: Maybe UsageLimitUsageType
resourceArn :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:usageType:ListUsageLimits' :: ListUsageLimits -> Maybe UsageLimitUsageType
$sel:resourceArn:ListUsageLimits' :: ListUsageLimits -> Maybe Text
$sel:nextToken:ListUsageLimits' :: ListUsageLimits -> Maybe Text
$sel:maxResults:ListUsageLimits' :: ListUsageLimits -> Maybe Natural
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (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,
(Key
"resourceArn" 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
resourceArn,
(Key
"usageType" 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 UsageLimitUsageType
usageType
]
)
instance Data.ToPath ListUsageLimits where
toPath :: ListUsageLimits -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery ListUsageLimits where
toQuery :: ListUsageLimits -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListUsageLimitsResponse = ListUsageLimitsResponse'
{
ListUsageLimitsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListUsageLimitsResponse -> Maybe (NonEmpty UsageLimit)
usageLimits :: Prelude.Maybe (Prelude.NonEmpty UsageLimit),
ListUsageLimitsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListUsageLimitsResponse -> ListUsageLimitsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListUsageLimitsResponse -> ListUsageLimitsResponse -> Bool
$c/= :: ListUsageLimitsResponse -> ListUsageLimitsResponse -> Bool
== :: ListUsageLimitsResponse -> ListUsageLimitsResponse -> Bool
$c== :: ListUsageLimitsResponse -> ListUsageLimitsResponse -> Bool
Prelude.Eq, ReadPrec [ListUsageLimitsResponse]
ReadPrec ListUsageLimitsResponse
Int -> ReadS ListUsageLimitsResponse
ReadS [ListUsageLimitsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListUsageLimitsResponse]
$creadListPrec :: ReadPrec [ListUsageLimitsResponse]
readPrec :: ReadPrec ListUsageLimitsResponse
$creadPrec :: ReadPrec ListUsageLimitsResponse
readList :: ReadS [ListUsageLimitsResponse]
$creadList :: ReadS [ListUsageLimitsResponse]
readsPrec :: Int -> ReadS ListUsageLimitsResponse
$creadsPrec :: Int -> ReadS ListUsageLimitsResponse
Prelude.Read, Int -> ListUsageLimitsResponse -> ShowS
[ListUsageLimitsResponse] -> ShowS
ListUsageLimitsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListUsageLimitsResponse] -> ShowS
$cshowList :: [ListUsageLimitsResponse] -> ShowS
show :: ListUsageLimitsResponse -> String
$cshow :: ListUsageLimitsResponse -> String
showsPrec :: Int -> ListUsageLimitsResponse -> ShowS
$cshowsPrec :: Int -> ListUsageLimitsResponse -> ShowS
Prelude.Show, forall x. Rep ListUsageLimitsResponse x -> ListUsageLimitsResponse
forall x. ListUsageLimitsResponse -> Rep ListUsageLimitsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListUsageLimitsResponse x -> ListUsageLimitsResponse
$cfrom :: forall x. ListUsageLimitsResponse -> Rep ListUsageLimitsResponse x
Prelude.Generic)
newListUsageLimitsResponse ::
Prelude.Int ->
ListUsageLimitsResponse
newListUsageLimitsResponse :: Int -> ListUsageLimitsResponse
newListUsageLimitsResponse Int
pHttpStatus_ =
ListUsageLimitsResponse'
{ $sel:nextToken:ListUsageLimitsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:usageLimits:ListUsageLimitsResponse' :: Maybe (NonEmpty UsageLimit)
usageLimits = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListUsageLimitsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listUsageLimitsResponse_nextToken :: Lens.Lens' ListUsageLimitsResponse (Prelude.Maybe Prelude.Text)
listUsageLimitsResponse_nextToken :: Lens' ListUsageLimitsResponse (Maybe Text)
listUsageLimitsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimitsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListUsageLimitsResponse' :: ListUsageLimitsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListUsageLimitsResponse
s@ListUsageLimitsResponse' {} Maybe Text
a -> ListUsageLimitsResponse
s {$sel:nextToken:ListUsageLimitsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListUsageLimitsResponse)
listUsageLimitsResponse_usageLimits :: Lens.Lens' ListUsageLimitsResponse (Prelude.Maybe (Prelude.NonEmpty UsageLimit))
listUsageLimitsResponse_usageLimits :: Lens' ListUsageLimitsResponse (Maybe (NonEmpty UsageLimit))
listUsageLimitsResponse_usageLimits = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimitsResponse' {Maybe (NonEmpty UsageLimit)
usageLimits :: Maybe (NonEmpty UsageLimit)
$sel:usageLimits:ListUsageLimitsResponse' :: ListUsageLimitsResponse -> Maybe (NonEmpty UsageLimit)
usageLimits} -> Maybe (NonEmpty UsageLimit)
usageLimits) (\s :: ListUsageLimitsResponse
s@ListUsageLimitsResponse' {} Maybe (NonEmpty UsageLimit)
a -> ListUsageLimitsResponse
s {$sel:usageLimits:ListUsageLimitsResponse' :: Maybe (NonEmpty UsageLimit)
usageLimits = Maybe (NonEmpty UsageLimit)
a} :: ListUsageLimitsResponse) 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
listUsageLimitsResponse_httpStatus :: Lens.Lens' ListUsageLimitsResponse Prelude.Int
listUsageLimitsResponse_httpStatus :: Lens' ListUsageLimitsResponse Int
listUsageLimitsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUsageLimitsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListUsageLimitsResponse' :: ListUsageLimitsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListUsageLimitsResponse
s@ListUsageLimitsResponse' {} Int
a -> ListUsageLimitsResponse
s {$sel:httpStatus:ListUsageLimitsResponse' :: Int
httpStatus = Int
a} :: ListUsageLimitsResponse)
instance Prelude.NFData ListUsageLimitsResponse where
rnf :: ListUsageLimitsResponse -> ()
rnf ListUsageLimitsResponse' {Int
Maybe (NonEmpty UsageLimit)
Maybe Text
httpStatus :: Int
usageLimits :: Maybe (NonEmpty UsageLimit)
nextToken :: Maybe Text
$sel:httpStatus:ListUsageLimitsResponse' :: ListUsageLimitsResponse -> Int
$sel:usageLimits:ListUsageLimitsResponse' :: ListUsageLimitsResponse -> Maybe (NonEmpty UsageLimit)
$sel:nextToken:ListUsageLimitsResponse' :: ListUsageLimitsResponse -> Maybe Text
..} =
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 Maybe (NonEmpty UsageLimit)
usageLimits
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus