{-# 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.IoT.CreateStream
(
CreateStream (..),
newCreateStream,
createStream_description,
createStream_tags,
createStream_streamId,
createStream_files,
createStream_roleArn,
CreateStreamResponse (..),
newCreateStreamResponse,
createStreamResponse_description,
createStreamResponse_streamArn,
createStreamResponse_streamId,
createStreamResponse_streamVersion,
createStreamResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoT.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data CreateStream = CreateStream'
{
CreateStream -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
CreateStream -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateStream -> Text
streamId :: Prelude.Text,
CreateStream -> NonEmpty StreamFile
files :: Prelude.NonEmpty StreamFile,
CreateStream -> Text
roleArn :: Prelude.Text
}
deriving (CreateStream -> CreateStream -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateStream -> CreateStream -> Bool
$c/= :: CreateStream -> CreateStream -> Bool
== :: CreateStream -> CreateStream -> Bool
$c== :: CreateStream -> CreateStream -> Bool
Prelude.Eq, ReadPrec [CreateStream]
ReadPrec CreateStream
Int -> ReadS CreateStream
ReadS [CreateStream]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateStream]
$creadListPrec :: ReadPrec [CreateStream]
readPrec :: ReadPrec CreateStream
$creadPrec :: ReadPrec CreateStream
readList :: ReadS [CreateStream]
$creadList :: ReadS [CreateStream]
readsPrec :: Int -> ReadS CreateStream
$creadsPrec :: Int -> ReadS CreateStream
Prelude.Read, Int -> CreateStream -> ShowS
[CreateStream] -> ShowS
CreateStream -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateStream] -> ShowS
$cshowList :: [CreateStream] -> ShowS
show :: CreateStream -> String
$cshow :: CreateStream -> String
showsPrec :: Int -> CreateStream -> ShowS
$cshowsPrec :: Int -> CreateStream -> ShowS
Prelude.Show, forall x. Rep CreateStream x -> CreateStream
forall x. CreateStream -> Rep CreateStream x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateStream x -> CreateStream
$cfrom :: forall x. CreateStream -> Rep CreateStream x
Prelude.Generic)
newCreateStream ::
Prelude.Text ->
Prelude.NonEmpty StreamFile ->
Prelude.Text ->
CreateStream
newCreateStream :: Text -> NonEmpty StreamFile -> Text -> CreateStream
newCreateStream Text
pStreamId_ NonEmpty StreamFile
pFiles_ Text
pRoleArn_ =
CreateStream'
{ $sel:description:CreateStream' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateStream' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
$sel:streamId:CreateStream' :: Text
streamId = Text
pStreamId_,
$sel:files:CreateStream' :: NonEmpty StreamFile
files = forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced forall t b. AReview t b -> b -> t
Lens.# NonEmpty StreamFile
pFiles_,
$sel:roleArn:CreateStream' :: Text
roleArn = Text
pRoleArn_
}
createStream_description :: Lens.Lens' CreateStream (Prelude.Maybe Prelude.Text)
createStream_description :: Lens' CreateStream (Maybe Text)
createStream_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStream' {Maybe Text
description :: Maybe Text
$sel:description:CreateStream' :: CreateStream -> Maybe Text
description} -> Maybe Text
description) (\s :: CreateStream
s@CreateStream' {} Maybe Text
a -> CreateStream
s {$sel:description:CreateStream' :: Maybe Text
description = Maybe Text
a} :: CreateStream)
createStream_tags :: Lens.Lens' CreateStream (Prelude.Maybe [Tag])
createStream_tags :: Lens' CreateStream (Maybe [Tag])
createStream_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStream' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateStream' :: CreateStream -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateStream
s@CreateStream' {} Maybe [Tag]
a -> CreateStream
s {$sel:tags:CreateStream' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateStream) 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
createStream_streamId :: Lens.Lens' CreateStream Prelude.Text
createStream_streamId :: Lens' CreateStream Text
createStream_streamId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStream' {Text
streamId :: Text
$sel:streamId:CreateStream' :: CreateStream -> Text
streamId} -> Text
streamId) (\s :: CreateStream
s@CreateStream' {} Text
a -> CreateStream
s {$sel:streamId:CreateStream' :: Text
streamId = Text
a} :: CreateStream)
createStream_files :: Lens.Lens' CreateStream (Prelude.NonEmpty StreamFile)
createStream_files :: Lens' CreateStream (NonEmpty StreamFile)
createStream_files = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStream' {NonEmpty StreamFile
files :: NonEmpty StreamFile
$sel:files:CreateStream' :: CreateStream -> NonEmpty StreamFile
files} -> NonEmpty StreamFile
files) (\s :: CreateStream
s@CreateStream' {} NonEmpty StreamFile
a -> CreateStream
s {$sel:files:CreateStream' :: NonEmpty StreamFile
files = NonEmpty StreamFile
a} :: CreateStream) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createStream_roleArn :: Lens.Lens' CreateStream Prelude.Text
createStream_roleArn :: Lens' CreateStream Text
createStream_roleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStream' {Text
roleArn :: Text
$sel:roleArn:CreateStream' :: CreateStream -> Text
roleArn} -> Text
roleArn) (\s :: CreateStream
s@CreateStream' {} Text
a -> CreateStream
s {$sel:roleArn:CreateStream' :: Text
roleArn = Text
a} :: CreateStream)
instance Core.AWSRequest CreateStream where
type AWSResponse CreateStream = CreateStreamResponse
request :: (Service -> Service) -> CreateStream -> Request CreateStream
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 CreateStream
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse CreateStream)))
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
-> Maybe Text
-> Maybe Natural
-> Int
-> CreateStreamResponse
CreateStreamResponse'
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
"description")
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
"streamArn")
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
"streamId")
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
"streamVersion")
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 CreateStream where
hashWithSalt :: Int -> CreateStream -> Int
hashWithSalt Int
_salt CreateStream' {Maybe [Tag]
Maybe Text
NonEmpty StreamFile
Text
roleArn :: Text
files :: NonEmpty StreamFile
streamId :: Text
tags :: Maybe [Tag]
description :: Maybe Text
$sel:roleArn:CreateStream' :: CreateStream -> Text
$sel:files:CreateStream' :: CreateStream -> NonEmpty StreamFile
$sel:streamId:CreateStream' :: CreateStream -> Text
$sel:tags:CreateStream' :: CreateStream -> Maybe [Tag]
$sel:description:CreateStream' :: CreateStream -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
streamId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` NonEmpty StreamFile
files
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
roleArn
instance Prelude.NFData CreateStream where
rnf :: CreateStream -> ()
rnf CreateStream' {Maybe [Tag]
Maybe Text
NonEmpty StreamFile
Text
roleArn :: Text
files :: NonEmpty StreamFile
streamId :: Text
tags :: Maybe [Tag]
description :: Maybe Text
$sel:roleArn:CreateStream' :: CreateStream -> Text
$sel:files:CreateStream' :: CreateStream -> NonEmpty StreamFile
$sel:streamId:CreateStream' :: CreateStream -> Text
$sel:tags:CreateStream' :: CreateStream -> Maybe [Tag]
$sel:description:CreateStream' :: CreateStream -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Tag]
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
streamId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf NonEmpty StreamFile
files
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
roleArn
instance Data.ToHeaders CreateStream where
toHeaders :: CreateStream -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToJSON CreateStream where
toJSON :: CreateStream -> Value
toJSON CreateStream' {Maybe [Tag]
Maybe Text
NonEmpty StreamFile
Text
roleArn :: Text
files :: NonEmpty StreamFile
streamId :: Text
tags :: Maybe [Tag]
description :: Maybe Text
$sel:roleArn:CreateStream' :: CreateStream -> Text
$sel:files:CreateStream' :: CreateStream -> NonEmpty StreamFile
$sel:streamId:CreateStream' :: CreateStream -> Text
$sel:tags:CreateStream' :: CreateStream -> Maybe [Tag]
$sel:description:CreateStream' :: CreateStream -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"description" 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
description,
(Key
"tags" 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 [Tag]
tags,
forall a. a -> Maybe a
Prelude.Just (Key
"files" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= NonEmpty StreamFile
files),
forall a. a -> Maybe a
Prelude.Just (Key
"roleArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
roleArn)
]
)
instance Data.ToPath CreateStream where
toPath :: CreateStream -> ByteString
toPath CreateStream' {Maybe [Tag]
Maybe Text
NonEmpty StreamFile
Text
roleArn :: Text
files :: NonEmpty StreamFile
streamId :: Text
tags :: Maybe [Tag]
description :: Maybe Text
$sel:roleArn:CreateStream' :: CreateStream -> Text
$sel:files:CreateStream' :: CreateStream -> NonEmpty StreamFile
$sel:streamId:CreateStream' :: CreateStream -> Text
$sel:tags:CreateStream' :: CreateStream -> Maybe [Tag]
$sel:description:CreateStream' :: CreateStream -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat [ByteString
"/streams/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
streamId]
instance Data.ToQuery CreateStream where
toQuery :: CreateStream -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data CreateStreamResponse = CreateStreamResponse'
{
CreateStreamResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
CreateStreamResponse -> Maybe Text
streamArn :: Prelude.Maybe Prelude.Text,
CreateStreamResponse -> Maybe Text
streamId :: Prelude.Maybe Prelude.Text,
CreateStreamResponse -> Maybe Natural
streamVersion :: Prelude.Maybe Prelude.Natural,
CreateStreamResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateStreamResponse -> CreateStreamResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateStreamResponse -> CreateStreamResponse -> Bool
$c/= :: CreateStreamResponse -> CreateStreamResponse -> Bool
== :: CreateStreamResponse -> CreateStreamResponse -> Bool
$c== :: CreateStreamResponse -> CreateStreamResponse -> Bool
Prelude.Eq, ReadPrec [CreateStreamResponse]
ReadPrec CreateStreamResponse
Int -> ReadS CreateStreamResponse
ReadS [CreateStreamResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateStreamResponse]
$creadListPrec :: ReadPrec [CreateStreamResponse]
readPrec :: ReadPrec CreateStreamResponse
$creadPrec :: ReadPrec CreateStreamResponse
readList :: ReadS [CreateStreamResponse]
$creadList :: ReadS [CreateStreamResponse]
readsPrec :: Int -> ReadS CreateStreamResponse
$creadsPrec :: Int -> ReadS CreateStreamResponse
Prelude.Read, Int -> CreateStreamResponse -> ShowS
[CreateStreamResponse] -> ShowS
CreateStreamResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateStreamResponse] -> ShowS
$cshowList :: [CreateStreamResponse] -> ShowS
show :: CreateStreamResponse -> String
$cshow :: CreateStreamResponse -> String
showsPrec :: Int -> CreateStreamResponse -> ShowS
$cshowsPrec :: Int -> CreateStreamResponse -> ShowS
Prelude.Show, forall x. Rep CreateStreamResponse x -> CreateStreamResponse
forall x. CreateStreamResponse -> Rep CreateStreamResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateStreamResponse x -> CreateStreamResponse
$cfrom :: forall x. CreateStreamResponse -> Rep CreateStreamResponse x
Prelude.Generic)
newCreateStreamResponse ::
Prelude.Int ->
CreateStreamResponse
newCreateStreamResponse :: Int -> CreateStreamResponse
newCreateStreamResponse Int
pHttpStatus_ =
CreateStreamResponse'
{ $sel:description:CreateStreamResponse' :: Maybe Text
description =
forall a. Maybe a
Prelude.Nothing,
$sel:streamArn:CreateStreamResponse' :: Maybe Text
streamArn = forall a. Maybe a
Prelude.Nothing,
$sel:streamId:CreateStreamResponse' :: Maybe Text
streamId = forall a. Maybe a
Prelude.Nothing,
$sel:streamVersion:CreateStreamResponse' :: Maybe Natural
streamVersion = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateStreamResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createStreamResponse_description :: Lens.Lens' CreateStreamResponse (Prelude.Maybe Prelude.Text)
createStreamResponse_description :: Lens' CreateStreamResponse (Maybe Text)
createStreamResponse_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStreamResponse' {Maybe Text
description :: Maybe Text
$sel:description:CreateStreamResponse' :: CreateStreamResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: CreateStreamResponse
s@CreateStreamResponse' {} Maybe Text
a -> CreateStreamResponse
s {$sel:description:CreateStreamResponse' :: Maybe Text
description = Maybe Text
a} :: CreateStreamResponse)
createStreamResponse_streamArn :: Lens.Lens' CreateStreamResponse (Prelude.Maybe Prelude.Text)
createStreamResponse_streamArn :: Lens' CreateStreamResponse (Maybe Text)
createStreamResponse_streamArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStreamResponse' {Maybe Text
streamArn :: Maybe Text
$sel:streamArn:CreateStreamResponse' :: CreateStreamResponse -> Maybe Text
streamArn} -> Maybe Text
streamArn) (\s :: CreateStreamResponse
s@CreateStreamResponse' {} Maybe Text
a -> CreateStreamResponse
s {$sel:streamArn:CreateStreamResponse' :: Maybe Text
streamArn = Maybe Text
a} :: CreateStreamResponse)
createStreamResponse_streamId :: Lens.Lens' CreateStreamResponse (Prelude.Maybe Prelude.Text)
createStreamResponse_streamId :: Lens' CreateStreamResponse (Maybe Text)
createStreamResponse_streamId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStreamResponse' {Maybe Text
streamId :: Maybe Text
$sel:streamId:CreateStreamResponse' :: CreateStreamResponse -> Maybe Text
streamId} -> Maybe Text
streamId) (\s :: CreateStreamResponse
s@CreateStreamResponse' {} Maybe Text
a -> CreateStreamResponse
s {$sel:streamId:CreateStreamResponse' :: Maybe Text
streamId = Maybe Text
a} :: CreateStreamResponse)
createStreamResponse_streamVersion :: Lens.Lens' CreateStreamResponse (Prelude.Maybe Prelude.Natural)
createStreamResponse_streamVersion :: Lens' CreateStreamResponse (Maybe Natural)
createStreamResponse_streamVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStreamResponse' {Maybe Natural
streamVersion :: Maybe Natural
$sel:streamVersion:CreateStreamResponse' :: CreateStreamResponse -> Maybe Natural
streamVersion} -> Maybe Natural
streamVersion) (\s :: CreateStreamResponse
s@CreateStreamResponse' {} Maybe Natural
a -> CreateStreamResponse
s {$sel:streamVersion:CreateStreamResponse' :: Maybe Natural
streamVersion = Maybe Natural
a} :: CreateStreamResponse)
createStreamResponse_httpStatus :: Lens.Lens' CreateStreamResponse Prelude.Int
createStreamResponse_httpStatus :: Lens' CreateStreamResponse Int
createStreamResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateStreamResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateStreamResponse' :: CreateStreamResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateStreamResponse
s@CreateStreamResponse' {} Int
a -> CreateStreamResponse
s {$sel:httpStatus:CreateStreamResponse' :: Int
httpStatus = Int
a} :: CreateStreamResponse)
instance Prelude.NFData CreateStreamResponse where
rnf :: CreateStreamResponse -> ()
rnf CreateStreamResponse' {Int
Maybe Natural
Maybe Text
httpStatus :: Int
streamVersion :: Maybe Natural
streamId :: Maybe Text
streamArn :: Maybe Text
description :: Maybe Text
$sel:httpStatus:CreateStreamResponse' :: CreateStreamResponse -> Int
$sel:streamVersion:CreateStreamResponse' :: CreateStreamResponse -> Maybe Natural
$sel:streamId:CreateStreamResponse' :: CreateStreamResponse -> Maybe Text
$sel:streamArn:CreateStreamResponse' :: CreateStreamResponse -> Maybe Text
$sel:description:CreateStreamResponse' :: CreateStreamResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
streamArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
streamId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
streamVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus