{-# 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.GetCoreDefinition
(
GetCoreDefinition (..),
newGetCoreDefinition,
getCoreDefinition_coreDefinitionId,
GetCoreDefinitionResponse (..),
newGetCoreDefinitionResponse,
getCoreDefinitionResponse_arn,
getCoreDefinitionResponse_creationTimestamp,
getCoreDefinitionResponse_id,
getCoreDefinitionResponse_lastUpdatedTimestamp,
getCoreDefinitionResponse_latestVersion,
getCoreDefinitionResponse_latestVersionArn,
getCoreDefinitionResponse_name,
getCoreDefinitionResponse_tags,
getCoreDefinitionResponse_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 GetCoreDefinition = GetCoreDefinition'
{
GetCoreDefinition -> Text
coreDefinitionId :: Prelude.Text
}
deriving (GetCoreDefinition -> GetCoreDefinition -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetCoreDefinition -> GetCoreDefinition -> Bool
$c/= :: GetCoreDefinition -> GetCoreDefinition -> Bool
== :: GetCoreDefinition -> GetCoreDefinition -> Bool
$c== :: GetCoreDefinition -> GetCoreDefinition -> Bool
Prelude.Eq, ReadPrec [GetCoreDefinition]
ReadPrec GetCoreDefinition
Int -> ReadS GetCoreDefinition
ReadS [GetCoreDefinition]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetCoreDefinition]
$creadListPrec :: ReadPrec [GetCoreDefinition]
readPrec :: ReadPrec GetCoreDefinition
$creadPrec :: ReadPrec GetCoreDefinition
readList :: ReadS [GetCoreDefinition]
$creadList :: ReadS [GetCoreDefinition]
readsPrec :: Int -> ReadS GetCoreDefinition
$creadsPrec :: Int -> ReadS GetCoreDefinition
Prelude.Read, Int -> GetCoreDefinition -> ShowS
[GetCoreDefinition] -> ShowS
GetCoreDefinition -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetCoreDefinition] -> ShowS
$cshowList :: [GetCoreDefinition] -> ShowS
show :: GetCoreDefinition -> String
$cshow :: GetCoreDefinition -> String
showsPrec :: Int -> GetCoreDefinition -> ShowS
$cshowsPrec :: Int -> GetCoreDefinition -> ShowS
Prelude.Show, forall x. Rep GetCoreDefinition x -> GetCoreDefinition
forall x. GetCoreDefinition -> Rep GetCoreDefinition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep GetCoreDefinition x -> GetCoreDefinition
$cfrom :: forall x. GetCoreDefinition -> Rep GetCoreDefinition x
Prelude.Generic)
newGetCoreDefinition ::
Prelude.Text ->
GetCoreDefinition
newGetCoreDefinition :: Text -> GetCoreDefinition
newGetCoreDefinition Text
pCoreDefinitionId_ =
GetCoreDefinition'
{ $sel:coreDefinitionId:GetCoreDefinition' :: Text
coreDefinitionId =
Text
pCoreDefinitionId_
}
getCoreDefinition_coreDefinitionId :: Lens.Lens' GetCoreDefinition Prelude.Text
getCoreDefinition_coreDefinitionId :: Lens' GetCoreDefinition Text
getCoreDefinition_coreDefinitionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinition' {Text
coreDefinitionId :: Text
$sel:coreDefinitionId:GetCoreDefinition' :: GetCoreDefinition -> Text
coreDefinitionId} -> Text
coreDefinitionId) (\s :: GetCoreDefinition
s@GetCoreDefinition' {} Text
a -> GetCoreDefinition
s {$sel:coreDefinitionId:GetCoreDefinition' :: Text
coreDefinitionId = Text
a} :: GetCoreDefinition)
instance Core.AWSRequest GetCoreDefinition where
type
AWSResponse GetCoreDefinition =
GetCoreDefinitionResponse
request :: (Service -> Service)
-> GetCoreDefinition -> Request GetCoreDefinition
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 GetCoreDefinition
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetCoreDefinition)))
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
-> GetCoreDefinitionResponse
GetCoreDefinitionResponse'
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 GetCoreDefinition where
hashWithSalt :: Int -> GetCoreDefinition -> Int
hashWithSalt Int
_salt GetCoreDefinition' {Text
coreDefinitionId :: Text
$sel:coreDefinitionId:GetCoreDefinition' :: GetCoreDefinition -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
coreDefinitionId
instance Prelude.NFData GetCoreDefinition where
rnf :: GetCoreDefinition -> ()
rnf GetCoreDefinition' {Text
coreDefinitionId :: Text
$sel:coreDefinitionId:GetCoreDefinition' :: GetCoreDefinition -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
coreDefinitionId
instance Data.ToHeaders GetCoreDefinition where
toHeaders :: GetCoreDefinition -> 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 GetCoreDefinition where
toPath :: GetCoreDefinition -> ByteString
toPath GetCoreDefinition' {Text
coreDefinitionId :: Text
$sel:coreDefinitionId:GetCoreDefinition' :: GetCoreDefinition -> Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/greengrass/definition/cores/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
coreDefinitionId
]
instance Data.ToQuery GetCoreDefinition where
toQuery :: GetCoreDefinition -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data GetCoreDefinitionResponse = GetCoreDefinitionResponse'
{
GetCoreDefinitionResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe Text
creationTimestamp :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe Text
lastUpdatedTimestamp :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe Text
latestVersion :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe Text
latestVersionArn :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
GetCoreDefinitionResponse -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
GetCoreDefinitionResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetCoreDefinitionResponse -> GetCoreDefinitionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetCoreDefinitionResponse -> GetCoreDefinitionResponse -> Bool
$c/= :: GetCoreDefinitionResponse -> GetCoreDefinitionResponse -> Bool
== :: GetCoreDefinitionResponse -> GetCoreDefinitionResponse -> Bool
$c== :: GetCoreDefinitionResponse -> GetCoreDefinitionResponse -> Bool
Prelude.Eq, ReadPrec [GetCoreDefinitionResponse]
ReadPrec GetCoreDefinitionResponse
Int -> ReadS GetCoreDefinitionResponse
ReadS [GetCoreDefinitionResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetCoreDefinitionResponse]
$creadListPrec :: ReadPrec [GetCoreDefinitionResponse]
readPrec :: ReadPrec GetCoreDefinitionResponse
$creadPrec :: ReadPrec GetCoreDefinitionResponse
readList :: ReadS [GetCoreDefinitionResponse]
$creadList :: ReadS [GetCoreDefinitionResponse]
readsPrec :: Int -> ReadS GetCoreDefinitionResponse
$creadsPrec :: Int -> ReadS GetCoreDefinitionResponse
Prelude.Read, Int -> GetCoreDefinitionResponse -> ShowS
[GetCoreDefinitionResponse] -> ShowS
GetCoreDefinitionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetCoreDefinitionResponse] -> ShowS
$cshowList :: [GetCoreDefinitionResponse] -> ShowS
show :: GetCoreDefinitionResponse -> String
$cshow :: GetCoreDefinitionResponse -> String
showsPrec :: Int -> GetCoreDefinitionResponse -> ShowS
$cshowsPrec :: Int -> GetCoreDefinitionResponse -> ShowS
Prelude.Show, forall x.
Rep GetCoreDefinitionResponse x -> GetCoreDefinitionResponse
forall x.
GetCoreDefinitionResponse -> Rep GetCoreDefinitionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetCoreDefinitionResponse x -> GetCoreDefinitionResponse
$cfrom :: forall x.
GetCoreDefinitionResponse -> Rep GetCoreDefinitionResponse x
Prelude.Generic)
newGetCoreDefinitionResponse ::
Prelude.Int ->
GetCoreDefinitionResponse
newGetCoreDefinitionResponse :: Int -> GetCoreDefinitionResponse
newGetCoreDefinitionResponse Int
pHttpStatus_ =
GetCoreDefinitionResponse'
{ $sel:arn:GetCoreDefinitionResponse' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:creationTimestamp:GetCoreDefinitionResponse' :: Maybe Text
creationTimestamp = forall a. Maybe a
Prelude.Nothing,
$sel:id:GetCoreDefinitionResponse' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
$sel:lastUpdatedTimestamp:GetCoreDefinitionResponse' :: Maybe Text
lastUpdatedTimestamp = forall a. Maybe a
Prelude.Nothing,
$sel:latestVersion:GetCoreDefinitionResponse' :: Maybe Text
latestVersion = forall a. Maybe a
Prelude.Nothing,
$sel:latestVersionArn:GetCoreDefinitionResponse' :: Maybe Text
latestVersionArn = forall a. Maybe a
Prelude.Nothing,
$sel:name:GetCoreDefinitionResponse' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:tags:GetCoreDefinitionResponse' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetCoreDefinitionResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getCoreDefinitionResponse_arn :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_arn :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:arn:GetCoreDefinitionResponse' :: Maybe Text
arn = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_creationTimestamp :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_creationTimestamp :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_creationTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
creationTimestamp :: Maybe Text
$sel:creationTimestamp:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
creationTimestamp} -> Maybe Text
creationTimestamp) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:creationTimestamp:GetCoreDefinitionResponse' :: Maybe Text
creationTimestamp = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_id :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_id :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
id :: Maybe Text
$sel:id:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:id:GetCoreDefinitionResponse' :: Maybe Text
id = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_lastUpdatedTimestamp :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_lastUpdatedTimestamp :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_lastUpdatedTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
lastUpdatedTimestamp :: Maybe Text
$sel:lastUpdatedTimestamp:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
lastUpdatedTimestamp} -> Maybe Text
lastUpdatedTimestamp) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:lastUpdatedTimestamp:GetCoreDefinitionResponse' :: Maybe Text
lastUpdatedTimestamp = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_latestVersion :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_latestVersion :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_latestVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
latestVersion :: Maybe Text
$sel:latestVersion:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
latestVersion} -> Maybe Text
latestVersion) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:latestVersion:GetCoreDefinitionResponse' :: Maybe Text
latestVersion = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_latestVersionArn :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_latestVersionArn :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_latestVersionArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
latestVersionArn :: Maybe Text
$sel:latestVersionArn:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
latestVersionArn} -> Maybe Text
latestVersionArn) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:latestVersionArn:GetCoreDefinitionResponse' :: Maybe Text
latestVersionArn = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_name :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe Prelude.Text)
getCoreDefinitionResponse_name :: Lens' GetCoreDefinitionResponse (Maybe Text)
getCoreDefinitionResponse_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe Text
name :: Maybe Text
$sel:name:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe Text
a -> GetCoreDefinitionResponse
s {$sel:name:GetCoreDefinitionResponse' :: Maybe Text
name = Maybe Text
a} :: GetCoreDefinitionResponse)
getCoreDefinitionResponse_tags :: Lens.Lens' GetCoreDefinitionResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
getCoreDefinitionResponse_tags :: Lens' GetCoreDefinitionResponse (Maybe (HashMap Text Text))
getCoreDefinitionResponse_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Maybe (HashMap Text Text)
a -> GetCoreDefinitionResponse
s {$sel:tags:GetCoreDefinitionResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: GetCoreDefinitionResponse) 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
getCoreDefinitionResponse_httpStatus :: Lens.Lens' GetCoreDefinitionResponse Prelude.Int
getCoreDefinitionResponse_httpStatus :: Lens' GetCoreDefinitionResponse Int
getCoreDefinitionResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetCoreDefinitionResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetCoreDefinitionResponse
s@GetCoreDefinitionResponse' {} Int
a -> GetCoreDefinitionResponse
s {$sel:httpStatus:GetCoreDefinitionResponse' :: Int
httpStatus = Int
a} :: GetCoreDefinitionResponse)
instance Prelude.NFData GetCoreDefinitionResponse where
rnf :: GetCoreDefinitionResponse -> ()
rnf GetCoreDefinitionResponse' {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:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Int
$sel:tags:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe (HashMap Text Text)
$sel:name:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
$sel:latestVersionArn:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
$sel:latestVersion:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
$sel:lastUpdatedTimestamp:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
$sel:id:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
$sel:creationTimestamp:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> Maybe Text
$sel:arn:GetCoreDefinitionResponse' :: GetCoreDefinitionResponse -> 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