{-# 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.VoiceId.ListSpeakerEnrollmentJobs
(
ListSpeakerEnrollmentJobs (..),
newListSpeakerEnrollmentJobs,
listSpeakerEnrollmentJobs_jobStatus,
listSpeakerEnrollmentJobs_maxResults,
listSpeakerEnrollmentJobs_nextToken,
listSpeakerEnrollmentJobs_domainId,
ListSpeakerEnrollmentJobsResponse (..),
newListSpeakerEnrollmentJobsResponse,
listSpeakerEnrollmentJobsResponse_jobSummaries,
listSpeakerEnrollmentJobsResponse_nextToken,
listSpeakerEnrollmentJobsResponse_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 qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.VoiceId.Types
data ListSpeakerEnrollmentJobs = ListSpeakerEnrollmentJobs'
{
ListSpeakerEnrollmentJobs -> Maybe SpeakerEnrollmentJobStatus
jobStatus :: Prelude.Maybe SpeakerEnrollmentJobStatus,
ListSpeakerEnrollmentJobs -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListSpeakerEnrollmentJobs -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListSpeakerEnrollmentJobs -> Text
domainId :: Prelude.Text
}
deriving (ListSpeakerEnrollmentJobs -> ListSpeakerEnrollmentJobs -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListSpeakerEnrollmentJobs -> ListSpeakerEnrollmentJobs -> Bool
$c/= :: ListSpeakerEnrollmentJobs -> ListSpeakerEnrollmentJobs -> Bool
== :: ListSpeakerEnrollmentJobs -> ListSpeakerEnrollmentJobs -> Bool
$c== :: ListSpeakerEnrollmentJobs -> ListSpeakerEnrollmentJobs -> Bool
Prelude.Eq, ReadPrec [ListSpeakerEnrollmentJobs]
ReadPrec ListSpeakerEnrollmentJobs
Int -> ReadS ListSpeakerEnrollmentJobs
ReadS [ListSpeakerEnrollmentJobs]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListSpeakerEnrollmentJobs]
$creadListPrec :: ReadPrec [ListSpeakerEnrollmentJobs]
readPrec :: ReadPrec ListSpeakerEnrollmentJobs
$creadPrec :: ReadPrec ListSpeakerEnrollmentJobs
readList :: ReadS [ListSpeakerEnrollmentJobs]
$creadList :: ReadS [ListSpeakerEnrollmentJobs]
readsPrec :: Int -> ReadS ListSpeakerEnrollmentJobs
$creadsPrec :: Int -> ReadS ListSpeakerEnrollmentJobs
Prelude.Read, Int -> ListSpeakerEnrollmentJobs -> ShowS
[ListSpeakerEnrollmentJobs] -> ShowS
ListSpeakerEnrollmentJobs -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListSpeakerEnrollmentJobs] -> ShowS
$cshowList :: [ListSpeakerEnrollmentJobs] -> ShowS
show :: ListSpeakerEnrollmentJobs -> String
$cshow :: ListSpeakerEnrollmentJobs -> String
showsPrec :: Int -> ListSpeakerEnrollmentJobs -> ShowS
$cshowsPrec :: Int -> ListSpeakerEnrollmentJobs -> ShowS
Prelude.Show, forall x.
Rep ListSpeakerEnrollmentJobs x -> ListSpeakerEnrollmentJobs
forall x.
ListSpeakerEnrollmentJobs -> Rep ListSpeakerEnrollmentJobs x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListSpeakerEnrollmentJobs x -> ListSpeakerEnrollmentJobs
$cfrom :: forall x.
ListSpeakerEnrollmentJobs -> Rep ListSpeakerEnrollmentJobs x
Prelude.Generic)
newListSpeakerEnrollmentJobs ::
Prelude.Text ->
ListSpeakerEnrollmentJobs
newListSpeakerEnrollmentJobs :: Text -> ListSpeakerEnrollmentJobs
newListSpeakerEnrollmentJobs Text
pDomainId_ =
ListSpeakerEnrollmentJobs'
{ $sel:jobStatus:ListSpeakerEnrollmentJobs' :: Maybe SpeakerEnrollmentJobStatus
jobStatus =
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListSpeakerEnrollmentJobs' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListSpeakerEnrollmentJobs' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:domainId:ListSpeakerEnrollmentJobs' :: Text
domainId = Text
pDomainId_
}
listSpeakerEnrollmentJobs_jobStatus :: Lens.Lens' ListSpeakerEnrollmentJobs (Prelude.Maybe SpeakerEnrollmentJobStatus)
listSpeakerEnrollmentJobs_jobStatus :: Lens' ListSpeakerEnrollmentJobs (Maybe SpeakerEnrollmentJobStatus)
listSpeakerEnrollmentJobs_jobStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobs' {Maybe SpeakerEnrollmentJobStatus
jobStatus :: Maybe SpeakerEnrollmentJobStatus
$sel:jobStatus:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe SpeakerEnrollmentJobStatus
jobStatus} -> Maybe SpeakerEnrollmentJobStatus
jobStatus) (\s :: ListSpeakerEnrollmentJobs
s@ListSpeakerEnrollmentJobs' {} Maybe SpeakerEnrollmentJobStatus
a -> ListSpeakerEnrollmentJobs
s {$sel:jobStatus:ListSpeakerEnrollmentJobs' :: Maybe SpeakerEnrollmentJobStatus
jobStatus = Maybe SpeakerEnrollmentJobStatus
a} :: ListSpeakerEnrollmentJobs)
listSpeakerEnrollmentJobs_maxResults :: Lens.Lens' ListSpeakerEnrollmentJobs (Prelude.Maybe Prelude.Natural)
listSpeakerEnrollmentJobs_maxResults :: Lens' ListSpeakerEnrollmentJobs (Maybe Natural)
listSpeakerEnrollmentJobs_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobs' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListSpeakerEnrollmentJobs
s@ListSpeakerEnrollmentJobs' {} Maybe Natural
a -> ListSpeakerEnrollmentJobs
s {$sel:maxResults:ListSpeakerEnrollmentJobs' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListSpeakerEnrollmentJobs)
listSpeakerEnrollmentJobs_nextToken :: Lens.Lens' ListSpeakerEnrollmentJobs (Prelude.Maybe Prelude.Text)
listSpeakerEnrollmentJobs_nextToken :: Lens' ListSpeakerEnrollmentJobs (Maybe Text)
listSpeakerEnrollmentJobs_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobs' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListSpeakerEnrollmentJobs
s@ListSpeakerEnrollmentJobs' {} Maybe Text
a -> ListSpeakerEnrollmentJobs
s {$sel:nextToken:ListSpeakerEnrollmentJobs' :: Maybe Text
nextToken = Maybe Text
a} :: ListSpeakerEnrollmentJobs)
listSpeakerEnrollmentJobs_domainId :: Lens.Lens' ListSpeakerEnrollmentJobs Prelude.Text
listSpeakerEnrollmentJobs_domainId :: Lens' ListSpeakerEnrollmentJobs Text
listSpeakerEnrollmentJobs_domainId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobs' {Text
domainId :: Text
$sel:domainId:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Text
domainId} -> Text
domainId) (\s :: ListSpeakerEnrollmentJobs
s@ListSpeakerEnrollmentJobs' {} Text
a -> ListSpeakerEnrollmentJobs
s {$sel:domainId:ListSpeakerEnrollmentJobs' :: Text
domainId = Text
a} :: ListSpeakerEnrollmentJobs)
instance Core.AWSPager ListSpeakerEnrollmentJobs where
page :: ListSpeakerEnrollmentJobs
-> AWSResponse ListSpeakerEnrollmentJobs
-> Maybe ListSpeakerEnrollmentJobs
page ListSpeakerEnrollmentJobs
rq AWSResponse ListSpeakerEnrollmentJobs
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListSpeakerEnrollmentJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListSpeakerEnrollmentJobsResponse (Maybe Text)
listSpeakerEnrollmentJobsResponse_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 ListSpeakerEnrollmentJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
ListSpeakerEnrollmentJobsResponse
(Maybe [SpeakerEnrollmentJobSummary])
listSpeakerEnrollmentJobsResponse_jobSummaries
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.$ ListSpeakerEnrollmentJobs
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListSpeakerEnrollmentJobs (Maybe Text)
listSpeakerEnrollmentJobs_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListSpeakerEnrollmentJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListSpeakerEnrollmentJobsResponse (Maybe Text)
listSpeakerEnrollmentJobsResponse_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 ListSpeakerEnrollmentJobs where
type
AWSResponse ListSpeakerEnrollmentJobs =
ListSpeakerEnrollmentJobsResponse
request :: (Service -> Service)
-> ListSpeakerEnrollmentJobs -> Request ListSpeakerEnrollmentJobs
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 ListSpeakerEnrollmentJobs
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListSpeakerEnrollmentJobs)))
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 [SpeakerEnrollmentJobSummary]
-> Maybe Text -> Int -> ListSpeakerEnrollmentJobsResponse
ListSpeakerEnrollmentJobsResponse'
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
"JobSummaries" 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 ListSpeakerEnrollmentJobs where
hashWithSalt :: Int -> ListSpeakerEnrollmentJobs -> Int
hashWithSalt Int
_salt ListSpeakerEnrollmentJobs' {Maybe Natural
Maybe Text
Maybe SpeakerEnrollmentJobStatus
Text
domainId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
jobStatus :: Maybe SpeakerEnrollmentJobStatus
$sel:domainId:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Text
$sel:nextToken:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Text
$sel:maxResults:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Natural
$sel:jobStatus:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe SpeakerEnrollmentJobStatus
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SpeakerEnrollmentJobStatus
jobStatus
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` Text
domainId
instance Prelude.NFData ListSpeakerEnrollmentJobs where
rnf :: ListSpeakerEnrollmentJobs -> ()
rnf ListSpeakerEnrollmentJobs' {Maybe Natural
Maybe Text
Maybe SpeakerEnrollmentJobStatus
Text
domainId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
jobStatus :: Maybe SpeakerEnrollmentJobStatus
$sel:domainId:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Text
$sel:nextToken:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Text
$sel:maxResults:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Natural
$sel:jobStatus:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe SpeakerEnrollmentJobStatus
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe SpeakerEnrollmentJobStatus
jobStatus
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
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
domainId
instance Data.ToHeaders ListSpeakerEnrollmentJobs where
toHeaders :: ListSpeakerEnrollmentJobs -> 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
"VoiceID.ListSpeakerEnrollmentJobs" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.0" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON ListSpeakerEnrollmentJobs where
toJSON :: ListSpeakerEnrollmentJobs -> Value
toJSON ListSpeakerEnrollmentJobs' {Maybe Natural
Maybe Text
Maybe SpeakerEnrollmentJobStatus
Text
domainId :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
jobStatus :: Maybe SpeakerEnrollmentJobStatus
$sel:domainId:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Text
$sel:nextToken:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Text
$sel:maxResults:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe Natural
$sel:jobStatus:ListSpeakerEnrollmentJobs' :: ListSpeakerEnrollmentJobs -> Maybe SpeakerEnrollmentJobStatus
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"JobStatus" 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 SpeakerEnrollmentJobStatus
jobStatus,
(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,
forall a. a -> Maybe a
Prelude.Just (Key
"DomainId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
domainId)
]
)
instance Data.ToPath ListSpeakerEnrollmentJobs where
toPath :: ListSpeakerEnrollmentJobs -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery ListSpeakerEnrollmentJobs where
toQuery :: ListSpeakerEnrollmentJobs -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListSpeakerEnrollmentJobsResponse = ListSpeakerEnrollmentJobsResponse'
{
ListSpeakerEnrollmentJobsResponse
-> Maybe [SpeakerEnrollmentJobSummary]
jobSummaries :: Prelude.Maybe [SpeakerEnrollmentJobSummary],
ListSpeakerEnrollmentJobsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListSpeakerEnrollmentJobsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListSpeakerEnrollmentJobsResponse
-> ListSpeakerEnrollmentJobsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListSpeakerEnrollmentJobsResponse
-> ListSpeakerEnrollmentJobsResponse -> Bool
$c/= :: ListSpeakerEnrollmentJobsResponse
-> ListSpeakerEnrollmentJobsResponse -> Bool
== :: ListSpeakerEnrollmentJobsResponse
-> ListSpeakerEnrollmentJobsResponse -> Bool
$c== :: ListSpeakerEnrollmentJobsResponse
-> ListSpeakerEnrollmentJobsResponse -> Bool
Prelude.Eq, Int -> ListSpeakerEnrollmentJobsResponse -> ShowS
[ListSpeakerEnrollmentJobsResponse] -> ShowS
ListSpeakerEnrollmentJobsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListSpeakerEnrollmentJobsResponse] -> ShowS
$cshowList :: [ListSpeakerEnrollmentJobsResponse] -> ShowS
show :: ListSpeakerEnrollmentJobsResponse -> String
$cshow :: ListSpeakerEnrollmentJobsResponse -> String
showsPrec :: Int -> ListSpeakerEnrollmentJobsResponse -> ShowS
$cshowsPrec :: Int -> ListSpeakerEnrollmentJobsResponse -> ShowS
Prelude.Show, forall x.
Rep ListSpeakerEnrollmentJobsResponse x
-> ListSpeakerEnrollmentJobsResponse
forall x.
ListSpeakerEnrollmentJobsResponse
-> Rep ListSpeakerEnrollmentJobsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListSpeakerEnrollmentJobsResponse x
-> ListSpeakerEnrollmentJobsResponse
$cfrom :: forall x.
ListSpeakerEnrollmentJobsResponse
-> Rep ListSpeakerEnrollmentJobsResponse x
Prelude.Generic)
newListSpeakerEnrollmentJobsResponse ::
Prelude.Int ->
ListSpeakerEnrollmentJobsResponse
newListSpeakerEnrollmentJobsResponse :: Int -> ListSpeakerEnrollmentJobsResponse
newListSpeakerEnrollmentJobsResponse Int
pHttpStatus_ =
ListSpeakerEnrollmentJobsResponse'
{ $sel:jobSummaries:ListSpeakerEnrollmentJobsResponse' :: Maybe [SpeakerEnrollmentJobSummary]
jobSummaries =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListSpeakerEnrollmentJobsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListSpeakerEnrollmentJobsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listSpeakerEnrollmentJobsResponse_jobSummaries :: Lens.Lens' ListSpeakerEnrollmentJobsResponse (Prelude.Maybe [SpeakerEnrollmentJobSummary])
listSpeakerEnrollmentJobsResponse_jobSummaries :: Lens'
ListSpeakerEnrollmentJobsResponse
(Maybe [SpeakerEnrollmentJobSummary])
listSpeakerEnrollmentJobsResponse_jobSummaries = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobsResponse' {Maybe [SpeakerEnrollmentJobSummary]
jobSummaries :: Maybe [SpeakerEnrollmentJobSummary]
$sel:jobSummaries:ListSpeakerEnrollmentJobsResponse' :: ListSpeakerEnrollmentJobsResponse
-> Maybe [SpeakerEnrollmentJobSummary]
jobSummaries} -> Maybe [SpeakerEnrollmentJobSummary]
jobSummaries) (\s :: ListSpeakerEnrollmentJobsResponse
s@ListSpeakerEnrollmentJobsResponse' {} Maybe [SpeakerEnrollmentJobSummary]
a -> ListSpeakerEnrollmentJobsResponse
s {$sel:jobSummaries:ListSpeakerEnrollmentJobsResponse' :: Maybe [SpeakerEnrollmentJobSummary]
jobSummaries = Maybe [SpeakerEnrollmentJobSummary]
a} :: ListSpeakerEnrollmentJobsResponse) 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
listSpeakerEnrollmentJobsResponse_nextToken :: Lens.Lens' ListSpeakerEnrollmentJobsResponse (Prelude.Maybe Prelude.Text)
listSpeakerEnrollmentJobsResponse_nextToken :: Lens' ListSpeakerEnrollmentJobsResponse (Maybe Text)
listSpeakerEnrollmentJobsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListSpeakerEnrollmentJobsResponse' :: ListSpeakerEnrollmentJobsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListSpeakerEnrollmentJobsResponse
s@ListSpeakerEnrollmentJobsResponse' {} Maybe Text
a -> ListSpeakerEnrollmentJobsResponse
s {$sel:nextToken:ListSpeakerEnrollmentJobsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListSpeakerEnrollmentJobsResponse)
listSpeakerEnrollmentJobsResponse_httpStatus :: Lens.Lens' ListSpeakerEnrollmentJobsResponse Prelude.Int
listSpeakerEnrollmentJobsResponse_httpStatus :: Lens' ListSpeakerEnrollmentJobsResponse Int
listSpeakerEnrollmentJobsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListSpeakerEnrollmentJobsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListSpeakerEnrollmentJobsResponse' :: ListSpeakerEnrollmentJobsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListSpeakerEnrollmentJobsResponse
s@ListSpeakerEnrollmentJobsResponse' {} Int
a -> ListSpeakerEnrollmentJobsResponse
s {$sel:httpStatus:ListSpeakerEnrollmentJobsResponse' :: Int
httpStatus = Int
a} :: ListSpeakerEnrollmentJobsResponse)
instance
Prelude.NFData
ListSpeakerEnrollmentJobsResponse
where
rnf :: ListSpeakerEnrollmentJobsResponse -> ()
rnf ListSpeakerEnrollmentJobsResponse' {Int
Maybe [SpeakerEnrollmentJobSummary]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
jobSummaries :: Maybe [SpeakerEnrollmentJobSummary]
$sel:httpStatus:ListSpeakerEnrollmentJobsResponse' :: ListSpeakerEnrollmentJobsResponse -> Int
$sel:nextToken:ListSpeakerEnrollmentJobsResponse' :: ListSpeakerEnrollmentJobsResponse -> Maybe Text
$sel:jobSummaries:ListSpeakerEnrollmentJobsResponse' :: ListSpeakerEnrollmentJobsResponse
-> Maybe [SpeakerEnrollmentJobSummary]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [SpeakerEnrollmentJobSummary]
jobSummaries
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