{-# 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.RDS.DescribeDBProxies
(
DescribeDBProxies (..),
newDescribeDBProxies,
describeDBProxies_dbProxyName,
describeDBProxies_filters,
describeDBProxies_marker,
describeDBProxies_maxRecords,
DescribeDBProxiesResponse (..),
newDescribeDBProxiesResponse,
describeDBProxiesResponse_dbProxies,
describeDBProxiesResponse_marker,
describeDBProxiesResponse_httpStatus,
)
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
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeDBProxies = DescribeDBProxies'
{
DescribeDBProxies -> Maybe Text
dbProxyName :: Prelude.Maybe Prelude.Text,
DescribeDBProxies -> Maybe [Filter]
filters :: Prelude.Maybe [Filter],
DescribeDBProxies -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeDBProxies -> Maybe Natural
maxRecords :: Prelude.Maybe Prelude.Natural
}
deriving (DescribeDBProxies -> DescribeDBProxies -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeDBProxies -> DescribeDBProxies -> Bool
$c/= :: DescribeDBProxies -> DescribeDBProxies -> Bool
== :: DescribeDBProxies -> DescribeDBProxies -> Bool
$c== :: DescribeDBProxies -> DescribeDBProxies -> Bool
Prelude.Eq, ReadPrec [DescribeDBProxies]
ReadPrec DescribeDBProxies
Int -> ReadS DescribeDBProxies
ReadS [DescribeDBProxies]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeDBProxies]
$creadListPrec :: ReadPrec [DescribeDBProxies]
readPrec :: ReadPrec DescribeDBProxies
$creadPrec :: ReadPrec DescribeDBProxies
readList :: ReadS [DescribeDBProxies]
$creadList :: ReadS [DescribeDBProxies]
readsPrec :: Int -> ReadS DescribeDBProxies
$creadsPrec :: Int -> ReadS DescribeDBProxies
Prelude.Read, Int -> DescribeDBProxies -> ShowS
[DescribeDBProxies] -> ShowS
DescribeDBProxies -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeDBProxies] -> ShowS
$cshowList :: [DescribeDBProxies] -> ShowS
show :: DescribeDBProxies -> String
$cshow :: DescribeDBProxies -> String
showsPrec :: Int -> DescribeDBProxies -> ShowS
$cshowsPrec :: Int -> DescribeDBProxies -> ShowS
Prelude.Show, forall x. Rep DescribeDBProxies x -> DescribeDBProxies
forall x. DescribeDBProxies -> Rep DescribeDBProxies x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeDBProxies x -> DescribeDBProxies
$cfrom :: forall x. DescribeDBProxies -> Rep DescribeDBProxies x
Prelude.Generic)
newDescribeDBProxies ::
DescribeDBProxies
newDescribeDBProxies :: DescribeDBProxies
newDescribeDBProxies =
DescribeDBProxies'
{ $sel:dbProxyName:DescribeDBProxies' :: Maybe Text
dbProxyName = forall a. Maybe a
Prelude.Nothing,
$sel:filters:DescribeDBProxies' :: Maybe [Filter]
filters = forall a. Maybe a
Prelude.Nothing,
$sel:marker:DescribeDBProxies' :: Maybe Text
marker = forall a. Maybe a
Prelude.Nothing,
$sel:maxRecords:DescribeDBProxies' :: Maybe Natural
maxRecords = forall a. Maybe a
Prelude.Nothing
}
describeDBProxies_dbProxyName :: Lens.Lens' DescribeDBProxies (Prelude.Maybe Prelude.Text)
describeDBProxies_dbProxyName :: Lens' DescribeDBProxies (Maybe Text)
describeDBProxies_dbProxyName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxies' {Maybe Text
dbProxyName :: Maybe Text
$sel:dbProxyName:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
dbProxyName} -> Maybe Text
dbProxyName) (\s :: DescribeDBProxies
s@DescribeDBProxies' {} Maybe Text
a -> DescribeDBProxies
s {$sel:dbProxyName:DescribeDBProxies' :: Maybe Text
dbProxyName = Maybe Text
a} :: DescribeDBProxies)
describeDBProxies_filters :: Lens.Lens' DescribeDBProxies (Prelude.Maybe [Filter])
describeDBProxies_filters :: Lens' DescribeDBProxies (Maybe [Filter])
describeDBProxies_filters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxies' {Maybe [Filter]
filters :: Maybe [Filter]
$sel:filters:DescribeDBProxies' :: DescribeDBProxies -> Maybe [Filter]
filters} -> Maybe [Filter]
filters) (\s :: DescribeDBProxies
s@DescribeDBProxies' {} Maybe [Filter]
a -> DescribeDBProxies
s {$sel:filters:DescribeDBProxies' :: Maybe [Filter]
filters = Maybe [Filter]
a} :: DescribeDBProxies) 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
describeDBProxies_marker :: Lens.Lens' DescribeDBProxies (Prelude.Maybe Prelude.Text)
describeDBProxies_marker :: Lens' DescribeDBProxies (Maybe Text)
describeDBProxies_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxies' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeDBProxies
s@DescribeDBProxies' {} Maybe Text
a -> DescribeDBProxies
s {$sel:marker:DescribeDBProxies' :: Maybe Text
marker = Maybe Text
a} :: DescribeDBProxies)
describeDBProxies_maxRecords :: Lens.Lens' DescribeDBProxies (Prelude.Maybe Prelude.Natural)
describeDBProxies_maxRecords :: Lens' DescribeDBProxies (Maybe Natural)
describeDBProxies_maxRecords = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxies' {Maybe Natural
maxRecords :: Maybe Natural
$sel:maxRecords:DescribeDBProxies' :: DescribeDBProxies -> Maybe Natural
maxRecords} -> Maybe Natural
maxRecords) (\s :: DescribeDBProxies
s@DescribeDBProxies' {} Maybe Natural
a -> DescribeDBProxies
s {$sel:maxRecords:DescribeDBProxies' :: Maybe Natural
maxRecords = Maybe Natural
a} :: DescribeDBProxies)
instance Core.AWSPager DescribeDBProxies where
page :: DescribeDBProxies
-> AWSResponse DescribeDBProxies -> Maybe DescribeDBProxies
page DescribeDBProxies
rq AWSResponse DescribeDBProxies
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeDBProxies
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeDBProxiesResponse (Maybe Text)
describeDBProxiesResponse_marker
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeDBProxies
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeDBProxiesResponse (Maybe [DBProxy])
describeDBProxiesResponse_dbProxies
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ DescribeDBProxies
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeDBProxies (Maybe Text)
describeDBProxies_marker
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeDBProxies
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeDBProxiesResponse (Maybe Text)
describeDBProxiesResponse_marker
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest DescribeDBProxies where
type
AWSResponse DescribeDBProxies =
DescribeDBProxiesResponse
request :: (Service -> Service)
-> DescribeDBProxies -> Request DescribeDBProxies
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DescribeDBProxies
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeDBProxies)))
response =
forall (m :: * -> *) a.
MonadResource m =>
Text
-> (Int
-> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXMLWrapper
Text
"DescribeDBProxiesResult"
( \Int
s ResponseHeaders
h [Node]
x ->
Maybe [DBProxy] -> Maybe Text -> Int -> DescribeDBProxiesResponse
DescribeDBProxiesResponse'
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
"DBProxies"
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
"Marker")
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 DescribeDBProxies where
hashWithSalt :: Int -> DescribeDBProxies -> Int
hashWithSalt Int
_salt DescribeDBProxies' {Maybe Natural
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Natural
marker :: Maybe Text
filters :: Maybe [Filter]
dbProxyName :: Maybe Text
$sel:maxRecords:DescribeDBProxies' :: DescribeDBProxies -> Maybe Natural
$sel:marker:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
$sel:filters:DescribeDBProxies' :: DescribeDBProxies -> Maybe [Filter]
$sel:dbProxyName:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbProxyName
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 Natural
maxRecords
instance Prelude.NFData DescribeDBProxies where
rnf :: DescribeDBProxies -> ()
rnf DescribeDBProxies' {Maybe Natural
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Natural
marker :: Maybe Text
filters :: Maybe [Filter]
dbProxyName :: Maybe Text
$sel:maxRecords:DescribeDBProxies' :: DescribeDBProxies -> Maybe Natural
$sel:marker:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
$sel:filters:DescribeDBProxies' :: DescribeDBProxies -> Maybe [Filter]
$sel:dbProxyName:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbProxyName
seq :: forall a b. a -> b -> b
`Prelude.seq` 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 Natural
maxRecords
instance Data.ToHeaders DescribeDBProxies where
toHeaders :: DescribeDBProxies -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
instance Data.ToPath DescribeDBProxies where
toPath :: DescribeDBProxies -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeDBProxies where
toQuery :: DescribeDBProxies -> QueryString
toQuery DescribeDBProxies' {Maybe Natural
Maybe [Filter]
Maybe Text
maxRecords :: Maybe Natural
marker :: Maybe Text
filters :: Maybe [Filter]
dbProxyName :: Maybe Text
$sel:maxRecords:DescribeDBProxies' :: DescribeDBProxies -> Maybe Natural
$sel:marker:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
$sel:filters:DescribeDBProxies' :: DescribeDBProxies -> Maybe [Filter]
$sel:dbProxyName:DescribeDBProxies' :: DescribeDBProxies -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"Action"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"DescribeDBProxies" :: Prelude.ByteString),
ByteString
"Version"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2014-10-31" :: Prelude.ByteString),
ByteString
"DBProxyName" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbProxyName,
ByteString
"Filters"
forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: forall a. ToQuery a => a -> QueryString
Data.toQuery
(forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Data.toQueryList ByteString
"Filter" forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Filter]
filters),
ByteString
"Marker" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
marker,
ByteString
"MaxRecords" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxRecords
]
data DescribeDBProxiesResponse = DescribeDBProxiesResponse'
{
DescribeDBProxiesResponse -> Maybe [DBProxy]
dbProxies :: Prelude.Maybe [DBProxy],
DescribeDBProxiesResponse -> Maybe Text
marker :: Prelude.Maybe Prelude.Text,
DescribeDBProxiesResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeDBProxiesResponse -> DescribeDBProxiesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeDBProxiesResponse -> DescribeDBProxiesResponse -> Bool
$c/= :: DescribeDBProxiesResponse -> DescribeDBProxiesResponse -> Bool
== :: DescribeDBProxiesResponse -> DescribeDBProxiesResponse -> Bool
$c== :: DescribeDBProxiesResponse -> DescribeDBProxiesResponse -> Bool
Prelude.Eq, ReadPrec [DescribeDBProxiesResponse]
ReadPrec DescribeDBProxiesResponse
Int -> ReadS DescribeDBProxiesResponse
ReadS [DescribeDBProxiesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeDBProxiesResponse]
$creadListPrec :: ReadPrec [DescribeDBProxiesResponse]
readPrec :: ReadPrec DescribeDBProxiesResponse
$creadPrec :: ReadPrec DescribeDBProxiesResponse
readList :: ReadS [DescribeDBProxiesResponse]
$creadList :: ReadS [DescribeDBProxiesResponse]
readsPrec :: Int -> ReadS DescribeDBProxiesResponse
$creadsPrec :: Int -> ReadS DescribeDBProxiesResponse
Prelude.Read, Int -> DescribeDBProxiesResponse -> ShowS
[DescribeDBProxiesResponse] -> ShowS
DescribeDBProxiesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeDBProxiesResponse] -> ShowS
$cshowList :: [DescribeDBProxiesResponse] -> ShowS
show :: DescribeDBProxiesResponse -> String
$cshow :: DescribeDBProxiesResponse -> String
showsPrec :: Int -> DescribeDBProxiesResponse -> ShowS
$cshowsPrec :: Int -> DescribeDBProxiesResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeDBProxiesResponse x -> DescribeDBProxiesResponse
forall x.
DescribeDBProxiesResponse -> Rep DescribeDBProxiesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeDBProxiesResponse x -> DescribeDBProxiesResponse
$cfrom :: forall x.
DescribeDBProxiesResponse -> Rep DescribeDBProxiesResponse x
Prelude.Generic)
newDescribeDBProxiesResponse ::
Prelude.Int ->
DescribeDBProxiesResponse
newDescribeDBProxiesResponse :: Int -> DescribeDBProxiesResponse
newDescribeDBProxiesResponse Int
pHttpStatus_ =
DescribeDBProxiesResponse'
{ $sel:dbProxies:DescribeDBProxiesResponse' :: Maybe [DBProxy]
dbProxies =
forall a. Maybe a
Prelude.Nothing,
$sel:marker:DescribeDBProxiesResponse' :: Maybe Text
marker = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeDBProxiesResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeDBProxiesResponse_dbProxies :: Lens.Lens' DescribeDBProxiesResponse (Prelude.Maybe [DBProxy])
describeDBProxiesResponse_dbProxies :: Lens' DescribeDBProxiesResponse (Maybe [DBProxy])
describeDBProxiesResponse_dbProxies = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxiesResponse' {Maybe [DBProxy]
dbProxies :: Maybe [DBProxy]
$sel:dbProxies:DescribeDBProxiesResponse' :: DescribeDBProxiesResponse -> Maybe [DBProxy]
dbProxies} -> Maybe [DBProxy]
dbProxies) (\s :: DescribeDBProxiesResponse
s@DescribeDBProxiesResponse' {} Maybe [DBProxy]
a -> DescribeDBProxiesResponse
s {$sel:dbProxies:DescribeDBProxiesResponse' :: Maybe [DBProxy]
dbProxies = Maybe [DBProxy]
a} :: DescribeDBProxiesResponse) 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
describeDBProxiesResponse_marker :: Lens.Lens' DescribeDBProxiesResponse (Prelude.Maybe Prelude.Text)
describeDBProxiesResponse_marker :: Lens' DescribeDBProxiesResponse (Maybe Text)
describeDBProxiesResponse_marker = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxiesResponse' {Maybe Text
marker :: Maybe Text
$sel:marker:DescribeDBProxiesResponse' :: DescribeDBProxiesResponse -> Maybe Text
marker} -> Maybe Text
marker) (\s :: DescribeDBProxiesResponse
s@DescribeDBProxiesResponse' {} Maybe Text
a -> DescribeDBProxiesResponse
s {$sel:marker:DescribeDBProxiesResponse' :: Maybe Text
marker = Maybe Text
a} :: DescribeDBProxiesResponse)
describeDBProxiesResponse_httpStatus :: Lens.Lens' DescribeDBProxiesResponse Prelude.Int
describeDBProxiesResponse_httpStatus :: Lens' DescribeDBProxiesResponse Int
describeDBProxiesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeDBProxiesResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeDBProxiesResponse' :: DescribeDBProxiesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeDBProxiesResponse
s@DescribeDBProxiesResponse' {} Int
a -> DescribeDBProxiesResponse
s {$sel:httpStatus:DescribeDBProxiesResponse' :: Int
httpStatus = Int
a} :: DescribeDBProxiesResponse)
instance Prelude.NFData DescribeDBProxiesResponse where
rnf :: DescribeDBProxiesResponse -> ()
rnf DescribeDBProxiesResponse' {Int
Maybe [DBProxy]
Maybe Text
httpStatus :: Int
marker :: Maybe Text
dbProxies :: Maybe [DBProxy]
$sel:httpStatus:DescribeDBProxiesResponse' :: DescribeDBProxiesResponse -> Int
$sel:marker:DescribeDBProxiesResponse' :: DescribeDBProxiesResponse -> Maybe Text
$sel:dbProxies:DescribeDBProxiesResponse' :: DescribeDBProxiesResponse -> Maybe [DBProxy]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [DBProxy]
dbProxies
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 Int
httpStatus