{-# 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.Greengrass.CreateResourceDefinitionVersion
(
CreateResourceDefinitionVersion (..),
newCreateResourceDefinitionVersion,
createResourceDefinitionVersion_amznClientToken,
createResourceDefinitionVersion_resources,
createResourceDefinitionVersion_resourceDefinitionId,
CreateResourceDefinitionVersionResponse (..),
newCreateResourceDefinitionVersionResponse,
createResourceDefinitionVersionResponse_arn,
createResourceDefinitionVersionResponse_creationTimestamp,
createResourceDefinitionVersionResponse_id,
createResourceDefinitionVersionResponse_version,
createResourceDefinitionVersionResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Greengrass.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data CreateResourceDefinitionVersion = CreateResourceDefinitionVersion'
{
CreateResourceDefinitionVersion -> Maybe Text
amznClientToken :: Prelude.Maybe Prelude.Text,
CreateResourceDefinitionVersion -> Maybe [Resource]
resources :: Prelude.Maybe [Resource],
CreateResourceDefinitionVersion -> Text
resourceDefinitionId :: Prelude.Text
}
deriving (CreateResourceDefinitionVersion
-> CreateResourceDefinitionVersion -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateResourceDefinitionVersion
-> CreateResourceDefinitionVersion -> Bool
$c/= :: CreateResourceDefinitionVersion
-> CreateResourceDefinitionVersion -> Bool
== :: CreateResourceDefinitionVersion
-> CreateResourceDefinitionVersion -> Bool
$c== :: CreateResourceDefinitionVersion
-> CreateResourceDefinitionVersion -> Bool
Prelude.Eq, ReadPrec [CreateResourceDefinitionVersion]
ReadPrec CreateResourceDefinitionVersion
Int -> ReadS CreateResourceDefinitionVersion
ReadS [CreateResourceDefinitionVersion]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateResourceDefinitionVersion]
$creadListPrec :: ReadPrec [CreateResourceDefinitionVersion]
readPrec :: ReadPrec CreateResourceDefinitionVersion
$creadPrec :: ReadPrec CreateResourceDefinitionVersion
readList :: ReadS [CreateResourceDefinitionVersion]
$creadList :: ReadS [CreateResourceDefinitionVersion]
readsPrec :: Int -> ReadS CreateResourceDefinitionVersion
$creadsPrec :: Int -> ReadS CreateResourceDefinitionVersion
Prelude.Read, Int -> CreateResourceDefinitionVersion -> ShowS
[CreateResourceDefinitionVersion] -> ShowS
CreateResourceDefinitionVersion -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateResourceDefinitionVersion] -> ShowS
$cshowList :: [CreateResourceDefinitionVersion] -> ShowS
show :: CreateResourceDefinitionVersion -> String
$cshow :: CreateResourceDefinitionVersion -> String
showsPrec :: Int -> CreateResourceDefinitionVersion -> ShowS
$cshowsPrec :: Int -> CreateResourceDefinitionVersion -> ShowS
Prelude.Show, forall x.
Rep CreateResourceDefinitionVersion x
-> CreateResourceDefinitionVersion
forall x.
CreateResourceDefinitionVersion
-> Rep CreateResourceDefinitionVersion x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateResourceDefinitionVersion x
-> CreateResourceDefinitionVersion
$cfrom :: forall x.
CreateResourceDefinitionVersion
-> Rep CreateResourceDefinitionVersion x
Prelude.Generic)
newCreateResourceDefinitionVersion ::
Prelude.Text ->
CreateResourceDefinitionVersion
newCreateResourceDefinitionVersion :: Text -> CreateResourceDefinitionVersion
newCreateResourceDefinitionVersion
Text
pResourceDefinitionId_ =
CreateResourceDefinitionVersion'
{ $sel:amznClientToken:CreateResourceDefinitionVersion' :: Maybe Text
amznClientToken =
forall a. Maybe a
Prelude.Nothing,
$sel:resources:CreateResourceDefinitionVersion' :: Maybe [Resource]
resources = forall a. Maybe a
Prelude.Nothing,
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: Text
resourceDefinitionId =
Text
pResourceDefinitionId_
}
createResourceDefinitionVersion_amznClientToken :: Lens.Lens' CreateResourceDefinitionVersion (Prelude.Maybe Prelude.Text)
createResourceDefinitionVersion_amznClientToken :: Lens' CreateResourceDefinitionVersion (Maybe Text)
createResourceDefinitionVersion_amznClientToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersion' {Maybe Text
amznClientToken :: Maybe Text
$sel:amznClientToken:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe Text
amznClientToken} -> Maybe Text
amznClientToken) (\s :: CreateResourceDefinitionVersion
s@CreateResourceDefinitionVersion' {} Maybe Text
a -> CreateResourceDefinitionVersion
s {$sel:amznClientToken:CreateResourceDefinitionVersion' :: Maybe Text
amznClientToken = Maybe Text
a} :: CreateResourceDefinitionVersion)
createResourceDefinitionVersion_resources :: Lens.Lens' CreateResourceDefinitionVersion (Prelude.Maybe [Resource])
createResourceDefinitionVersion_resources :: Lens' CreateResourceDefinitionVersion (Maybe [Resource])
createResourceDefinitionVersion_resources = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersion' {Maybe [Resource]
resources :: Maybe [Resource]
$sel:resources:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe [Resource]
resources} -> Maybe [Resource]
resources) (\s :: CreateResourceDefinitionVersion
s@CreateResourceDefinitionVersion' {} Maybe [Resource]
a -> CreateResourceDefinitionVersion
s {$sel:resources:CreateResourceDefinitionVersion' :: Maybe [Resource]
resources = Maybe [Resource]
a} :: CreateResourceDefinitionVersion) 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
createResourceDefinitionVersion_resourceDefinitionId :: Lens.Lens' CreateResourceDefinitionVersion Prelude.Text
createResourceDefinitionVersion_resourceDefinitionId :: Lens' CreateResourceDefinitionVersion Text
createResourceDefinitionVersion_resourceDefinitionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersion' {Text
resourceDefinitionId :: Text
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Text
resourceDefinitionId} -> Text
resourceDefinitionId) (\s :: CreateResourceDefinitionVersion
s@CreateResourceDefinitionVersion' {} Text
a -> CreateResourceDefinitionVersion
s {$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: Text
resourceDefinitionId = Text
a} :: CreateResourceDefinitionVersion)
instance
Core.AWSRequest
CreateResourceDefinitionVersion
where
type
AWSResponse CreateResourceDefinitionVersion =
CreateResourceDefinitionVersionResponse
request :: (Service -> Service)
-> CreateResourceDefinitionVersion
-> Request CreateResourceDefinitionVersion
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 CreateResourceDefinitionVersion
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse CreateResourceDefinitionVersion)))
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 Text
-> Int
-> CreateResourceDefinitionVersionResponse
CreateResourceDefinitionVersionResponse'
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
"Arn")
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
"CreationTimestamp")
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
"Id")
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
"Version")
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
CreateResourceDefinitionVersion
where
hashWithSalt :: Int -> CreateResourceDefinitionVersion -> Int
hashWithSalt
Int
_salt
CreateResourceDefinitionVersion' {Maybe [Resource]
Maybe Text
Text
resourceDefinitionId :: Text
resources :: Maybe [Resource]
amznClientToken :: Maybe Text
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Text
$sel:resources:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe [Resource]
$sel:amznClientToken:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
amznClientToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Resource]
resources
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
resourceDefinitionId
instance
Prelude.NFData
CreateResourceDefinitionVersion
where
rnf :: CreateResourceDefinitionVersion -> ()
rnf CreateResourceDefinitionVersion' {Maybe [Resource]
Maybe Text
Text
resourceDefinitionId :: Text
resources :: Maybe [Resource]
amznClientToken :: Maybe Text
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Text
$sel:resources:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe [Resource]
$sel:amznClientToken:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
amznClientToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Resource]
resources
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
resourceDefinitionId
instance
Data.ToHeaders
CreateResourceDefinitionVersion
where
toHeaders :: CreateResourceDefinitionVersion -> ResponseHeaders
toHeaders CreateResourceDefinitionVersion' {Maybe [Resource]
Maybe Text
Text
resourceDefinitionId :: Text
resources :: Maybe [Resource]
amznClientToken :: Maybe Text
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Text
$sel:resources:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe [Resource]
$sel:amznClientToken:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amzn-Client-Token" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe Text
amznClientToken,
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# (ByteString
"application/x-amz-json-1.1" :: Prelude.ByteString)
]
instance Data.ToJSON CreateResourceDefinitionVersion where
toJSON :: CreateResourceDefinitionVersion -> Value
toJSON CreateResourceDefinitionVersion' {Maybe [Resource]
Maybe Text
Text
resourceDefinitionId :: Text
resources :: Maybe [Resource]
amznClientToken :: Maybe Text
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Text
$sel:resources:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe [Resource]
$sel:amznClientToken:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[(Key
"Resources" 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 [Resource]
resources]
)
instance Data.ToPath CreateResourceDefinitionVersion where
toPath :: CreateResourceDefinitionVersion -> ByteString
toPath CreateResourceDefinitionVersion' {Maybe [Resource]
Maybe Text
Text
resourceDefinitionId :: Text
resources :: Maybe [Resource]
amznClientToken :: Maybe Text
$sel:resourceDefinitionId:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Text
$sel:resources:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe [Resource]
$sel:amznClientToken:CreateResourceDefinitionVersion' :: CreateResourceDefinitionVersion -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/greengrass/definition/resources/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
resourceDefinitionId,
ByteString
"/versions"
]
instance Data.ToQuery CreateResourceDefinitionVersion where
toQuery :: CreateResourceDefinitionVersion -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data CreateResourceDefinitionVersionResponse = CreateResourceDefinitionVersionResponse'
{
CreateResourceDefinitionVersionResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
CreateResourceDefinitionVersionResponse -> Maybe Text
creationTimestamp :: Prelude.Maybe Prelude.Text,
CreateResourceDefinitionVersionResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
CreateResourceDefinitionVersionResponse -> Maybe Text
version :: Prelude.Maybe Prelude.Text,
CreateResourceDefinitionVersionResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateResourceDefinitionVersionResponse
-> CreateResourceDefinitionVersionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateResourceDefinitionVersionResponse
-> CreateResourceDefinitionVersionResponse -> Bool
$c/= :: CreateResourceDefinitionVersionResponse
-> CreateResourceDefinitionVersionResponse -> Bool
== :: CreateResourceDefinitionVersionResponse
-> CreateResourceDefinitionVersionResponse -> Bool
$c== :: CreateResourceDefinitionVersionResponse
-> CreateResourceDefinitionVersionResponse -> Bool
Prelude.Eq, ReadPrec [CreateResourceDefinitionVersionResponse]
ReadPrec CreateResourceDefinitionVersionResponse
Int -> ReadS CreateResourceDefinitionVersionResponse
ReadS [CreateResourceDefinitionVersionResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateResourceDefinitionVersionResponse]
$creadListPrec :: ReadPrec [CreateResourceDefinitionVersionResponse]
readPrec :: ReadPrec CreateResourceDefinitionVersionResponse
$creadPrec :: ReadPrec CreateResourceDefinitionVersionResponse
readList :: ReadS [CreateResourceDefinitionVersionResponse]
$creadList :: ReadS [CreateResourceDefinitionVersionResponse]
readsPrec :: Int -> ReadS CreateResourceDefinitionVersionResponse
$creadsPrec :: Int -> ReadS CreateResourceDefinitionVersionResponse
Prelude.Read, Int -> CreateResourceDefinitionVersionResponse -> ShowS
[CreateResourceDefinitionVersionResponse] -> ShowS
CreateResourceDefinitionVersionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateResourceDefinitionVersionResponse] -> ShowS
$cshowList :: [CreateResourceDefinitionVersionResponse] -> ShowS
show :: CreateResourceDefinitionVersionResponse -> String
$cshow :: CreateResourceDefinitionVersionResponse -> String
showsPrec :: Int -> CreateResourceDefinitionVersionResponse -> ShowS
$cshowsPrec :: Int -> CreateResourceDefinitionVersionResponse -> ShowS
Prelude.Show, forall x.
Rep CreateResourceDefinitionVersionResponse x
-> CreateResourceDefinitionVersionResponse
forall x.
CreateResourceDefinitionVersionResponse
-> Rep CreateResourceDefinitionVersionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateResourceDefinitionVersionResponse x
-> CreateResourceDefinitionVersionResponse
$cfrom :: forall x.
CreateResourceDefinitionVersionResponse
-> Rep CreateResourceDefinitionVersionResponse x
Prelude.Generic)
newCreateResourceDefinitionVersionResponse ::
Prelude.Int ->
CreateResourceDefinitionVersionResponse
newCreateResourceDefinitionVersionResponse :: Int -> CreateResourceDefinitionVersionResponse
newCreateResourceDefinitionVersionResponse
Int
pHttpStatus_ =
CreateResourceDefinitionVersionResponse'
{ $sel:arn:CreateResourceDefinitionVersionResponse' :: Maybe Text
arn =
forall a. Maybe a
Prelude.Nothing,
$sel:creationTimestamp:CreateResourceDefinitionVersionResponse' :: Maybe Text
creationTimestamp =
forall a. Maybe a
Prelude.Nothing,
$sel:id:CreateResourceDefinitionVersionResponse' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
$sel:version:CreateResourceDefinitionVersionResponse' :: Maybe Text
version = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateResourceDefinitionVersionResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createResourceDefinitionVersionResponse_arn :: Lens.Lens' CreateResourceDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
createResourceDefinitionVersionResponse_arn :: Lens' CreateResourceDefinitionVersionResponse (Maybe Text)
createResourceDefinitionVersionResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersionResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: CreateResourceDefinitionVersionResponse
s@CreateResourceDefinitionVersionResponse' {} Maybe Text
a -> CreateResourceDefinitionVersionResponse
s {$sel:arn:CreateResourceDefinitionVersionResponse' :: Maybe Text
arn = Maybe Text
a} :: CreateResourceDefinitionVersionResponse)
createResourceDefinitionVersionResponse_creationTimestamp :: Lens.Lens' CreateResourceDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
createResourceDefinitionVersionResponse_creationTimestamp :: Lens' CreateResourceDefinitionVersionResponse (Maybe Text)
createResourceDefinitionVersionResponse_creationTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersionResponse' {Maybe Text
creationTimestamp :: Maybe Text
$sel:creationTimestamp:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
creationTimestamp} -> Maybe Text
creationTimestamp) (\s :: CreateResourceDefinitionVersionResponse
s@CreateResourceDefinitionVersionResponse' {} Maybe Text
a -> CreateResourceDefinitionVersionResponse
s {$sel:creationTimestamp:CreateResourceDefinitionVersionResponse' :: Maybe Text
creationTimestamp = Maybe Text
a} :: CreateResourceDefinitionVersionResponse)
createResourceDefinitionVersionResponse_id :: Lens.Lens' CreateResourceDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
createResourceDefinitionVersionResponse_id :: Lens' CreateResourceDefinitionVersionResponse (Maybe Text)
createResourceDefinitionVersionResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersionResponse' {Maybe Text
id :: Maybe Text
$sel:id:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: CreateResourceDefinitionVersionResponse
s@CreateResourceDefinitionVersionResponse' {} Maybe Text
a -> CreateResourceDefinitionVersionResponse
s {$sel:id:CreateResourceDefinitionVersionResponse' :: Maybe Text
id = Maybe Text
a} :: CreateResourceDefinitionVersionResponse)
createResourceDefinitionVersionResponse_version :: Lens.Lens' CreateResourceDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
createResourceDefinitionVersionResponse_version :: Lens' CreateResourceDefinitionVersionResponse (Maybe Text)
createResourceDefinitionVersionResponse_version = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersionResponse' {Maybe Text
version :: Maybe Text
$sel:version:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
version} -> Maybe Text
version) (\s :: CreateResourceDefinitionVersionResponse
s@CreateResourceDefinitionVersionResponse' {} Maybe Text
a -> CreateResourceDefinitionVersionResponse
s {$sel:version:CreateResourceDefinitionVersionResponse' :: Maybe Text
version = Maybe Text
a} :: CreateResourceDefinitionVersionResponse)
createResourceDefinitionVersionResponse_httpStatus :: Lens.Lens' CreateResourceDefinitionVersionResponse Prelude.Int
createResourceDefinitionVersionResponse_httpStatus :: Lens' CreateResourceDefinitionVersionResponse Int
createResourceDefinitionVersionResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateResourceDefinitionVersionResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateResourceDefinitionVersionResponse
s@CreateResourceDefinitionVersionResponse' {} Int
a -> CreateResourceDefinitionVersionResponse
s {$sel:httpStatus:CreateResourceDefinitionVersionResponse' :: Int
httpStatus = Int
a} :: CreateResourceDefinitionVersionResponse)
instance
Prelude.NFData
CreateResourceDefinitionVersionResponse
where
rnf :: CreateResourceDefinitionVersionResponse -> ()
rnf CreateResourceDefinitionVersionResponse' {Int
Maybe Text
httpStatus :: Int
version :: Maybe Text
id :: Maybe Text
creationTimestamp :: Maybe Text
arn :: Maybe Text
$sel:httpStatus:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Int
$sel:version:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
$sel:id:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
$sel:creationTimestamp:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
$sel:arn:CreateResourceDefinitionVersionResponse' :: CreateResourceDefinitionVersionResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
arn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
creationTimestamp
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
id
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
version
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus