{-# 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.DMS.DescribeReplicationTaskAssessmentRuns
(
DescribeReplicationTaskAssessmentRuns (..),
newDescribeReplicationTaskAssessmentRuns,
describeReplicationTaskAssessmentRuns_filters,
describeReplicationTaskAssessmentRuns_marker,
describeReplicationTaskAssessmentRuns_maxRecords,
DescribeReplicationTaskAssessmentRunsResponse (..),
newDescribeReplicationTaskAssessmentRunsResponse,
describeReplicationTaskAssessmentRunsResponse_marker,
describeReplicationTaskAssessmentRunsResponse_replicationTaskAssessmentRuns,
describeReplicationTaskAssessmentRunsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import Amazonka.DMS.Types
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeReplicationTaskAssessmentRuns = DescribeReplicationTaskAssessmentRuns'
{
DescribeReplicationTaskAssessmentRuns -> Maybe [Filter]
filters :: Prelude.Maybe [Filter],
DescribeReplicationTaskAssessmentRuns -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeReplicationTaskAssessmentRuns -> Maybe Int
maxRecords :: Prelude.Maybe Prelude.Int
}
deriving (DescribeReplicationTaskAssessmentRuns
-> DescribeReplicationTaskAssessmentRuns -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeReplicationTaskAssessmentRuns
-> DescribeReplicationTaskAssessmentRuns -> Bool
$c/= :: DescribeReplicationTaskAssessmentRuns
-> DescribeReplicationTaskAssessmentRuns -> Bool
== :: DescribeReplicationTaskAssessmentRuns
-> DescribeReplicationTaskAssessmentRuns -> Bool
$c== :: DescribeReplicationTaskAssessmentRuns
-> DescribeReplicationTaskAssessmentRuns -> Bool
Prelude.Eq, ReadPrec [DescribeReplicationTaskAssessmentRuns]
ReadPrec DescribeReplicationTaskAssessmentRuns
Int -> ReadS DescribeReplicationTaskAssessmentRuns
ReadS [DescribeReplicationTaskAssessmentRuns]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeReplicationTaskAssessmentRuns]
$creadListPrec :: ReadPrec [DescribeReplicationTaskAssessmentRuns]
readPrec :: ReadPrec DescribeReplicationTaskAssessmentRuns
$creadPrec :: ReadPrec DescribeReplicationTaskAssessmentRuns
readList :: ReadS [DescribeReplicationTaskAssessmentRuns]
$creadList :: ReadS [DescribeReplicationTaskAssessmentRuns]
readsPrec :: Int -> ReadS DescribeReplicationTaskAssessmentRuns
$creadsPrec :: Int -> ReadS DescribeReplicationTaskAssessmentRuns
Prelude.Read, Int -> DescribeReplicationTaskAssessmentRuns -> ShowS
[DescribeReplicationTaskAssessmentRuns] -> ShowS
DescribeReplicationTaskAssessmentRuns -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeReplicationTaskAssessmentRuns] -> ShowS
$cshowList :: [DescribeReplicationTaskAssessmentRuns] -> ShowS
show :: DescribeReplicationTaskAssessmentRuns -> String
$cshow :: DescribeReplicationTaskAssessmentRuns -> String
showsPrec :: Int -> DescribeReplicationTaskAssessmentRuns -> ShowS
$cshowsPrec :: Int -> DescribeReplicationTaskAssessmentRuns -> ShowS
Prelude.Show, forall x.
Rep DescribeReplicationTaskAssessmentRuns x
-> DescribeReplicationTaskAssessmentRuns
forall x.
DescribeReplicationTaskAssessmentRuns
-> Rep DescribeReplicationTaskAssessmentRuns x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeReplicationTaskAssessmentRuns x
-> DescribeReplicationTaskAssessmentRuns
$cfrom :: forall x.
DescribeReplicationTaskAssessmentRuns
-> Rep DescribeReplicationTaskAssessmentRuns x
Prelude.Generic)
newDescribeReplicationTaskAssessmentRuns ::
DescribeReplicationTaskAssessmentRuns
newDescribeReplicationTaskAssessmentRuns :: DescribeReplicationTaskAssessmentRuns
newDescribeReplicationTaskAssessmentRuns =
DescribeReplicationTaskAssessmentRuns'
{ $sel:filters:DescribeReplicationTaskAssessmentRuns' :: Maybe [Filter]
filters =
forall a. Maybe a
Prelude.Nothing,
$sel:marker:DescribeReplicationTaskAssessmentRuns' :: Maybe Text
marker = forall a. Maybe a
Prelude.Nothing,
$sel:maxRecords:DescribeReplicationTaskAssessmentRuns' :: Maybe Int
maxRecords = forall a. Maybe a
Prelude.Nothing
}
describeReplicationTaskAssessmentRuns_filters :: Lens.Lens' DescribeReplicationTaskAssessmentRuns (Prelude.Maybe [Filter])
describeReplicationTaskAssessmentRuns_filters :: Lens' DescribeReplicationTaskAssessmentRuns (Maybe [Filter])
describeReplicationTaskAssessmentRuns_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeReplicationTaskAssessmentRuns' {Maybe [Filter]
filters :: Maybe [Filter]
$sel:filters:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe [Filter]
filters} -> Maybe [Filter]
filters) (\s :: DescribeReplicationTaskAssessmentRuns
s@DescribeReplicationTaskAssessmentRuns' {} Maybe [Filter]
a -> DescribeReplicationTaskAssessmentRuns
s {$sel:filters:DescribeReplicationTaskAssessmentRuns' :: Maybe [Filter]
filters = Maybe [Filter]
a} :: DescribeReplicationTaskAssessmentRuns) 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
describeReplicationTaskAssessmentRuns_marker :: Lens.Lens' DescribeReplicationTaskAssessmentRuns (Prelude.Maybe Prelude.Text)
describeReplicationTaskAssessmentRuns_marker :: Lens' DescribeReplicationTaskAssessmentRuns (Maybe Text)
describeReplicationTaskAssessmentRuns_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeReplicationTaskAssessmentRuns' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeReplicationTaskAssessmentRuns
s@DescribeReplicationTaskAssessmentRuns' {} Maybe Text
a -> DescribeReplicationTaskAssessmentRuns
s {$sel:marker:DescribeReplicationTaskAssessmentRuns' :: Maybe Text
marker = Maybe Text
a} :: DescribeReplicationTaskAssessmentRuns)
describeReplicationTaskAssessmentRuns_maxRecords :: Lens.Lens' DescribeReplicationTaskAssessmentRuns (Prelude.Maybe Prelude.Int)
describeReplicationTaskAssessmentRuns_maxRecords :: Lens' DescribeReplicationTaskAssessmentRuns (Maybe Int)
describeReplicationTaskAssessmentRuns_maxRecords = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeReplicationTaskAssessmentRuns' {Maybe Int
maxRecords :: Maybe Int
$sel:maxRecords:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Int
maxRecords} -> Maybe Int
maxRecords) (\s :: DescribeReplicationTaskAssessmentRuns
s@DescribeReplicationTaskAssessmentRuns' {} Maybe Int
a -> DescribeReplicationTaskAssessmentRuns
s {$sel:maxRecords:DescribeReplicationTaskAssessmentRuns' :: Maybe Int
maxRecords = Maybe Int
a} :: DescribeReplicationTaskAssessmentRuns)
instance
Core.AWSRequest
DescribeReplicationTaskAssessmentRuns
where
type
AWSResponse
DescribeReplicationTaskAssessmentRuns =
DescribeReplicationTaskAssessmentRunsResponse
request :: (Service -> Service)
-> DescribeReplicationTaskAssessmentRuns
-> Request DescribeReplicationTaskAssessmentRuns
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 DescribeReplicationTaskAssessmentRuns
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse DescribeReplicationTaskAssessmentRuns)))
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 [ReplicationTaskAssessmentRun]
-> Int
-> DescribeReplicationTaskAssessmentRunsResponse
DescribeReplicationTaskAssessmentRunsResponse'
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
"Marker")
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
"ReplicationTaskAssessmentRuns"
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
DescribeReplicationTaskAssessmentRuns
where
hashWithSalt :: Int -> DescribeReplicationTaskAssessmentRuns -> Int
hashWithSalt
Int
_salt
DescribeReplicationTaskAssessmentRuns' {Maybe Int
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Int
marker :: Maybe Text
filters :: Maybe [Filter]
$sel:maxRecords:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Int
$sel:marker:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Text
$sel:filters:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe [Filter]
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Filter]
filters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
marker
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxRecords
instance
Prelude.NFData
DescribeReplicationTaskAssessmentRuns
where
rnf :: DescribeReplicationTaskAssessmentRuns -> ()
rnf DescribeReplicationTaskAssessmentRuns' {Maybe Int
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Int
marker :: Maybe Text
filters :: Maybe [Filter]
$sel:maxRecords:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Int
$sel:marker:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Text
$sel:filters:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe [Filter]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [Filter]
filters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxRecords
instance
Data.ToHeaders
DescribeReplicationTaskAssessmentRuns
where
toHeaders :: DescribeReplicationTaskAssessmentRuns -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"AmazonDMSv20160101.DescribeReplicationTaskAssessmentRuns" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance
Data.ToJSON
DescribeReplicationTaskAssessmentRuns
where
toJSON :: DescribeReplicationTaskAssessmentRuns -> Value
toJSON DescribeReplicationTaskAssessmentRuns' {Maybe Int
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Int
marker :: Maybe Text
filters :: Maybe [Filter]
$sel:maxRecords:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Int
$sel:marker:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe Text
$sel:filters:DescribeReplicationTaskAssessmentRuns' :: DescribeReplicationTaskAssessmentRuns -> Maybe [Filter]
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"Filters" 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 [Filter]
filters,
(Key
"Marker" 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
marker,
(Key
"MaxRecords" 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 Int
maxRecords
]
)
instance
Data.ToPath
DescribeReplicationTaskAssessmentRuns
where
toPath :: DescribeReplicationTaskAssessmentRuns -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DescribeReplicationTaskAssessmentRuns
where
toQuery :: DescribeReplicationTaskAssessmentRuns -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeReplicationTaskAssessmentRunsResponse = DescribeReplicationTaskAssessmentRunsResponse'
{
DescribeReplicationTaskAssessmentRunsResponse -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeReplicationTaskAssessmentRunsResponse
-> Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns :: Prelude.Maybe [ReplicationTaskAssessmentRun],
DescribeReplicationTaskAssessmentRunsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeReplicationTaskAssessmentRunsResponse
-> DescribeReplicationTaskAssessmentRunsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeReplicationTaskAssessmentRunsResponse
-> DescribeReplicationTaskAssessmentRunsResponse -> Bool
$c/= :: DescribeReplicationTaskAssessmentRunsResponse
-> DescribeReplicationTaskAssessmentRunsResponse -> Bool
== :: DescribeReplicationTaskAssessmentRunsResponse
-> DescribeReplicationTaskAssessmentRunsResponse -> Bool
$c== :: DescribeReplicationTaskAssessmentRunsResponse
-> DescribeReplicationTaskAssessmentRunsResponse -> Bool
Prelude.Eq, ReadPrec [DescribeReplicationTaskAssessmentRunsResponse]
ReadPrec DescribeReplicationTaskAssessmentRunsResponse
Int -> ReadS DescribeReplicationTaskAssessmentRunsResponse
ReadS [DescribeReplicationTaskAssessmentRunsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeReplicationTaskAssessmentRunsResponse]
$creadListPrec :: ReadPrec [DescribeReplicationTaskAssessmentRunsResponse]
readPrec :: ReadPrec DescribeReplicationTaskAssessmentRunsResponse
$creadPrec :: ReadPrec DescribeReplicationTaskAssessmentRunsResponse
readList :: ReadS [DescribeReplicationTaskAssessmentRunsResponse]
$creadList :: ReadS [DescribeReplicationTaskAssessmentRunsResponse]
readsPrec :: Int -> ReadS DescribeReplicationTaskAssessmentRunsResponse
$creadsPrec :: Int -> ReadS DescribeReplicationTaskAssessmentRunsResponse
Prelude.Read, Int -> DescribeReplicationTaskAssessmentRunsResponse -> ShowS
[DescribeReplicationTaskAssessmentRunsResponse] -> ShowS
DescribeReplicationTaskAssessmentRunsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeReplicationTaskAssessmentRunsResponse] -> ShowS
$cshowList :: [DescribeReplicationTaskAssessmentRunsResponse] -> ShowS
show :: DescribeReplicationTaskAssessmentRunsResponse -> String
$cshow :: DescribeReplicationTaskAssessmentRunsResponse -> String
showsPrec :: Int -> DescribeReplicationTaskAssessmentRunsResponse -> ShowS
$cshowsPrec :: Int -> DescribeReplicationTaskAssessmentRunsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeReplicationTaskAssessmentRunsResponse x
-> DescribeReplicationTaskAssessmentRunsResponse
forall x.
DescribeReplicationTaskAssessmentRunsResponse
-> Rep DescribeReplicationTaskAssessmentRunsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeReplicationTaskAssessmentRunsResponse x
-> DescribeReplicationTaskAssessmentRunsResponse
$cfrom :: forall x.
DescribeReplicationTaskAssessmentRunsResponse
-> Rep DescribeReplicationTaskAssessmentRunsResponse x
Prelude.Generic)
newDescribeReplicationTaskAssessmentRunsResponse ::
Prelude.Int ->
DescribeReplicationTaskAssessmentRunsResponse
newDescribeReplicationTaskAssessmentRunsResponse :: Int -> DescribeReplicationTaskAssessmentRunsResponse
newDescribeReplicationTaskAssessmentRunsResponse
Int
pHttpStatus_ =
DescribeReplicationTaskAssessmentRunsResponse'
{ $sel:marker:DescribeReplicationTaskAssessmentRunsResponse' :: Maybe Text
marker =
forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskAssessmentRuns:DescribeReplicationTaskAssessmentRunsResponse' :: Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeReplicationTaskAssessmentRunsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeReplicationTaskAssessmentRunsResponse_marker :: Lens.Lens' DescribeReplicationTaskAssessmentRunsResponse (Prelude.Maybe Prelude.Text)
describeReplicationTaskAssessmentRunsResponse_marker :: Lens' DescribeReplicationTaskAssessmentRunsResponse (Maybe Text)
describeReplicationTaskAssessmentRunsResponse_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeReplicationTaskAssessmentRunsResponse' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeReplicationTaskAssessmentRunsResponse' :: DescribeReplicationTaskAssessmentRunsResponse -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeReplicationTaskAssessmentRunsResponse
s@DescribeReplicationTaskAssessmentRunsResponse' {} Maybe Text
a -> DescribeReplicationTaskAssessmentRunsResponse
s {$sel:marker:DescribeReplicationTaskAssessmentRunsResponse' :: Maybe Text
marker = Maybe Text
a} :: DescribeReplicationTaskAssessmentRunsResponse)
describeReplicationTaskAssessmentRunsResponse_replicationTaskAssessmentRuns :: Lens.Lens' DescribeReplicationTaskAssessmentRunsResponse (Prelude.Maybe [ReplicationTaskAssessmentRun])
describeReplicationTaskAssessmentRunsResponse_replicationTaskAssessmentRuns :: Lens'
DescribeReplicationTaskAssessmentRunsResponse
(Maybe [ReplicationTaskAssessmentRun])
describeReplicationTaskAssessmentRunsResponse_replicationTaskAssessmentRuns = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeReplicationTaskAssessmentRunsResponse' {Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns :: Maybe [ReplicationTaskAssessmentRun]
$sel:replicationTaskAssessmentRuns:DescribeReplicationTaskAssessmentRunsResponse' :: DescribeReplicationTaskAssessmentRunsResponse
-> Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns} -> Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns) (\s :: DescribeReplicationTaskAssessmentRunsResponse
s@DescribeReplicationTaskAssessmentRunsResponse' {} Maybe [ReplicationTaskAssessmentRun]
a -> DescribeReplicationTaskAssessmentRunsResponse
s {$sel:replicationTaskAssessmentRuns:DescribeReplicationTaskAssessmentRunsResponse' :: Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns = Maybe [ReplicationTaskAssessmentRun]
a} :: DescribeReplicationTaskAssessmentRunsResponse) 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
describeReplicationTaskAssessmentRunsResponse_httpStatus :: Lens.Lens' DescribeReplicationTaskAssessmentRunsResponse Prelude.Int
describeReplicationTaskAssessmentRunsResponse_httpStatus :: Lens' DescribeReplicationTaskAssessmentRunsResponse Int
describeReplicationTaskAssessmentRunsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeReplicationTaskAssessmentRunsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeReplicationTaskAssessmentRunsResponse' :: DescribeReplicationTaskAssessmentRunsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeReplicationTaskAssessmentRunsResponse
s@DescribeReplicationTaskAssessmentRunsResponse' {} Int
a -> DescribeReplicationTaskAssessmentRunsResponse
s {$sel:httpStatus:DescribeReplicationTaskAssessmentRunsResponse' :: Int
httpStatus = Int
a} :: DescribeReplicationTaskAssessmentRunsResponse)
instance
Prelude.NFData
DescribeReplicationTaskAssessmentRunsResponse
where
rnf :: DescribeReplicationTaskAssessmentRunsResponse -> ()
rnf
DescribeReplicationTaskAssessmentRunsResponse' {Int
Maybe [ReplicationTaskAssessmentRun]
Maybe Text
httpStatus :: Int
replicationTaskAssessmentRuns :: Maybe [ReplicationTaskAssessmentRun]
marker :: Maybe Text
$sel:httpStatus:DescribeReplicationTaskAssessmentRunsResponse' :: DescribeReplicationTaskAssessmentRunsResponse -> Int
$sel:replicationTaskAssessmentRuns:DescribeReplicationTaskAssessmentRunsResponse' :: DescribeReplicationTaskAssessmentRunsResponse
-> Maybe [ReplicationTaskAssessmentRun]
$sel:marker:DescribeReplicationTaskAssessmentRunsResponse' :: DescribeReplicationTaskAssessmentRunsResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
marker
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [ReplicationTaskAssessmentRun]
replicationTaskAssessmentRuns
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus