{-# 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.SageMakerRuntime.InvokeEndpointAsync
(
InvokeEndpointAsync (..),
newInvokeEndpointAsync,
invokeEndpointAsync_accept,
invokeEndpointAsync_contentType,
invokeEndpointAsync_customAttributes,
invokeEndpointAsync_inferenceId,
invokeEndpointAsync_requestTTLSeconds,
invokeEndpointAsync_endpointName,
invokeEndpointAsync_inputLocation,
InvokeEndpointAsyncResponse (..),
newInvokeEndpointAsyncResponse,
invokeEndpointAsyncResponse_inferenceId,
invokeEndpointAsyncResponse_outputLocation,
invokeEndpointAsyncResponse_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.SageMakerRuntime.Types
data InvokeEndpointAsync = InvokeEndpointAsync'
{
InvokeEndpointAsync -> Maybe Text
accept :: Prelude.Maybe Prelude.Text,
InvokeEndpointAsync -> Maybe Text
contentType :: Prelude.Maybe Prelude.Text,
InvokeEndpointAsync -> Maybe (Sensitive Text)
customAttributes :: Prelude.Maybe (Data.Sensitive Prelude.Text),
InvokeEndpointAsync -> Maybe Text
inferenceId :: Prelude.Maybe Prelude.Text,
InvokeEndpointAsync -> Maybe Natural
requestTTLSeconds :: Prelude.Maybe Prelude.Natural,
InvokeEndpointAsync -> Text
endpointName :: Prelude.Text,
InvokeEndpointAsync -> Text
inputLocation :: Prelude.Text
}
deriving (InvokeEndpointAsync -> InvokeEndpointAsync -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InvokeEndpointAsync -> InvokeEndpointAsync -> Bool
$c/= :: InvokeEndpointAsync -> InvokeEndpointAsync -> Bool
== :: InvokeEndpointAsync -> InvokeEndpointAsync -> Bool
$c== :: InvokeEndpointAsync -> InvokeEndpointAsync -> Bool
Prelude.Eq, Int -> InvokeEndpointAsync -> ShowS
[InvokeEndpointAsync] -> ShowS
InvokeEndpointAsync -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InvokeEndpointAsync] -> ShowS
$cshowList :: [InvokeEndpointAsync] -> ShowS
show :: InvokeEndpointAsync -> String
$cshow :: InvokeEndpointAsync -> String
showsPrec :: Int -> InvokeEndpointAsync -> ShowS
$cshowsPrec :: Int -> InvokeEndpointAsync -> ShowS
Prelude.Show, forall x. Rep InvokeEndpointAsync x -> InvokeEndpointAsync
forall x. InvokeEndpointAsync -> Rep InvokeEndpointAsync x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InvokeEndpointAsync x -> InvokeEndpointAsync
$cfrom :: forall x. InvokeEndpointAsync -> Rep InvokeEndpointAsync x
Prelude.Generic)
newInvokeEndpointAsync ::
Prelude.Text ->
Prelude.Text ->
InvokeEndpointAsync
newInvokeEndpointAsync :: Text -> Text -> InvokeEndpointAsync
newInvokeEndpointAsync Text
pEndpointName_ Text
pInputLocation_ =
InvokeEndpointAsync'
{ $sel:accept:InvokeEndpointAsync' :: Maybe Text
accept = forall a. Maybe a
Prelude.Nothing,
$sel:contentType:InvokeEndpointAsync' :: Maybe Text
contentType = forall a. Maybe a
Prelude.Nothing,
$sel:customAttributes:InvokeEndpointAsync' :: Maybe (Sensitive Text)
customAttributes = forall a. Maybe a
Prelude.Nothing,
$sel:inferenceId:InvokeEndpointAsync' :: Maybe Text
inferenceId = forall a. Maybe a
Prelude.Nothing,
$sel:requestTTLSeconds:InvokeEndpointAsync' :: Maybe Natural
requestTTLSeconds = forall a. Maybe a
Prelude.Nothing,
$sel:endpointName:InvokeEndpointAsync' :: Text
endpointName = Text
pEndpointName_,
$sel:inputLocation:InvokeEndpointAsync' :: Text
inputLocation = Text
pInputLocation_
}
invokeEndpointAsync_accept :: Lens.Lens' InvokeEndpointAsync (Prelude.Maybe Prelude.Text)
invokeEndpointAsync_accept :: Lens' InvokeEndpointAsync (Maybe Text)
invokeEndpointAsync_accept = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Maybe Text
accept :: Maybe Text
$sel:accept:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
accept} -> Maybe Text
accept) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Maybe Text
a -> InvokeEndpointAsync
s {$sel:accept:InvokeEndpointAsync' :: Maybe Text
accept = Maybe Text
a} :: InvokeEndpointAsync)
invokeEndpointAsync_contentType :: Lens.Lens' InvokeEndpointAsync (Prelude.Maybe Prelude.Text)
invokeEndpointAsync_contentType :: Lens' InvokeEndpointAsync (Maybe Text)
invokeEndpointAsync_contentType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Maybe Text
contentType :: Maybe Text
$sel:contentType:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
contentType} -> Maybe Text
contentType) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Maybe Text
a -> InvokeEndpointAsync
s {$sel:contentType:InvokeEndpointAsync' :: Maybe Text
contentType = Maybe Text
a} :: InvokeEndpointAsync)
invokeEndpointAsync_customAttributes :: Lens.Lens' InvokeEndpointAsync (Prelude.Maybe Prelude.Text)
invokeEndpointAsync_customAttributes :: Lens' InvokeEndpointAsync (Maybe Text)
invokeEndpointAsync_customAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Maybe (Sensitive Text)
customAttributes :: Maybe (Sensitive Text)
$sel:customAttributes:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe (Sensitive Text)
customAttributes} -> Maybe (Sensitive Text)
customAttributes) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Maybe (Sensitive Text)
a -> InvokeEndpointAsync
s {$sel:customAttributes:InvokeEndpointAsync' :: Maybe (Sensitive Text)
customAttributes = Maybe (Sensitive Text)
a} :: InvokeEndpointAsync) 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 a. Iso' (Sensitive a) a
Data._Sensitive
invokeEndpointAsync_inferenceId :: Lens.Lens' InvokeEndpointAsync (Prelude.Maybe Prelude.Text)
invokeEndpointAsync_inferenceId :: Lens' InvokeEndpointAsync (Maybe Text)
invokeEndpointAsync_inferenceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Maybe Text
inferenceId :: Maybe Text
$sel:inferenceId:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
inferenceId} -> Maybe Text
inferenceId) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Maybe Text
a -> InvokeEndpointAsync
s {$sel:inferenceId:InvokeEndpointAsync' :: Maybe Text
inferenceId = Maybe Text
a} :: InvokeEndpointAsync)
invokeEndpointAsync_requestTTLSeconds :: Lens.Lens' InvokeEndpointAsync (Prelude.Maybe Prelude.Natural)
invokeEndpointAsync_requestTTLSeconds :: Lens' InvokeEndpointAsync (Maybe Natural)
invokeEndpointAsync_requestTTLSeconds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Maybe Natural
requestTTLSeconds :: Maybe Natural
$sel:requestTTLSeconds:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Natural
requestTTLSeconds} -> Maybe Natural
requestTTLSeconds) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Maybe Natural
a -> InvokeEndpointAsync
s {$sel:requestTTLSeconds:InvokeEndpointAsync' :: Maybe Natural
requestTTLSeconds = Maybe Natural
a} :: InvokeEndpointAsync)
invokeEndpointAsync_endpointName :: Lens.Lens' InvokeEndpointAsync Prelude.Text
invokeEndpointAsync_endpointName :: Lens' InvokeEndpointAsync Text
invokeEndpointAsync_endpointName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Text
endpointName :: Text
$sel:endpointName:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
endpointName} -> Text
endpointName) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Text
a -> InvokeEndpointAsync
s {$sel:endpointName:InvokeEndpointAsync' :: Text
endpointName = Text
a} :: InvokeEndpointAsync)
invokeEndpointAsync_inputLocation :: Lens.Lens' InvokeEndpointAsync Prelude.Text
invokeEndpointAsync_inputLocation :: Lens' InvokeEndpointAsync Text
invokeEndpointAsync_inputLocation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsync' {Text
inputLocation :: Text
$sel:inputLocation:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
inputLocation} -> Text
inputLocation) (\s :: InvokeEndpointAsync
s@InvokeEndpointAsync' {} Text
a -> InvokeEndpointAsync
s {$sel:inputLocation:InvokeEndpointAsync' :: Text
inputLocation = Text
a} :: InvokeEndpointAsync)
instance Core.AWSRequest InvokeEndpointAsync where
type
AWSResponse InvokeEndpointAsync =
InvokeEndpointAsyncResponse
request :: (Service -> Service)
-> InvokeEndpointAsync -> Request InvokeEndpointAsync
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 InvokeEndpointAsync
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse InvokeEndpointAsync)))
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 Text -> Int -> InvokeEndpointAsyncResponse
InvokeEndpointAsyncResponse'
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
"InferenceId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (ResponseHeaders
h forall a.
FromText a =>
ResponseHeaders -> HeaderName -> Either String (Maybe a)
Data..#? HeaderName
"X-Amzn-SageMaker-OutputLocation")
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 InvokeEndpointAsync where
hashWithSalt :: Int -> InvokeEndpointAsync -> Int
hashWithSalt Int
_salt InvokeEndpointAsync' {Maybe Natural
Maybe Text
Maybe (Sensitive Text)
Text
inputLocation :: Text
endpointName :: Text
requestTTLSeconds :: Maybe Natural
inferenceId :: Maybe Text
customAttributes :: Maybe (Sensitive Text)
contentType :: Maybe Text
accept :: Maybe Text
$sel:inputLocation:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:endpointName:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:requestTTLSeconds:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Natural
$sel:inferenceId:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:customAttributes:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe (Sensitive Text)
$sel:contentType:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:accept:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
accept
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
contentType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
customAttributes
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
inferenceId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
requestTTLSeconds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
endpointName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
inputLocation
instance Prelude.NFData InvokeEndpointAsync where
rnf :: InvokeEndpointAsync -> ()
rnf InvokeEndpointAsync' {Maybe Natural
Maybe Text
Maybe (Sensitive Text)
Text
inputLocation :: Text
endpointName :: Text
requestTTLSeconds :: Maybe Natural
inferenceId :: Maybe Text
customAttributes :: Maybe (Sensitive Text)
contentType :: Maybe Text
accept :: Maybe Text
$sel:inputLocation:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:endpointName:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:requestTTLSeconds:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Natural
$sel:inferenceId:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:customAttributes:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe (Sensitive Text)
$sel:contentType:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:accept:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
accept
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
contentType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
customAttributes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
inferenceId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
requestTTLSeconds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
endpointName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
inputLocation
instance Data.ToHeaders InvokeEndpointAsync where
toHeaders :: InvokeEndpointAsync -> ResponseHeaders
toHeaders InvokeEndpointAsync' {Maybe Natural
Maybe Text
Maybe (Sensitive Text)
Text
inputLocation :: Text
endpointName :: Text
requestTTLSeconds :: Maybe Natural
inferenceId :: Maybe Text
customAttributes :: Maybe (Sensitive Text)
contentType :: Maybe Text
accept :: Maybe Text
$sel:inputLocation:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:endpointName:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:requestTTLSeconds:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Natural
$sel:inferenceId:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:customAttributes:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe (Sensitive Text)
$sel:contentType:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:accept:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amzn-SageMaker-Accept" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe Text
accept,
HeaderName
"X-Amzn-SageMaker-Content-Type" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe Text
contentType,
HeaderName
"X-Amzn-SageMaker-Custom-Attributes"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe (Sensitive Text)
customAttributes,
HeaderName
"X-Amzn-SageMaker-Inference-Id" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe Text
inferenceId,
HeaderName
"X-Amzn-SageMaker-RequestTTLSeconds"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe Natural
requestTTLSeconds,
HeaderName
"X-Amzn-SageMaker-InputLocation"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Text
inputLocation,
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# (ByteString
"application/x-amz-json-1.1" :: Prelude.ByteString)
]
instance Data.ToJSON InvokeEndpointAsync where
toJSON :: InvokeEndpointAsync -> Value
toJSON = forall a b. a -> b -> a
Prelude.const (Object -> Value
Data.Object forall a. Monoid a => a
Prelude.mempty)
instance Data.ToPath InvokeEndpointAsync where
toPath :: InvokeEndpointAsync -> ByteString
toPath InvokeEndpointAsync' {Maybe Natural
Maybe Text
Maybe (Sensitive Text)
Text
inputLocation :: Text
endpointName :: Text
requestTTLSeconds :: Maybe Natural
inferenceId :: Maybe Text
customAttributes :: Maybe (Sensitive Text)
contentType :: Maybe Text
accept :: Maybe Text
$sel:inputLocation:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:endpointName:InvokeEndpointAsync' :: InvokeEndpointAsync -> Text
$sel:requestTTLSeconds:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Natural
$sel:inferenceId:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:customAttributes:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe (Sensitive Text)
$sel:contentType:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
$sel:accept:InvokeEndpointAsync' :: InvokeEndpointAsync -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/endpoints/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
endpointName,
ByteString
"/async-invocations"
]
instance Data.ToQuery InvokeEndpointAsync where
toQuery :: InvokeEndpointAsync -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data InvokeEndpointAsyncResponse = InvokeEndpointAsyncResponse'
{
InvokeEndpointAsyncResponse -> Maybe Text
inferenceId :: Prelude.Maybe Prelude.Text,
InvokeEndpointAsyncResponse -> Maybe Text
outputLocation :: Prelude.Maybe Prelude.Text,
InvokeEndpointAsyncResponse -> Int
httpStatus :: Prelude.Int
}
deriving (InvokeEndpointAsyncResponse -> InvokeEndpointAsyncResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InvokeEndpointAsyncResponse -> InvokeEndpointAsyncResponse -> Bool
$c/= :: InvokeEndpointAsyncResponse -> InvokeEndpointAsyncResponse -> Bool
== :: InvokeEndpointAsyncResponse -> InvokeEndpointAsyncResponse -> Bool
$c== :: InvokeEndpointAsyncResponse -> InvokeEndpointAsyncResponse -> Bool
Prelude.Eq, ReadPrec [InvokeEndpointAsyncResponse]
ReadPrec InvokeEndpointAsyncResponse
Int -> ReadS InvokeEndpointAsyncResponse
ReadS [InvokeEndpointAsyncResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [InvokeEndpointAsyncResponse]
$creadListPrec :: ReadPrec [InvokeEndpointAsyncResponse]
readPrec :: ReadPrec InvokeEndpointAsyncResponse
$creadPrec :: ReadPrec InvokeEndpointAsyncResponse
readList :: ReadS [InvokeEndpointAsyncResponse]
$creadList :: ReadS [InvokeEndpointAsyncResponse]
readsPrec :: Int -> ReadS InvokeEndpointAsyncResponse
$creadsPrec :: Int -> ReadS InvokeEndpointAsyncResponse
Prelude.Read, Int -> InvokeEndpointAsyncResponse -> ShowS
[InvokeEndpointAsyncResponse] -> ShowS
InvokeEndpointAsyncResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InvokeEndpointAsyncResponse] -> ShowS
$cshowList :: [InvokeEndpointAsyncResponse] -> ShowS
show :: InvokeEndpointAsyncResponse -> String
$cshow :: InvokeEndpointAsyncResponse -> String
showsPrec :: Int -> InvokeEndpointAsyncResponse -> ShowS
$cshowsPrec :: Int -> InvokeEndpointAsyncResponse -> ShowS
Prelude.Show, forall x.
Rep InvokeEndpointAsyncResponse x -> InvokeEndpointAsyncResponse
forall x.
InvokeEndpointAsyncResponse -> Rep InvokeEndpointAsyncResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep InvokeEndpointAsyncResponse x -> InvokeEndpointAsyncResponse
$cfrom :: forall x.
InvokeEndpointAsyncResponse -> Rep InvokeEndpointAsyncResponse x
Prelude.Generic)
newInvokeEndpointAsyncResponse ::
Prelude.Int ->
InvokeEndpointAsyncResponse
newInvokeEndpointAsyncResponse :: Int -> InvokeEndpointAsyncResponse
newInvokeEndpointAsyncResponse Int
pHttpStatus_ =
InvokeEndpointAsyncResponse'
{ $sel:inferenceId:InvokeEndpointAsyncResponse' :: Maybe Text
inferenceId =
forall a. Maybe a
Prelude.Nothing,
$sel:outputLocation:InvokeEndpointAsyncResponse' :: Maybe Text
outputLocation = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:InvokeEndpointAsyncResponse' :: Int
httpStatus = Int
pHttpStatus_
}
invokeEndpointAsyncResponse_inferenceId :: Lens.Lens' InvokeEndpointAsyncResponse (Prelude.Maybe Prelude.Text)
invokeEndpointAsyncResponse_inferenceId :: Lens' InvokeEndpointAsyncResponse (Maybe Text)
invokeEndpointAsyncResponse_inferenceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsyncResponse' {Maybe Text
inferenceId :: Maybe Text
$sel:inferenceId:InvokeEndpointAsyncResponse' :: InvokeEndpointAsyncResponse -> Maybe Text
inferenceId} -> Maybe Text
inferenceId) (\s :: InvokeEndpointAsyncResponse
s@InvokeEndpointAsyncResponse' {} Maybe Text
a -> InvokeEndpointAsyncResponse
s {$sel:inferenceId:InvokeEndpointAsyncResponse' :: Maybe Text
inferenceId = Maybe Text
a} :: InvokeEndpointAsyncResponse)
invokeEndpointAsyncResponse_outputLocation :: Lens.Lens' InvokeEndpointAsyncResponse (Prelude.Maybe Prelude.Text)
invokeEndpointAsyncResponse_outputLocation :: Lens' InvokeEndpointAsyncResponse (Maybe Text)
invokeEndpointAsyncResponse_outputLocation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsyncResponse' {Maybe Text
outputLocation :: Maybe Text
$sel:outputLocation:InvokeEndpointAsyncResponse' :: InvokeEndpointAsyncResponse -> Maybe Text
outputLocation} -> Maybe Text
outputLocation) (\s :: InvokeEndpointAsyncResponse
s@InvokeEndpointAsyncResponse' {} Maybe Text
a -> InvokeEndpointAsyncResponse
s {$sel:outputLocation:InvokeEndpointAsyncResponse' :: Maybe Text
outputLocation = Maybe Text
a} :: InvokeEndpointAsyncResponse)
invokeEndpointAsyncResponse_httpStatus :: Lens.Lens' InvokeEndpointAsyncResponse Prelude.Int
invokeEndpointAsyncResponse_httpStatus :: Lens' InvokeEndpointAsyncResponse Int
invokeEndpointAsyncResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\InvokeEndpointAsyncResponse' {Int
httpStatus :: Int
$sel:httpStatus:InvokeEndpointAsyncResponse' :: InvokeEndpointAsyncResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: InvokeEndpointAsyncResponse
s@InvokeEndpointAsyncResponse' {} Int
a -> InvokeEndpointAsyncResponse
s {$sel:httpStatus:InvokeEndpointAsyncResponse' :: Int
httpStatus = Int
a} :: InvokeEndpointAsyncResponse)
instance Prelude.NFData InvokeEndpointAsyncResponse where
rnf :: InvokeEndpointAsyncResponse -> ()
rnf InvokeEndpointAsyncResponse' {Int
Maybe Text
httpStatus :: Int
outputLocation :: Maybe Text
inferenceId :: Maybe Text
$sel:httpStatus:InvokeEndpointAsyncResponse' :: InvokeEndpointAsyncResponse -> Int
$sel:outputLocation:InvokeEndpointAsyncResponse' :: InvokeEndpointAsyncResponse -> Maybe Text
$sel:inferenceId:InvokeEndpointAsyncResponse' :: InvokeEndpointAsyncResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
inferenceId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
outputLocation
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus