{-# 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.LexV2Models.ListBuiltInSlotTypes
(
ListBuiltInSlotTypes (..),
newListBuiltInSlotTypes,
listBuiltInSlotTypes_maxResults,
listBuiltInSlotTypes_nextToken,
listBuiltInSlotTypes_sortBy,
listBuiltInSlotTypes_localeId,
ListBuiltInSlotTypesResponse (..),
newListBuiltInSlotTypesResponse,
listBuiltInSlotTypesResponse_builtInSlotTypeSummaries,
listBuiltInSlotTypesResponse_localeId,
listBuiltInSlotTypesResponse_nextToken,
listBuiltInSlotTypesResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.LexV2Models.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListBuiltInSlotTypes = ListBuiltInSlotTypes'
{
ListBuiltInSlotTypes -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListBuiltInSlotTypes -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListBuiltInSlotTypes -> Maybe BuiltInSlotTypeSortBy
sortBy :: Prelude.Maybe BuiltInSlotTypeSortBy,
ListBuiltInSlotTypes -> Text
localeId :: Prelude.Text
}
deriving (ListBuiltInSlotTypes -> ListBuiltInSlotTypes -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListBuiltInSlotTypes -> ListBuiltInSlotTypes -> Bool
$c/= :: ListBuiltInSlotTypes -> ListBuiltInSlotTypes -> Bool
== :: ListBuiltInSlotTypes -> ListBuiltInSlotTypes -> Bool
$c== :: ListBuiltInSlotTypes -> ListBuiltInSlotTypes -> Bool
Prelude.Eq, ReadPrec [ListBuiltInSlotTypes]
ReadPrec ListBuiltInSlotTypes
Int -> ReadS ListBuiltInSlotTypes
ReadS [ListBuiltInSlotTypes]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListBuiltInSlotTypes]
$creadListPrec :: ReadPrec [ListBuiltInSlotTypes]
readPrec :: ReadPrec ListBuiltInSlotTypes
$creadPrec :: ReadPrec ListBuiltInSlotTypes
readList :: ReadS [ListBuiltInSlotTypes]
$creadList :: ReadS [ListBuiltInSlotTypes]
readsPrec :: Int -> ReadS ListBuiltInSlotTypes
$creadsPrec :: Int -> ReadS ListBuiltInSlotTypes
Prelude.Read, Int -> ListBuiltInSlotTypes -> ShowS
[ListBuiltInSlotTypes] -> ShowS
ListBuiltInSlotTypes -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListBuiltInSlotTypes] -> ShowS
$cshowList :: [ListBuiltInSlotTypes] -> ShowS
show :: ListBuiltInSlotTypes -> String
$cshow :: ListBuiltInSlotTypes -> String
showsPrec :: Int -> ListBuiltInSlotTypes -> ShowS
$cshowsPrec :: Int -> ListBuiltInSlotTypes -> ShowS
Prelude.Show, forall x. Rep ListBuiltInSlotTypes x -> ListBuiltInSlotTypes
forall x. ListBuiltInSlotTypes -> Rep ListBuiltInSlotTypes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListBuiltInSlotTypes x -> ListBuiltInSlotTypes
$cfrom :: forall x. ListBuiltInSlotTypes -> Rep ListBuiltInSlotTypes x
Prelude.Generic)
newListBuiltInSlotTypes ::
Prelude.Text ->
ListBuiltInSlotTypes
newListBuiltInSlotTypes :: Text -> ListBuiltInSlotTypes
newListBuiltInSlotTypes Text
pLocaleId_ =
ListBuiltInSlotTypes'
{ $sel:maxResults:ListBuiltInSlotTypes' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListBuiltInSlotTypes' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:sortBy:ListBuiltInSlotTypes' :: Maybe BuiltInSlotTypeSortBy
sortBy = forall a. Maybe a
Prelude.Nothing,
$sel:localeId:ListBuiltInSlotTypes' :: Text
localeId = Text
pLocaleId_
}
listBuiltInSlotTypes_maxResults :: Lens.Lens' ListBuiltInSlotTypes (Prelude.Maybe Prelude.Natural)
listBuiltInSlotTypes_maxResults :: Lens' ListBuiltInSlotTypes (Maybe Natural)
listBuiltInSlotTypes_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypes' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListBuiltInSlotTypes
s@ListBuiltInSlotTypes' {} Maybe Natural
a -> ListBuiltInSlotTypes
s {$sel:maxResults:ListBuiltInSlotTypes' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListBuiltInSlotTypes)
listBuiltInSlotTypes_nextToken :: Lens.Lens' ListBuiltInSlotTypes (Prelude.Maybe Prelude.Text)
listBuiltInSlotTypes_nextToken :: Lens' ListBuiltInSlotTypes (Maybe Text)
listBuiltInSlotTypes_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypes' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListBuiltInSlotTypes
s@ListBuiltInSlotTypes' {} Maybe Text
a -> ListBuiltInSlotTypes
s {$sel:nextToken:ListBuiltInSlotTypes' :: Maybe Text
nextToken = Maybe Text
a} :: ListBuiltInSlotTypes)
listBuiltInSlotTypes_sortBy :: Lens.Lens' ListBuiltInSlotTypes (Prelude.Maybe BuiltInSlotTypeSortBy)
listBuiltInSlotTypes_sortBy :: Lens' ListBuiltInSlotTypes (Maybe BuiltInSlotTypeSortBy)
listBuiltInSlotTypes_sortBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypes' {Maybe BuiltInSlotTypeSortBy
sortBy :: Maybe BuiltInSlotTypeSortBy
$sel:sortBy:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe BuiltInSlotTypeSortBy
sortBy} -> Maybe BuiltInSlotTypeSortBy
sortBy) (\s :: ListBuiltInSlotTypes
s@ListBuiltInSlotTypes' {} Maybe BuiltInSlotTypeSortBy
a -> ListBuiltInSlotTypes
s {$sel:sortBy:ListBuiltInSlotTypes' :: Maybe BuiltInSlotTypeSortBy
sortBy = Maybe BuiltInSlotTypeSortBy
a} :: ListBuiltInSlotTypes)
listBuiltInSlotTypes_localeId :: Lens.Lens' ListBuiltInSlotTypes Prelude.Text
listBuiltInSlotTypes_localeId :: Lens' ListBuiltInSlotTypes Text
listBuiltInSlotTypes_localeId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypes' {Text
localeId :: Text
$sel:localeId:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Text
localeId} -> Text
localeId) (\s :: ListBuiltInSlotTypes
s@ListBuiltInSlotTypes' {} Text
a -> ListBuiltInSlotTypes
s {$sel:localeId:ListBuiltInSlotTypes' :: Text
localeId = Text
a} :: ListBuiltInSlotTypes)
instance Core.AWSRequest ListBuiltInSlotTypes where
type
AWSResponse ListBuiltInSlotTypes =
ListBuiltInSlotTypesResponse
request :: (Service -> Service)
-> ListBuiltInSlotTypes -> Request ListBuiltInSlotTypes
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 ListBuiltInSlotTypes
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListBuiltInSlotTypes)))
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 [BuiltInSlotTypeSummary]
-> Maybe Text -> Maybe Text -> Int -> ListBuiltInSlotTypesResponse
ListBuiltInSlotTypesResponse'
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
"builtInSlotTypeSummaries"
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
"localeId")
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 ListBuiltInSlotTypes where
hashWithSalt :: Int -> ListBuiltInSlotTypes -> Int
hashWithSalt Int
_salt ListBuiltInSlotTypes' {Maybe Natural
Maybe Text
Maybe BuiltInSlotTypeSortBy
Text
localeId :: Text
sortBy :: Maybe BuiltInSlotTypeSortBy
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:localeId:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Text
$sel:sortBy:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe BuiltInSlotTypeSortBy
$sel:nextToken:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Text
$sel:maxResults:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> 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 BuiltInSlotTypeSortBy
sortBy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
localeId
instance Prelude.NFData ListBuiltInSlotTypes where
rnf :: ListBuiltInSlotTypes -> ()
rnf ListBuiltInSlotTypes' {Maybe Natural
Maybe Text
Maybe BuiltInSlotTypeSortBy
Text
localeId :: Text
sortBy :: Maybe BuiltInSlotTypeSortBy
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:localeId:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Text
$sel:sortBy:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe BuiltInSlotTypeSortBy
$sel:nextToken:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Text
$sel:maxResults:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> 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 BuiltInSlotTypeSortBy
sortBy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
localeId
instance Data.ToHeaders ListBuiltInSlotTypes where
toHeaders :: ListBuiltInSlotTypes -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON ListBuiltInSlotTypes where
toJSON :: ListBuiltInSlotTypes -> Value
toJSON ListBuiltInSlotTypes' {Maybe Natural
Maybe Text
Maybe BuiltInSlotTypeSortBy
Text
localeId :: Text
sortBy :: Maybe BuiltInSlotTypeSortBy
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:localeId:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Text
$sel:sortBy:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe BuiltInSlotTypeSortBy
$sel:nextToken:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Text
$sel:maxResults:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> 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
"sortBy" 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 BuiltInSlotTypeSortBy
sortBy
]
)
instance Data.ToPath ListBuiltInSlotTypes where
toPath :: ListBuiltInSlotTypes -> ByteString
toPath ListBuiltInSlotTypes' {Maybe Natural
Maybe Text
Maybe BuiltInSlotTypeSortBy
Text
localeId :: Text
sortBy :: Maybe BuiltInSlotTypeSortBy
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:localeId:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Text
$sel:sortBy:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe BuiltInSlotTypeSortBy
$sel:nextToken:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Text
$sel:maxResults:ListBuiltInSlotTypes' :: ListBuiltInSlotTypes -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/builtins/locales/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
localeId,
ByteString
"/slottypes/"
]
instance Data.ToQuery ListBuiltInSlotTypes where
toQuery :: ListBuiltInSlotTypes -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListBuiltInSlotTypesResponse = ListBuiltInSlotTypesResponse'
{
ListBuiltInSlotTypesResponse -> Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries :: Prelude.Maybe [BuiltInSlotTypeSummary],
ListBuiltInSlotTypesResponse -> Maybe Text
localeId :: Prelude.Maybe Prelude.Text,
ListBuiltInSlotTypesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListBuiltInSlotTypesResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListBuiltInSlotTypesResponse
-> ListBuiltInSlotTypesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListBuiltInSlotTypesResponse
-> ListBuiltInSlotTypesResponse -> Bool
$c/= :: ListBuiltInSlotTypesResponse
-> ListBuiltInSlotTypesResponse -> Bool
== :: ListBuiltInSlotTypesResponse
-> ListBuiltInSlotTypesResponse -> Bool
$c== :: ListBuiltInSlotTypesResponse
-> ListBuiltInSlotTypesResponse -> Bool
Prelude.Eq, ReadPrec [ListBuiltInSlotTypesResponse]
ReadPrec ListBuiltInSlotTypesResponse
Int -> ReadS ListBuiltInSlotTypesResponse
ReadS [ListBuiltInSlotTypesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListBuiltInSlotTypesResponse]
$creadListPrec :: ReadPrec [ListBuiltInSlotTypesResponse]
readPrec :: ReadPrec ListBuiltInSlotTypesResponse
$creadPrec :: ReadPrec ListBuiltInSlotTypesResponse
readList :: ReadS [ListBuiltInSlotTypesResponse]
$creadList :: ReadS [ListBuiltInSlotTypesResponse]
readsPrec :: Int -> ReadS ListBuiltInSlotTypesResponse
$creadsPrec :: Int -> ReadS ListBuiltInSlotTypesResponse
Prelude.Read, Int -> ListBuiltInSlotTypesResponse -> ShowS
[ListBuiltInSlotTypesResponse] -> ShowS
ListBuiltInSlotTypesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListBuiltInSlotTypesResponse] -> ShowS
$cshowList :: [ListBuiltInSlotTypesResponse] -> ShowS
show :: ListBuiltInSlotTypesResponse -> String
$cshow :: ListBuiltInSlotTypesResponse -> String
showsPrec :: Int -> ListBuiltInSlotTypesResponse -> ShowS
$cshowsPrec :: Int -> ListBuiltInSlotTypesResponse -> ShowS
Prelude.Show, forall x.
Rep ListBuiltInSlotTypesResponse x -> ListBuiltInSlotTypesResponse
forall x.
ListBuiltInSlotTypesResponse -> Rep ListBuiltInSlotTypesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListBuiltInSlotTypesResponse x -> ListBuiltInSlotTypesResponse
$cfrom :: forall x.
ListBuiltInSlotTypesResponse -> Rep ListBuiltInSlotTypesResponse x
Prelude.Generic)
newListBuiltInSlotTypesResponse ::
Prelude.Int ->
ListBuiltInSlotTypesResponse
newListBuiltInSlotTypesResponse :: Int -> ListBuiltInSlotTypesResponse
newListBuiltInSlotTypesResponse Int
pHttpStatus_ =
ListBuiltInSlotTypesResponse'
{ $sel:builtInSlotTypeSummaries:ListBuiltInSlotTypesResponse' :: Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries =
forall a. Maybe a
Prelude.Nothing,
$sel:localeId:ListBuiltInSlotTypesResponse' :: Maybe Text
localeId = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListBuiltInSlotTypesResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListBuiltInSlotTypesResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listBuiltInSlotTypesResponse_builtInSlotTypeSummaries :: Lens.Lens' ListBuiltInSlotTypesResponse (Prelude.Maybe [BuiltInSlotTypeSummary])
listBuiltInSlotTypesResponse_builtInSlotTypeSummaries :: Lens' ListBuiltInSlotTypesResponse (Maybe [BuiltInSlotTypeSummary])
listBuiltInSlotTypesResponse_builtInSlotTypeSummaries = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypesResponse' {Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries :: Maybe [BuiltInSlotTypeSummary]
$sel:builtInSlotTypeSummaries:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries} -> Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries) (\s :: ListBuiltInSlotTypesResponse
s@ListBuiltInSlotTypesResponse' {} Maybe [BuiltInSlotTypeSummary]
a -> ListBuiltInSlotTypesResponse
s {$sel:builtInSlotTypeSummaries:ListBuiltInSlotTypesResponse' :: Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries = Maybe [BuiltInSlotTypeSummary]
a} :: ListBuiltInSlotTypesResponse) 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
listBuiltInSlotTypesResponse_localeId :: Lens.Lens' ListBuiltInSlotTypesResponse (Prelude.Maybe Prelude.Text)
listBuiltInSlotTypesResponse_localeId :: Lens' ListBuiltInSlotTypesResponse (Maybe Text)
listBuiltInSlotTypesResponse_localeId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypesResponse' {Maybe Text
localeId :: Maybe Text
$sel:localeId:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Maybe Text
localeId} -> Maybe Text
localeId) (\s :: ListBuiltInSlotTypesResponse
s@ListBuiltInSlotTypesResponse' {} Maybe Text
a -> ListBuiltInSlotTypesResponse
s {$sel:localeId:ListBuiltInSlotTypesResponse' :: Maybe Text
localeId = Maybe Text
a} :: ListBuiltInSlotTypesResponse)
listBuiltInSlotTypesResponse_nextToken :: Lens.Lens' ListBuiltInSlotTypesResponse (Prelude.Maybe Prelude.Text)
listBuiltInSlotTypesResponse_nextToken :: Lens' ListBuiltInSlotTypesResponse (Maybe Text)
listBuiltInSlotTypesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListBuiltInSlotTypesResponse
s@ListBuiltInSlotTypesResponse' {} Maybe Text
a -> ListBuiltInSlotTypesResponse
s {$sel:nextToken:ListBuiltInSlotTypesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListBuiltInSlotTypesResponse)
listBuiltInSlotTypesResponse_httpStatus :: Lens.Lens' ListBuiltInSlotTypesResponse Prelude.Int
listBuiltInSlotTypesResponse_httpStatus :: Lens' ListBuiltInSlotTypesResponse Int
listBuiltInSlotTypesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListBuiltInSlotTypesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListBuiltInSlotTypesResponse
s@ListBuiltInSlotTypesResponse' {} Int
a -> ListBuiltInSlotTypesResponse
s {$sel:httpStatus:ListBuiltInSlotTypesResponse' :: Int
httpStatus = Int
a} :: ListBuiltInSlotTypesResponse)
instance Prelude.NFData ListBuiltInSlotTypesResponse where
rnf :: ListBuiltInSlotTypesResponse -> ()
rnf ListBuiltInSlotTypesResponse' {Int
Maybe [BuiltInSlotTypeSummary]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
localeId :: Maybe Text
builtInSlotTypeSummaries :: Maybe [BuiltInSlotTypeSummary]
$sel:httpStatus:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Int
$sel:nextToken:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Maybe Text
$sel:localeId:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Maybe Text
$sel:builtInSlotTypeSummaries:ListBuiltInSlotTypesResponse' :: ListBuiltInSlotTypesResponse -> Maybe [BuiltInSlotTypeSummary]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [BuiltInSlotTypeSummary]
builtInSlotTypeSummaries
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
localeId
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