{-# 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.Glue.GetCrawlerMetrics
(
GetCrawlerMetrics (..),
newGetCrawlerMetrics,
getCrawlerMetrics_crawlerNameList,
getCrawlerMetrics_maxResults,
getCrawlerMetrics_nextToken,
GetCrawlerMetricsResponse (..),
newGetCrawlerMetricsResponse,
getCrawlerMetricsResponse_crawlerMetricsList,
getCrawlerMetricsResponse_nextToken,
getCrawlerMetricsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Glue.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data GetCrawlerMetrics = GetCrawlerMetrics'
{
GetCrawlerMetrics -> Maybe [Text]
crawlerNameList :: Prelude.Maybe [Prelude.Text],
GetCrawlerMetrics -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
GetCrawlerMetrics -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
}
deriving (GetCrawlerMetrics -> GetCrawlerMetrics -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetCrawlerMetrics -> GetCrawlerMetrics -> Bool
$c/= :: GetCrawlerMetrics -> GetCrawlerMetrics -> Bool
== :: GetCrawlerMetrics -> GetCrawlerMetrics -> Bool
$c== :: GetCrawlerMetrics -> GetCrawlerMetrics -> Bool
Prelude.Eq, ReadPrec [GetCrawlerMetrics]
ReadPrec GetCrawlerMetrics
Int -> ReadS GetCrawlerMetrics
ReadS [GetCrawlerMetrics]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetCrawlerMetrics]
$creadListPrec :: ReadPrec [GetCrawlerMetrics]
readPrec :: ReadPrec GetCrawlerMetrics
$creadPrec :: ReadPrec GetCrawlerMetrics
readList :: ReadS [GetCrawlerMetrics]
$creadList :: ReadS [GetCrawlerMetrics]
readsPrec :: Int -> ReadS GetCrawlerMetrics
$creadsPrec :: Int -> ReadS GetCrawlerMetrics
Prelude.Read, Int -> GetCrawlerMetrics -> ShowS
[GetCrawlerMetrics] -> ShowS
GetCrawlerMetrics -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetCrawlerMetrics] -> ShowS
$cshowList :: [GetCrawlerMetrics] -> ShowS
show :: GetCrawlerMetrics -> String
$cshow :: GetCrawlerMetrics -> String
showsPrec :: Int -> GetCrawlerMetrics -> ShowS
$cshowsPrec :: Int -> GetCrawlerMetrics -> ShowS
Prelude.Show, forall x. Rep GetCrawlerMetrics x -> GetCrawlerMetrics
forall x. GetCrawlerMetrics -> Rep GetCrawlerMetrics x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetCrawlerMetrics x -> GetCrawlerMetrics
$cfrom :: forall x. GetCrawlerMetrics -> Rep GetCrawlerMetrics x
Prelude.Generic)
newGetCrawlerMetrics ::
GetCrawlerMetrics
newGetCrawlerMetrics :: GetCrawlerMetrics
newGetCrawlerMetrics =
GetCrawlerMetrics'
{ $sel:crawlerNameList:GetCrawlerMetrics' :: Maybe [Text]
crawlerNameList =
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:GetCrawlerMetrics' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetCrawlerMetrics' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
}
getCrawlerMetrics_crawlerNameList :: Lens.Lens' GetCrawlerMetrics (Prelude.Maybe [Prelude.Text])
getCrawlerMetrics_crawlerNameList :: Lens' GetCrawlerMetrics (Maybe [Text])
getCrawlerMetrics_crawlerNameList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCrawlerMetrics' {Maybe [Text]
crawlerNameList :: Maybe [Text]
$sel:crawlerNameList:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe [Text]
crawlerNameList} -> Maybe [Text]
crawlerNameList) (\s :: GetCrawlerMetrics
s@GetCrawlerMetrics' {} Maybe [Text]
a -> GetCrawlerMetrics
s {$sel:crawlerNameList:GetCrawlerMetrics' :: Maybe [Text]
crawlerNameList = Maybe [Text]
a} :: GetCrawlerMetrics) 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
getCrawlerMetrics_maxResults :: Lens.Lens' GetCrawlerMetrics (Prelude.Maybe Prelude.Natural)
getCrawlerMetrics_maxResults :: Lens' GetCrawlerMetrics (Maybe Natural)
getCrawlerMetrics_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCrawlerMetrics' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: GetCrawlerMetrics
s@GetCrawlerMetrics' {} Maybe Natural
a -> GetCrawlerMetrics
s {$sel:maxResults:GetCrawlerMetrics' :: Maybe Natural
maxResults = Maybe Natural
a} :: GetCrawlerMetrics)
getCrawlerMetrics_nextToken :: Lens.Lens' GetCrawlerMetrics (Prelude.Maybe Prelude.Text)
getCrawlerMetrics_nextToken :: Lens' GetCrawlerMetrics (Maybe Text)
getCrawlerMetrics_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCrawlerMetrics' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetCrawlerMetrics
s@GetCrawlerMetrics' {} Maybe Text
a -> GetCrawlerMetrics
s {$sel:nextToken:GetCrawlerMetrics' :: Maybe Text
nextToken = Maybe Text
a} :: GetCrawlerMetrics)
instance Core.AWSPager GetCrawlerMetrics where
page :: GetCrawlerMetrics
-> AWSResponse GetCrawlerMetrics -> Maybe GetCrawlerMetrics
page GetCrawlerMetrics
rq AWSResponse GetCrawlerMetrics
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse GetCrawlerMetrics
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetCrawlerMetricsResponse (Maybe Text)
getCrawlerMetricsResponse_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 GetCrawlerMetrics
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetCrawlerMetricsResponse (Maybe [CrawlerMetrics])
getCrawlerMetricsResponse_crawlerMetricsList
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.$ GetCrawlerMetrics
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' GetCrawlerMetrics (Maybe Text)
getCrawlerMetrics_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse GetCrawlerMetrics
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetCrawlerMetricsResponse (Maybe Text)
getCrawlerMetricsResponse_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 GetCrawlerMetrics where
type
AWSResponse GetCrawlerMetrics =
GetCrawlerMetricsResponse
request :: (Service -> Service)
-> GetCrawlerMetrics -> Request GetCrawlerMetrics
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 GetCrawlerMetrics
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetCrawlerMetrics)))
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 [CrawlerMetrics]
-> Maybe Text -> Int -> GetCrawlerMetricsResponse
GetCrawlerMetricsResponse'
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
"CrawlerMetricsList"
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 GetCrawlerMetrics where
hashWithSalt :: Int -> GetCrawlerMetrics -> Int
hashWithSalt Int
_salt GetCrawlerMetrics' {Maybe Natural
Maybe [Text]
Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
crawlerNameList :: Maybe [Text]
$sel:nextToken:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Text
$sel:maxResults:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Natural
$sel:crawlerNameList:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe [Text]
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
crawlerNameList
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 GetCrawlerMetrics where
rnf :: GetCrawlerMetrics -> ()
rnf GetCrawlerMetrics' {Maybe Natural
Maybe [Text]
Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
crawlerNameList :: Maybe [Text]
$sel:nextToken:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Text
$sel:maxResults:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Natural
$sel:crawlerNameList:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe [Text]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
crawlerNameList
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 GetCrawlerMetrics where
toHeaders :: GetCrawlerMetrics -> 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
"AWSGlue.GetCrawlerMetrics" :: 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 GetCrawlerMetrics where
toJSON :: GetCrawlerMetrics -> Value
toJSON GetCrawlerMetrics' {Maybe Natural
Maybe [Text]
Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
crawlerNameList :: Maybe [Text]
$sel:nextToken:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Text
$sel:maxResults:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe Natural
$sel:crawlerNameList:GetCrawlerMetrics' :: GetCrawlerMetrics -> Maybe [Text]
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"CrawlerNameList" 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]
crawlerNameList,
(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 GetCrawlerMetrics where
toPath :: GetCrawlerMetrics -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery GetCrawlerMetrics where
toQuery :: GetCrawlerMetrics -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data GetCrawlerMetricsResponse = GetCrawlerMetricsResponse'
{
GetCrawlerMetricsResponse -> Maybe [CrawlerMetrics]
crawlerMetricsList :: Prelude.Maybe [CrawlerMetrics],
GetCrawlerMetricsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetCrawlerMetricsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetCrawlerMetricsResponse -> GetCrawlerMetricsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetCrawlerMetricsResponse -> GetCrawlerMetricsResponse -> Bool
$c/= :: GetCrawlerMetricsResponse -> GetCrawlerMetricsResponse -> Bool
== :: GetCrawlerMetricsResponse -> GetCrawlerMetricsResponse -> Bool
$c== :: GetCrawlerMetricsResponse -> GetCrawlerMetricsResponse -> Bool
Prelude.Eq, ReadPrec [GetCrawlerMetricsResponse]
ReadPrec GetCrawlerMetricsResponse
Int -> ReadS GetCrawlerMetricsResponse
ReadS [GetCrawlerMetricsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetCrawlerMetricsResponse]
$creadListPrec :: ReadPrec [GetCrawlerMetricsResponse]
readPrec :: ReadPrec GetCrawlerMetricsResponse
$creadPrec :: ReadPrec GetCrawlerMetricsResponse
readList :: ReadS [GetCrawlerMetricsResponse]
$creadList :: ReadS [GetCrawlerMetricsResponse]
readsPrec :: Int -> ReadS GetCrawlerMetricsResponse
$creadsPrec :: Int -> ReadS GetCrawlerMetricsResponse
Prelude.Read, Int -> GetCrawlerMetricsResponse -> ShowS
[GetCrawlerMetricsResponse] -> ShowS
GetCrawlerMetricsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetCrawlerMetricsResponse] -> ShowS
$cshowList :: [GetCrawlerMetricsResponse] -> ShowS
show :: GetCrawlerMetricsResponse -> String
$cshow :: GetCrawlerMetricsResponse -> String
showsPrec :: Int -> GetCrawlerMetricsResponse -> ShowS
$cshowsPrec :: Int -> GetCrawlerMetricsResponse -> ShowS
Prelude.Show, forall x.
Rep GetCrawlerMetricsResponse x -> GetCrawlerMetricsResponse
forall x.
GetCrawlerMetricsResponse -> Rep GetCrawlerMetricsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetCrawlerMetricsResponse x -> GetCrawlerMetricsResponse
$cfrom :: forall x.
GetCrawlerMetricsResponse -> Rep GetCrawlerMetricsResponse x
Prelude.Generic)
newGetCrawlerMetricsResponse ::
Prelude.Int ->
GetCrawlerMetricsResponse
newGetCrawlerMetricsResponse :: Int -> GetCrawlerMetricsResponse
newGetCrawlerMetricsResponse Int
pHttpStatus_ =
GetCrawlerMetricsResponse'
{ $sel:crawlerMetricsList:GetCrawlerMetricsResponse' :: Maybe [CrawlerMetrics]
crawlerMetricsList =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetCrawlerMetricsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetCrawlerMetricsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getCrawlerMetricsResponse_crawlerMetricsList :: Lens.Lens' GetCrawlerMetricsResponse (Prelude.Maybe [CrawlerMetrics])
getCrawlerMetricsResponse_crawlerMetricsList :: Lens' GetCrawlerMetricsResponse (Maybe [CrawlerMetrics])
getCrawlerMetricsResponse_crawlerMetricsList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCrawlerMetricsResponse' {Maybe [CrawlerMetrics]
crawlerMetricsList :: Maybe [CrawlerMetrics]
$sel:crawlerMetricsList:GetCrawlerMetricsResponse' :: GetCrawlerMetricsResponse -> Maybe [CrawlerMetrics]
crawlerMetricsList} -> Maybe [CrawlerMetrics]
crawlerMetricsList) (\s :: GetCrawlerMetricsResponse
s@GetCrawlerMetricsResponse' {} Maybe [CrawlerMetrics]
a -> GetCrawlerMetricsResponse
s {$sel:crawlerMetricsList:GetCrawlerMetricsResponse' :: Maybe [CrawlerMetrics]
crawlerMetricsList = Maybe [CrawlerMetrics]
a} :: GetCrawlerMetricsResponse) 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
getCrawlerMetricsResponse_nextToken :: Lens.Lens' GetCrawlerMetricsResponse (Prelude.Maybe Prelude.Text)
getCrawlerMetricsResponse_nextToken :: Lens' GetCrawlerMetricsResponse (Maybe Text)
getCrawlerMetricsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCrawlerMetricsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetCrawlerMetricsResponse' :: GetCrawlerMetricsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetCrawlerMetricsResponse
s@GetCrawlerMetricsResponse' {} Maybe Text
a -> GetCrawlerMetricsResponse
s {$sel:nextToken:GetCrawlerMetricsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetCrawlerMetricsResponse)
getCrawlerMetricsResponse_httpStatus :: Lens.Lens' GetCrawlerMetricsResponse Prelude.Int
getCrawlerMetricsResponse_httpStatus :: Lens' GetCrawlerMetricsResponse Int
getCrawlerMetricsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCrawlerMetricsResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetCrawlerMetricsResponse' :: GetCrawlerMetricsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetCrawlerMetricsResponse
s@GetCrawlerMetricsResponse' {} Int
a -> GetCrawlerMetricsResponse
s {$sel:httpStatus:GetCrawlerMetricsResponse' :: Int
httpStatus = Int
a} :: GetCrawlerMetricsResponse)
instance Prelude.NFData GetCrawlerMetricsResponse where
rnf :: GetCrawlerMetricsResponse -> ()
rnf GetCrawlerMetricsResponse' {Int
Maybe [CrawlerMetrics]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
crawlerMetricsList :: Maybe [CrawlerMetrics]
$sel:httpStatus:GetCrawlerMetricsResponse' :: GetCrawlerMetricsResponse -> Int
$sel:nextToken:GetCrawlerMetricsResponse' :: GetCrawlerMetricsResponse -> Maybe Text
$sel:crawlerMetricsList:GetCrawlerMetricsResponse' :: GetCrawlerMetricsResponse -> Maybe [CrawlerMetrics]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [CrawlerMetrics]
crawlerMetricsList
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