{-# 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.GetResourceDefinition
(
GetResourceDefinition (..),
newGetResourceDefinition,
getResourceDefinition_resourceDefinitionId,
GetResourceDefinitionResponse (..),
newGetResourceDefinitionResponse,
getResourceDefinitionResponse_arn,
getResourceDefinitionResponse_creationTimestamp,
getResourceDefinitionResponse_id,
getResourceDefinitionResponse_lastUpdatedTimestamp,
getResourceDefinitionResponse_latestVersion,
getResourceDefinitionResponse_latestVersionArn,
getResourceDefinitionResponse_name,
getResourceDefinitionResponse_tags,
getResourceDefinitionResponse_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 GetResourceDefinition = GetResourceDefinition'
{
GetResourceDefinition -> Text
resourceDefinitionId :: Prelude.Text
}
deriving (GetResourceDefinition -> GetResourceDefinition -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetResourceDefinition -> GetResourceDefinition -> Bool
$c/= :: GetResourceDefinition -> GetResourceDefinition -> Bool
== :: GetResourceDefinition -> GetResourceDefinition -> Bool
$c== :: GetResourceDefinition -> GetResourceDefinition -> Bool
Prelude.Eq, ReadPrec [GetResourceDefinition]
ReadPrec GetResourceDefinition
Int -> ReadS GetResourceDefinition
ReadS [GetResourceDefinition]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetResourceDefinition]
$creadListPrec :: ReadPrec [GetResourceDefinition]
readPrec :: ReadPrec GetResourceDefinition
$creadPrec :: ReadPrec GetResourceDefinition
readList :: ReadS [GetResourceDefinition]
$creadList :: ReadS [GetResourceDefinition]
readsPrec :: Int -> ReadS GetResourceDefinition
$creadsPrec :: Int -> ReadS GetResourceDefinition
Prelude.Read, Int -> GetResourceDefinition -> ShowS
[GetResourceDefinition] -> ShowS
GetResourceDefinition -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetResourceDefinition] -> ShowS
$cshowList :: [GetResourceDefinition] -> ShowS
show :: GetResourceDefinition -> String
$cshow :: GetResourceDefinition -> String
showsPrec :: Int -> GetResourceDefinition -> ShowS
$cshowsPrec :: Int -> GetResourceDefinition -> ShowS
Prelude.Show, forall x. Rep GetResourceDefinition x -> GetResourceDefinition
forall x. GetResourceDefinition -> Rep GetResourceDefinition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetResourceDefinition x -> GetResourceDefinition
$cfrom :: forall x. GetResourceDefinition -> Rep GetResourceDefinition x
Prelude.Generic)
newGetResourceDefinition ::
Prelude.Text ->
GetResourceDefinition
newGetResourceDefinition :: Text -> GetResourceDefinition
newGetResourceDefinition Text
pResourceDefinitionId_ =
GetResourceDefinition'
{ $sel:resourceDefinitionId:GetResourceDefinition' :: Text
resourceDefinitionId =
Text
pResourceDefinitionId_
}
getResourceDefinition_resourceDefinitionId :: Lens.Lens' GetResourceDefinition Prelude.Text
getResourceDefinition_resourceDefinitionId :: Lens' GetResourceDefinition Text
getResourceDefinition_resourceDefinitionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinition' {Text
resourceDefinitionId :: Text
$sel:resourceDefinitionId:GetResourceDefinition' :: GetResourceDefinition -> Text
resourceDefinitionId} -> Text
resourceDefinitionId) (\s :: GetResourceDefinition
s@GetResourceDefinition' {} Text
a -> GetResourceDefinition
s {$sel:resourceDefinitionId:GetResourceDefinition' :: Text
resourceDefinitionId = Text
a} :: GetResourceDefinition)
instance Core.AWSRequest GetResourceDefinition where
type
AWSResponse GetResourceDefinition =
GetResourceDefinitionResponse
request :: (Service -> Service)
-> GetResourceDefinition -> Request GetResourceDefinition
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetResourceDefinition
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetResourceDefinition)))
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
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Int
-> GetResourceDefinitionResponse
GetResourceDefinitionResponse'
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
"LastUpdatedTimestamp")
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
"LatestVersion")
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
"LatestVersionArn")
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
"Name")
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
"tags" 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.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable GetResourceDefinition where
hashWithSalt :: Int -> GetResourceDefinition -> Int
hashWithSalt Int
_salt GetResourceDefinition' {Text
resourceDefinitionId :: Text
$sel:resourceDefinitionId:GetResourceDefinition' :: GetResourceDefinition -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
resourceDefinitionId
instance Prelude.NFData GetResourceDefinition where
rnf :: GetResourceDefinition -> ()
rnf GetResourceDefinition' {Text
resourceDefinitionId :: Text
$sel:resourceDefinitionId:GetResourceDefinition' :: GetResourceDefinition -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
resourceDefinitionId
instance Data.ToHeaders GetResourceDefinition where
toHeaders :: GetResourceDefinition -> 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.ToPath GetResourceDefinition where
toPath :: GetResourceDefinition -> ByteString
toPath GetResourceDefinition' {Text
resourceDefinitionId :: Text
$sel:resourceDefinitionId:GetResourceDefinition' :: GetResourceDefinition -> Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/greengrass/definition/resources/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
resourceDefinitionId
]
instance Data.ToQuery GetResourceDefinition where
toQuery :: GetResourceDefinition -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data GetResourceDefinitionResponse = GetResourceDefinitionResponse'
{
GetResourceDefinitionResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe Text
creationTimestamp :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe Text
lastUpdatedTimestamp :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe Text
latestVersion :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe Text
latestVersionArn :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
GetResourceDefinitionResponse -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
GetResourceDefinitionResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetResourceDefinitionResponse
-> GetResourceDefinitionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetResourceDefinitionResponse
-> GetResourceDefinitionResponse -> Bool
$c/= :: GetResourceDefinitionResponse
-> GetResourceDefinitionResponse -> Bool
== :: GetResourceDefinitionResponse
-> GetResourceDefinitionResponse -> Bool
$c== :: GetResourceDefinitionResponse
-> GetResourceDefinitionResponse -> Bool
Prelude.Eq, ReadPrec [GetResourceDefinitionResponse]
ReadPrec GetResourceDefinitionResponse
Int -> ReadS GetResourceDefinitionResponse
ReadS [GetResourceDefinitionResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetResourceDefinitionResponse]
$creadListPrec :: ReadPrec [GetResourceDefinitionResponse]
readPrec :: ReadPrec GetResourceDefinitionResponse
$creadPrec :: ReadPrec GetResourceDefinitionResponse
readList :: ReadS [GetResourceDefinitionResponse]
$creadList :: ReadS [GetResourceDefinitionResponse]
readsPrec :: Int -> ReadS GetResourceDefinitionResponse
$creadsPrec :: Int -> ReadS GetResourceDefinitionResponse
Prelude.Read, Int -> GetResourceDefinitionResponse -> ShowS
[GetResourceDefinitionResponse] -> ShowS
GetResourceDefinitionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetResourceDefinitionResponse] -> ShowS
$cshowList :: [GetResourceDefinitionResponse] -> ShowS
show :: GetResourceDefinitionResponse -> String
$cshow :: GetResourceDefinitionResponse -> String
showsPrec :: Int -> GetResourceDefinitionResponse -> ShowS
$cshowsPrec :: Int -> GetResourceDefinitionResponse -> ShowS
Prelude.Show, forall x.
Rep GetResourceDefinitionResponse x
-> GetResourceDefinitionResponse
forall x.
GetResourceDefinitionResponse
-> Rep GetResourceDefinitionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetResourceDefinitionResponse x
-> GetResourceDefinitionResponse
$cfrom :: forall x.
GetResourceDefinitionResponse
-> Rep GetResourceDefinitionResponse x
Prelude.Generic)
newGetResourceDefinitionResponse ::
Prelude.Int ->
GetResourceDefinitionResponse
newGetResourceDefinitionResponse :: Int -> GetResourceDefinitionResponse
newGetResourceDefinitionResponse Int
pHttpStatus_ =
GetResourceDefinitionResponse'
{ $sel:arn:GetResourceDefinitionResponse' :: Maybe Text
arn =
forall a. Maybe a
Prelude.Nothing,
$sel:creationTimestamp:GetResourceDefinitionResponse' :: Maybe Text
creationTimestamp = forall a. Maybe a
Prelude.Nothing,
$sel:id:GetResourceDefinitionResponse' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
$sel:lastUpdatedTimestamp:GetResourceDefinitionResponse' :: Maybe Text
lastUpdatedTimestamp = forall a. Maybe a
Prelude.Nothing,
$sel:latestVersion:GetResourceDefinitionResponse' :: Maybe Text
latestVersion = forall a. Maybe a
Prelude.Nothing,
$sel:latestVersionArn:GetResourceDefinitionResponse' :: Maybe Text
latestVersionArn = forall a. Maybe a
Prelude.Nothing,
$sel:name:GetResourceDefinitionResponse' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:tags:GetResourceDefinitionResponse' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetResourceDefinitionResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getResourceDefinitionResponse_arn :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_arn :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:arn:GetResourceDefinitionResponse' :: Maybe Text
arn = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_creationTimestamp :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_creationTimestamp :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_creationTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
creationTimestamp :: Maybe Text
$sel:creationTimestamp:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
creationTimestamp} -> Maybe Text
creationTimestamp) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:creationTimestamp:GetResourceDefinitionResponse' :: Maybe Text
creationTimestamp = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_id :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_id :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
id :: Maybe Text
$sel:id:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:id:GetResourceDefinitionResponse' :: Maybe Text
id = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_lastUpdatedTimestamp :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_lastUpdatedTimestamp :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_lastUpdatedTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
lastUpdatedTimestamp :: Maybe Text
$sel:lastUpdatedTimestamp:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
lastUpdatedTimestamp} -> Maybe Text
lastUpdatedTimestamp) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:lastUpdatedTimestamp:GetResourceDefinitionResponse' :: Maybe Text
lastUpdatedTimestamp = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_latestVersion :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_latestVersion :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_latestVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
latestVersion :: Maybe Text
$sel:latestVersion:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
latestVersion} -> Maybe Text
latestVersion) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:latestVersion:GetResourceDefinitionResponse' :: Maybe Text
latestVersion = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_latestVersionArn :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_latestVersionArn :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_latestVersionArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
latestVersionArn :: Maybe Text
$sel:latestVersionArn:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
latestVersionArn} -> Maybe Text
latestVersionArn) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:latestVersionArn:GetResourceDefinitionResponse' :: Maybe Text
latestVersionArn = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_name :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe Prelude.Text)
getResourceDefinitionResponse_name :: Lens' GetResourceDefinitionResponse (Maybe Text)
getResourceDefinitionResponse_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe Text
name :: Maybe Text
$sel:name:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe Text
a -> GetResourceDefinitionResponse
s {$sel:name:GetResourceDefinitionResponse' :: Maybe Text
name = Maybe Text
a} :: GetResourceDefinitionResponse)
getResourceDefinitionResponse_tags :: Lens.Lens' GetResourceDefinitionResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
getResourceDefinitionResponse_tags :: Lens' GetResourceDefinitionResponse (Maybe (HashMap Text Text))
getResourceDefinitionResponse_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Maybe (HashMap Text Text)
a -> GetResourceDefinitionResponse
s {$sel:tags:GetResourceDefinitionResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: GetResourceDefinitionResponse) 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
getResourceDefinitionResponse_httpStatus :: Lens.Lens' GetResourceDefinitionResponse Prelude.Int
getResourceDefinitionResponse_httpStatus :: Lens' GetResourceDefinitionResponse Int
getResourceDefinitionResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetResourceDefinitionResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetResourceDefinitionResponse
s@GetResourceDefinitionResponse' {} Int
a -> GetResourceDefinitionResponse
s {$sel:httpStatus:GetResourceDefinitionResponse' :: Int
httpStatus = Int
a} :: GetResourceDefinitionResponse)
instance Prelude.NFData GetResourceDefinitionResponse where
rnf :: GetResourceDefinitionResponse -> ()
rnf GetResourceDefinitionResponse' {Int
Maybe Text
Maybe (HashMap Text Text)
httpStatus :: Int
tags :: Maybe (HashMap Text Text)
name :: Maybe Text
latestVersionArn :: Maybe Text
latestVersion :: Maybe Text
lastUpdatedTimestamp :: Maybe Text
id :: Maybe Text
creationTimestamp :: Maybe Text
arn :: Maybe Text
$sel:httpStatus:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Int
$sel:tags:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe (HashMap Text Text)
$sel:name:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
$sel:latestVersionArn:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
$sel:latestVersion:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
$sel:lastUpdatedTimestamp:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
$sel:id:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
$sel:creationTimestamp:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> Maybe Text
$sel:arn:GetResourceDefinitionResponse' :: GetResourceDefinitionResponse -> 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
lastUpdatedTimestamp
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
latestVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
latestVersionArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus