{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.RDS.Types.BlueGreenDeployment 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 Amazonka.RDS.Types.BlueGreenDeploymentTask
import Amazonka.RDS.Types.SwitchoverDetail
import Amazonka.RDS.Types.Tag
data BlueGreenDeployment = BlueGreenDeployment'
{
BlueGreenDeployment -> Maybe Text
blueGreenDeploymentIdentifier :: Prelude.Maybe Prelude.Text,
BlueGreenDeployment -> Maybe Text
blueGreenDeploymentName :: Prelude.Maybe Prelude.Text,
BlueGreenDeployment -> Maybe ISO8601
createTime :: Prelude.Maybe Data.ISO8601,
BlueGreenDeployment -> Maybe ISO8601
deleteTime :: Prelude.Maybe Data.ISO8601,
BlueGreenDeployment -> Maybe Text
source :: Prelude.Maybe Prelude.Text,
BlueGreenDeployment -> Maybe Text
status :: Prelude.Maybe Prelude.Text,
BlueGreenDeployment -> Maybe Text
statusDetails :: Prelude.Maybe Prelude.Text,
BlueGreenDeployment -> Maybe [SwitchoverDetail]
switchoverDetails :: Prelude.Maybe [SwitchoverDetail],
BlueGreenDeployment -> Maybe [Tag]
tagList :: Prelude.Maybe [Tag],
BlueGreenDeployment -> Maybe Text
target :: Prelude.Maybe Prelude.Text,
BlueGreenDeployment -> Maybe [BlueGreenDeploymentTask]
tasks :: Prelude.Maybe [BlueGreenDeploymentTask]
}
deriving (BlueGreenDeployment -> BlueGreenDeployment -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BlueGreenDeployment -> BlueGreenDeployment -> Bool
$c/= :: BlueGreenDeployment -> BlueGreenDeployment -> Bool
== :: BlueGreenDeployment -> BlueGreenDeployment -> Bool
$c== :: BlueGreenDeployment -> BlueGreenDeployment -> Bool
Prelude.Eq, ReadPrec [BlueGreenDeployment]
ReadPrec BlueGreenDeployment
Int -> ReadS BlueGreenDeployment
ReadS [BlueGreenDeployment]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [BlueGreenDeployment]
$creadListPrec :: ReadPrec [BlueGreenDeployment]
readPrec :: ReadPrec BlueGreenDeployment
$creadPrec :: ReadPrec BlueGreenDeployment
readList :: ReadS [BlueGreenDeployment]
$creadList :: ReadS [BlueGreenDeployment]
readsPrec :: Int -> ReadS BlueGreenDeployment
$creadsPrec :: Int -> ReadS BlueGreenDeployment
Prelude.Read, Int -> BlueGreenDeployment -> ShowS
[BlueGreenDeployment] -> ShowS
BlueGreenDeployment -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BlueGreenDeployment] -> ShowS
$cshowList :: [BlueGreenDeployment] -> ShowS
show :: BlueGreenDeployment -> String
$cshow :: BlueGreenDeployment -> String
showsPrec :: Int -> BlueGreenDeployment -> ShowS
$cshowsPrec :: Int -> BlueGreenDeployment -> ShowS
Prelude.Show, forall x. Rep BlueGreenDeployment x -> BlueGreenDeployment
forall x. BlueGreenDeployment -> Rep BlueGreenDeployment x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BlueGreenDeployment x -> BlueGreenDeployment
$cfrom :: forall x. BlueGreenDeployment -> Rep BlueGreenDeployment x
Prelude.Generic)
newBlueGreenDeployment ::
BlueGreenDeployment
newBlueGreenDeployment :: BlueGreenDeployment
newBlueGreenDeployment =
BlueGreenDeployment'
{ $sel:blueGreenDeploymentIdentifier:BlueGreenDeployment' :: Maybe Text
blueGreenDeploymentIdentifier =
forall a. Maybe a
Prelude.Nothing,
$sel:blueGreenDeploymentName:BlueGreenDeployment' :: Maybe Text
blueGreenDeploymentName = forall a. Maybe a
Prelude.Nothing,
$sel:createTime:BlueGreenDeployment' :: Maybe ISO8601
createTime = forall a. Maybe a
Prelude.Nothing,
$sel:deleteTime:BlueGreenDeployment' :: Maybe ISO8601
deleteTime = forall a. Maybe a
Prelude.Nothing,
$sel:source:BlueGreenDeployment' :: Maybe Text
source = forall a. Maybe a
Prelude.Nothing,
$sel:status:BlueGreenDeployment' :: Maybe Text
status = forall a. Maybe a
Prelude.Nothing,
$sel:statusDetails:BlueGreenDeployment' :: Maybe Text
statusDetails = forall a. Maybe a
Prelude.Nothing,
$sel:switchoverDetails:BlueGreenDeployment' :: Maybe [SwitchoverDetail]
switchoverDetails = forall a. Maybe a
Prelude.Nothing,
$sel:tagList:BlueGreenDeployment' :: Maybe [Tag]
tagList = forall a. Maybe a
Prelude.Nothing,
$sel:target:BlueGreenDeployment' :: Maybe Text
target = forall a. Maybe a
Prelude.Nothing,
$sel:tasks:BlueGreenDeployment' :: Maybe [BlueGreenDeploymentTask]
tasks = forall a. Maybe a
Prelude.Nothing
}
blueGreenDeployment_blueGreenDeploymentIdentifier :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.Text)
blueGreenDeployment_blueGreenDeploymentIdentifier :: Lens' BlueGreenDeployment (Maybe Text)
blueGreenDeployment_blueGreenDeploymentIdentifier = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe Text
blueGreenDeploymentIdentifier :: Maybe Text
$sel:blueGreenDeploymentIdentifier:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
blueGreenDeploymentIdentifier} -> Maybe Text
blueGreenDeploymentIdentifier) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe Text
a -> BlueGreenDeployment
s {$sel:blueGreenDeploymentIdentifier:BlueGreenDeployment' :: Maybe Text
blueGreenDeploymentIdentifier = Maybe Text
a} :: BlueGreenDeployment)
blueGreenDeployment_blueGreenDeploymentName :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.Text)
blueGreenDeployment_blueGreenDeploymentName :: Lens' BlueGreenDeployment (Maybe Text)
blueGreenDeployment_blueGreenDeploymentName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe Text
blueGreenDeploymentName :: Maybe Text
$sel:blueGreenDeploymentName:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
blueGreenDeploymentName} -> Maybe Text
blueGreenDeploymentName) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe Text
a -> BlueGreenDeployment
s {$sel:blueGreenDeploymentName:BlueGreenDeployment' :: Maybe Text
blueGreenDeploymentName = Maybe Text
a} :: BlueGreenDeployment)
blueGreenDeployment_createTime :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.UTCTime)
blueGreenDeployment_createTime :: Lens' BlueGreenDeployment (Maybe UTCTime)
blueGreenDeployment_createTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe ISO8601
createTime :: Maybe ISO8601
$sel:createTime:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe ISO8601
createTime} -> Maybe ISO8601
createTime) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe ISO8601
a -> BlueGreenDeployment
s {$sel:createTime:BlueGreenDeployment' :: Maybe ISO8601
createTime = Maybe ISO8601
a} :: BlueGreenDeployment) 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 :: Format). Iso' (Time a) UTCTime
Data._Time
blueGreenDeployment_deleteTime :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.UTCTime)
blueGreenDeployment_deleteTime :: Lens' BlueGreenDeployment (Maybe UTCTime)
blueGreenDeployment_deleteTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe ISO8601
deleteTime :: Maybe ISO8601
$sel:deleteTime:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe ISO8601
deleteTime} -> Maybe ISO8601
deleteTime) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe ISO8601
a -> BlueGreenDeployment
s {$sel:deleteTime:BlueGreenDeployment' :: Maybe ISO8601
deleteTime = Maybe ISO8601
a} :: BlueGreenDeployment) 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 :: Format). Iso' (Time a) UTCTime
Data._Time
blueGreenDeployment_source :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.Text)
blueGreenDeployment_source :: Lens' BlueGreenDeployment (Maybe Text)
blueGreenDeployment_source = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe Text
source :: Maybe Text
$sel:source:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
source} -> Maybe Text
source) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe Text
a -> BlueGreenDeployment
s {$sel:source:BlueGreenDeployment' :: Maybe Text
source = Maybe Text
a} :: BlueGreenDeployment)
blueGreenDeployment_status :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.Text)
blueGreenDeployment_status :: Lens' BlueGreenDeployment (Maybe Text)
blueGreenDeployment_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe Text
status :: Maybe Text
$sel:status:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
status} -> Maybe Text
status) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe Text
a -> BlueGreenDeployment
s {$sel:status:BlueGreenDeployment' :: Maybe Text
status = Maybe Text
a} :: BlueGreenDeployment)
blueGreenDeployment_statusDetails :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.Text)
blueGreenDeployment_statusDetails :: Lens' BlueGreenDeployment (Maybe Text)
blueGreenDeployment_statusDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe Text
statusDetails :: Maybe Text
$sel:statusDetails:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
statusDetails} -> Maybe Text
statusDetails) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe Text
a -> BlueGreenDeployment
s {$sel:statusDetails:BlueGreenDeployment' :: Maybe Text
statusDetails = Maybe Text
a} :: BlueGreenDeployment)
blueGreenDeployment_switchoverDetails :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe [SwitchoverDetail])
blueGreenDeployment_switchoverDetails :: Lens' BlueGreenDeployment (Maybe [SwitchoverDetail])
blueGreenDeployment_switchoverDetails = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe [SwitchoverDetail]
switchoverDetails :: Maybe [SwitchoverDetail]
$sel:switchoverDetails:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [SwitchoverDetail]
switchoverDetails} -> Maybe [SwitchoverDetail]
switchoverDetails) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe [SwitchoverDetail]
a -> BlueGreenDeployment
s {$sel:switchoverDetails:BlueGreenDeployment' :: Maybe [SwitchoverDetail]
switchoverDetails = Maybe [SwitchoverDetail]
a} :: BlueGreenDeployment) 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
blueGreenDeployment_tagList :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe [Tag])
blueGreenDeployment_tagList :: Lens' BlueGreenDeployment (Maybe [Tag])
blueGreenDeployment_tagList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe [Tag]
tagList :: Maybe [Tag]
$sel:tagList:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [Tag]
tagList} -> Maybe [Tag]
tagList) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe [Tag]
a -> BlueGreenDeployment
s {$sel:tagList:BlueGreenDeployment' :: Maybe [Tag]
tagList = Maybe [Tag]
a} :: BlueGreenDeployment) 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
blueGreenDeployment_target :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe Prelude.Text)
blueGreenDeployment_target :: Lens' BlueGreenDeployment (Maybe Text)
blueGreenDeployment_target = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe Text
target :: Maybe Text
$sel:target:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
target} -> Maybe Text
target) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe Text
a -> BlueGreenDeployment
s {$sel:target:BlueGreenDeployment' :: Maybe Text
target = Maybe Text
a} :: BlueGreenDeployment)
blueGreenDeployment_tasks :: Lens.Lens' BlueGreenDeployment (Prelude.Maybe [BlueGreenDeploymentTask])
blueGreenDeployment_tasks :: Lens' BlueGreenDeployment (Maybe [BlueGreenDeploymentTask])
blueGreenDeployment_tasks = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\BlueGreenDeployment' {Maybe [BlueGreenDeploymentTask]
tasks :: Maybe [BlueGreenDeploymentTask]
$sel:tasks:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [BlueGreenDeploymentTask]
tasks} -> Maybe [BlueGreenDeploymentTask]
tasks) (\s :: BlueGreenDeployment
s@BlueGreenDeployment' {} Maybe [BlueGreenDeploymentTask]
a -> BlueGreenDeployment
s {$sel:tasks:BlueGreenDeployment' :: Maybe [BlueGreenDeploymentTask]
tasks = Maybe [BlueGreenDeploymentTask]
a} :: BlueGreenDeployment) 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
instance Data.FromXML BlueGreenDeployment where
parseXML :: [Node] -> Either String BlueGreenDeployment
parseXML [Node]
x =
Maybe Text
-> Maybe Text
-> Maybe ISO8601
-> Maybe ISO8601
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe [SwitchoverDetail]
-> Maybe [Tag]
-> Maybe Text
-> Maybe [BlueGreenDeploymentTask]
-> BlueGreenDeployment
BlueGreenDeployment'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"BlueGreenDeploymentIdentifier")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"BlueGreenDeploymentName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"CreateTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"DeleteTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"Source")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"Status")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"StatusDetails")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( [Node]
x
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"SwitchoverDetails"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may (forall a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"member")
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( [Node]
x
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"TagList"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may (forall a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"Tag")
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"Target")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( [Node]
x
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"Tasks"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
Prelude.>>= forall (f :: * -> *) a b.
Applicative f =>
([a] -> f b) -> [a] -> f (Maybe b)
Core.may (forall a. FromXML a => Text -> [Node] -> Either String [a]
Data.parseXMLList Text
"member")
)
instance Prelude.Hashable BlueGreenDeployment where
hashWithSalt :: Int -> BlueGreenDeployment -> Int
hashWithSalt Int
_salt BlueGreenDeployment' {Maybe [BlueGreenDeploymentTask]
Maybe [SwitchoverDetail]
Maybe [Tag]
Maybe Text
Maybe ISO8601
tasks :: Maybe [BlueGreenDeploymentTask]
target :: Maybe Text
tagList :: Maybe [Tag]
switchoverDetails :: Maybe [SwitchoverDetail]
statusDetails :: Maybe Text
status :: Maybe Text
source :: Maybe Text
deleteTime :: Maybe ISO8601
createTime :: Maybe ISO8601
blueGreenDeploymentName :: Maybe Text
blueGreenDeploymentIdentifier :: Maybe Text
$sel:tasks:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [BlueGreenDeploymentTask]
$sel:target:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:tagList:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [Tag]
$sel:switchoverDetails:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [SwitchoverDetail]
$sel:statusDetails:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:status:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:source:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:deleteTime:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe ISO8601
$sel:createTime:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe ISO8601
$sel:blueGreenDeploymentName:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:blueGreenDeploymentIdentifier:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
blueGreenDeploymentIdentifier
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
blueGreenDeploymentName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ISO8601
createTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ISO8601
deleteTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
source
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
status
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
statusDetails
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [SwitchoverDetail]
switchoverDetails
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tagList
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
target
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [BlueGreenDeploymentTask]
tasks
instance Prelude.NFData BlueGreenDeployment where
rnf :: BlueGreenDeployment -> ()
rnf BlueGreenDeployment' {Maybe [BlueGreenDeploymentTask]
Maybe [SwitchoverDetail]
Maybe [Tag]
Maybe Text
Maybe ISO8601
tasks :: Maybe [BlueGreenDeploymentTask]
target :: Maybe Text
tagList :: Maybe [Tag]
switchoverDetails :: Maybe [SwitchoverDetail]
statusDetails :: Maybe Text
status :: Maybe Text
source :: Maybe Text
deleteTime :: Maybe ISO8601
createTime :: Maybe ISO8601
blueGreenDeploymentName :: Maybe Text
blueGreenDeploymentIdentifier :: Maybe Text
$sel:tasks:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [BlueGreenDeploymentTask]
$sel:target:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:tagList:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [Tag]
$sel:switchoverDetails:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe [SwitchoverDetail]
$sel:statusDetails:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:status:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:source:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:deleteTime:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe ISO8601
$sel:createTime:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe ISO8601
$sel:blueGreenDeploymentName:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
$sel:blueGreenDeploymentIdentifier:BlueGreenDeployment' :: BlueGreenDeployment -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
blueGreenDeploymentIdentifier
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
blueGreenDeploymentName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
createTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
deleteTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
source
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
status
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
statusDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [SwitchoverDetail]
switchoverDetails
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Tag]
tagList
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
target
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [BlueGreenDeploymentTask]
tasks