{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.Proton.ListComponentProvisionedResources
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- List provisioned resources for a component with details.
--
-- For more information about components, see
-- <https://docs.aws.amazon.com/proton/latest/userguide/ag-components.html Proton components>
-- in the /Proton User Guide/.
--
-- This operation returns paginated results.
module Amazonka.Proton.ListComponentProvisionedResources
  ( -- * Creating a Request
    ListComponentProvisionedResources (..),
    newListComponentProvisionedResources,

    -- * Request Lenses
    listComponentProvisionedResources_nextToken,
    listComponentProvisionedResources_componentName,

    -- * Destructuring the Response
    ListComponentProvisionedResourcesResponse (..),
    newListComponentProvisionedResourcesResponse,

    -- * Response Lenses
    listComponentProvisionedResourcesResponse_nextToken,
    listComponentProvisionedResourcesResponse_httpStatus,
    listComponentProvisionedResourcesResponse_provisionedResources,
  )
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.Proton.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newListComponentProvisionedResources' smart constructor.
data ListComponentProvisionedResources = ListComponentProvisionedResources'
  { -- | A token that indicates the location of the next provisioned resource in
    -- the array of provisioned resources, after the list of provisioned
    -- resources that was previously requested.
    ListComponentProvisionedResources -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The name of the component whose provisioned resources you want.
    ListComponentProvisionedResources -> Text
componentName :: Prelude.Text
  }
  deriving (ListComponentProvisionedResources
-> ListComponentProvisionedResources -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListComponentProvisionedResources
-> ListComponentProvisionedResources -> Bool
$c/= :: ListComponentProvisionedResources
-> ListComponentProvisionedResources -> Bool
== :: ListComponentProvisionedResources
-> ListComponentProvisionedResources -> Bool
$c== :: ListComponentProvisionedResources
-> ListComponentProvisionedResources -> Bool
Prelude.Eq, ReadPrec [ListComponentProvisionedResources]
ReadPrec ListComponentProvisionedResources
Int -> ReadS ListComponentProvisionedResources
ReadS [ListComponentProvisionedResources]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListComponentProvisionedResources]
$creadListPrec :: ReadPrec [ListComponentProvisionedResources]
readPrec :: ReadPrec ListComponentProvisionedResources
$creadPrec :: ReadPrec ListComponentProvisionedResources
readList :: ReadS [ListComponentProvisionedResources]
$creadList :: ReadS [ListComponentProvisionedResources]
readsPrec :: Int -> ReadS ListComponentProvisionedResources
$creadsPrec :: Int -> ReadS ListComponentProvisionedResources
Prelude.Read, Int -> ListComponentProvisionedResources -> ShowS
[ListComponentProvisionedResources] -> ShowS
ListComponentProvisionedResources -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListComponentProvisionedResources] -> ShowS
$cshowList :: [ListComponentProvisionedResources] -> ShowS
show :: ListComponentProvisionedResources -> String
$cshow :: ListComponentProvisionedResources -> String
showsPrec :: Int -> ListComponentProvisionedResources -> ShowS
$cshowsPrec :: Int -> ListComponentProvisionedResources -> ShowS
Prelude.Show, forall x.
Rep ListComponentProvisionedResources x
-> ListComponentProvisionedResources
forall x.
ListComponentProvisionedResources
-> Rep ListComponentProvisionedResources x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListComponentProvisionedResources x
-> ListComponentProvisionedResources
$cfrom :: forall x.
ListComponentProvisionedResources
-> Rep ListComponentProvisionedResources x
Prelude.Generic)

-- |
-- Create a value of 'ListComponentProvisionedResources' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'nextToken', 'listComponentProvisionedResources_nextToken' - A token that indicates the location of the next provisioned resource in
-- the array of provisioned resources, after the list of provisioned
-- resources that was previously requested.
--
-- 'componentName', 'listComponentProvisionedResources_componentName' - The name of the component whose provisioned resources you want.
newListComponentProvisionedResources ::
  -- | 'componentName'
  Prelude.Text ->
  ListComponentProvisionedResources
newListComponentProvisionedResources :: Text -> ListComponentProvisionedResources
newListComponentProvisionedResources Text
pComponentName_ =
  ListComponentProvisionedResources'
    { $sel:nextToken:ListComponentProvisionedResources' :: Maybe Text
nextToken =
        forall a. Maybe a
Prelude.Nothing,
      $sel:componentName:ListComponentProvisionedResources' :: Text
componentName = Text
pComponentName_
    }

-- | A token that indicates the location of the next provisioned resource in
-- the array of provisioned resources, after the list of provisioned
-- resources that was previously requested.
listComponentProvisionedResources_nextToken :: Lens.Lens' ListComponentProvisionedResources (Prelude.Maybe Prelude.Text)
listComponentProvisionedResources_nextToken :: Lens' ListComponentProvisionedResources (Maybe Text)
listComponentProvisionedResources_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListComponentProvisionedResources' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListComponentProvisionedResources
s@ListComponentProvisionedResources' {} Maybe Text
a -> ListComponentProvisionedResources
s {$sel:nextToken:ListComponentProvisionedResources' :: Maybe Text
nextToken = Maybe Text
a} :: ListComponentProvisionedResources)

-- | The name of the component whose provisioned resources you want.
listComponentProvisionedResources_componentName :: Lens.Lens' ListComponentProvisionedResources Prelude.Text
listComponentProvisionedResources_componentName :: Lens' ListComponentProvisionedResources Text
listComponentProvisionedResources_componentName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListComponentProvisionedResources' {Text
componentName :: Text
$sel:componentName:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Text
componentName} -> Text
componentName) (\s :: ListComponentProvisionedResources
s@ListComponentProvisionedResources' {} Text
a -> ListComponentProvisionedResources
s {$sel:componentName:ListComponentProvisionedResources' :: Text
componentName = Text
a} :: ListComponentProvisionedResources)

instance
  Core.AWSPager
    ListComponentProvisionedResources
  where
  page :: ListComponentProvisionedResources
-> AWSResponse ListComponentProvisionedResources
-> Maybe ListComponentProvisionedResources
page ListComponentProvisionedResources
rq AWSResponse ListComponentProvisionedResources
rs
    | forall a. AWSTruncated a => a -> Bool
Core.stop
        ( AWSResponse ListComponentProvisionedResources
rs
            forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListComponentProvisionedResourcesResponse (Maybe Text)
listComponentProvisionedResourcesResponse_nextToken
            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 ListComponentProvisionedResources
rs
            forall s a. s -> Getting a s a -> a
Lens.^. Lens'
  ListComponentProvisionedResourcesResponse [ProvisionedResource]
listComponentProvisionedResourcesResponse_provisionedResources
        ) =
        forall a. Maybe a
Prelude.Nothing
    | Bool
Prelude.otherwise =
        forall a. a -> Maybe a
Prelude.Just
          forall a b. (a -> b) -> a -> b
Prelude.$ ListComponentProvisionedResources
rq
          forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListComponentProvisionedResources (Maybe Text)
listComponentProvisionedResources_nextToken
          forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListComponentProvisionedResources
rs
          forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListComponentProvisionedResourcesResponse (Maybe Text)
listComponentProvisionedResourcesResponse_nextToken
          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
    ListComponentProvisionedResources
  where
  type
    AWSResponse ListComponentProvisionedResources =
      ListComponentProvisionedResourcesResponse
  request :: (Service -> Service)
-> ListComponentProvisionedResources
-> Request ListComponentProvisionedResources
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 ListComponentProvisionedResources
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse (AWSResponse ListComponentProvisionedResources)))
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
-> Int
-> [ProvisionedResource]
-> ListComponentProvisionedResourcesResponse
ListComponentProvisionedResourcesResponse'
            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
"nextToken")
            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))
            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
"provisionedResources"
                            forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
                        )
      )

instance
  Prelude.Hashable
    ListComponentProvisionedResources
  where
  hashWithSalt :: Int -> ListComponentProvisionedResources -> Int
hashWithSalt
    Int
_salt
    ListComponentProvisionedResources' {Maybe Text
Text
componentName :: Text
nextToken :: Maybe Text
$sel:componentName:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Text
$sel:nextToken:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Maybe Text
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
componentName

instance
  Prelude.NFData
    ListComponentProvisionedResources
  where
  rnf :: ListComponentProvisionedResources -> ()
rnf ListComponentProvisionedResources' {Maybe Text
Text
componentName :: Text
nextToken :: Maybe Text
$sel:componentName:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Text
$sel:nextToken:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
componentName

instance
  Data.ToHeaders
    ListComponentProvisionedResources
  where
  toHeaders :: ListComponentProvisionedResources -> 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
"AwsProton20200720.ListComponentProvisionedResources" ::
                          Prelude.ByteString
                      ),
            HeaderName
"Content-Type"
              forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.0" ::
                          Prelude.ByteString
                      )
          ]
      )

instance
  Data.ToJSON
    ListComponentProvisionedResources
  where
  toJSON :: ListComponentProvisionedResources -> Value
toJSON ListComponentProvisionedResources' {Maybe Text
Text
componentName :: Text
nextToken :: Maybe Text
$sel:componentName:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Text
$sel:nextToken:ListComponentProvisionedResources' :: ListComponentProvisionedResources -> Maybe Text
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"nextToken" 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
nextToken,
            forall a. a -> Maybe a
Prelude.Just
              (Key
"componentName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
componentName)
          ]
      )

instance
  Data.ToPath
    ListComponentProvisionedResources
  where
  toPath :: ListComponentProvisionedResources -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance
  Data.ToQuery
    ListComponentProvisionedResources
  where
  toQuery :: ListComponentProvisionedResources -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newListComponentProvisionedResourcesResponse' smart constructor.
data ListComponentProvisionedResourcesResponse = ListComponentProvisionedResourcesResponse'
  { -- | A token that indicates the location of the next provisioned resource in
    -- the array of provisioned resources, after the current requested list of
    -- provisioned resources.
    ListComponentProvisionedResourcesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    ListComponentProvisionedResourcesResponse -> Int
httpStatus :: Prelude.Int,
    -- | An array of provisioned resources for a component.
    ListComponentProvisionedResourcesResponse -> [ProvisionedResource]
provisionedResources :: [ProvisionedResource]
  }
  deriving (ListComponentProvisionedResourcesResponse
-> ListComponentProvisionedResourcesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListComponentProvisionedResourcesResponse
-> ListComponentProvisionedResourcesResponse -> Bool
$c/= :: ListComponentProvisionedResourcesResponse
-> ListComponentProvisionedResourcesResponse -> Bool
== :: ListComponentProvisionedResourcesResponse
-> ListComponentProvisionedResourcesResponse -> Bool
$c== :: ListComponentProvisionedResourcesResponse
-> ListComponentProvisionedResourcesResponse -> Bool
Prelude.Eq, ReadPrec [ListComponentProvisionedResourcesResponse]
ReadPrec ListComponentProvisionedResourcesResponse
Int -> ReadS ListComponentProvisionedResourcesResponse
ReadS [ListComponentProvisionedResourcesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListComponentProvisionedResourcesResponse]
$creadListPrec :: ReadPrec [ListComponentProvisionedResourcesResponse]
readPrec :: ReadPrec ListComponentProvisionedResourcesResponse
$creadPrec :: ReadPrec ListComponentProvisionedResourcesResponse
readList :: ReadS [ListComponentProvisionedResourcesResponse]
$creadList :: ReadS [ListComponentProvisionedResourcesResponse]
readsPrec :: Int -> ReadS ListComponentProvisionedResourcesResponse
$creadsPrec :: Int -> ReadS ListComponentProvisionedResourcesResponse
Prelude.Read, Int -> ListComponentProvisionedResourcesResponse -> ShowS
[ListComponentProvisionedResourcesResponse] -> ShowS
ListComponentProvisionedResourcesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListComponentProvisionedResourcesResponse] -> ShowS
$cshowList :: [ListComponentProvisionedResourcesResponse] -> ShowS
show :: ListComponentProvisionedResourcesResponse -> String
$cshow :: ListComponentProvisionedResourcesResponse -> String
showsPrec :: Int -> ListComponentProvisionedResourcesResponse -> ShowS
$cshowsPrec :: Int -> ListComponentProvisionedResourcesResponse -> ShowS
Prelude.Show, forall x.
Rep ListComponentProvisionedResourcesResponse x
-> ListComponentProvisionedResourcesResponse
forall x.
ListComponentProvisionedResourcesResponse
-> Rep ListComponentProvisionedResourcesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListComponentProvisionedResourcesResponse x
-> ListComponentProvisionedResourcesResponse
$cfrom :: forall x.
ListComponentProvisionedResourcesResponse
-> Rep ListComponentProvisionedResourcesResponse x
Prelude.Generic)

-- |
-- Create a value of 'ListComponentProvisionedResourcesResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'nextToken', 'listComponentProvisionedResourcesResponse_nextToken' - A token that indicates the location of the next provisioned resource in
-- the array of provisioned resources, after the current requested list of
-- provisioned resources.
--
-- 'httpStatus', 'listComponentProvisionedResourcesResponse_httpStatus' - The response's http status code.
--
-- 'provisionedResources', 'listComponentProvisionedResourcesResponse_provisionedResources' - An array of provisioned resources for a component.
newListComponentProvisionedResourcesResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ListComponentProvisionedResourcesResponse
newListComponentProvisionedResourcesResponse :: Int -> ListComponentProvisionedResourcesResponse
newListComponentProvisionedResourcesResponse
  Int
pHttpStatus_ =
    ListComponentProvisionedResourcesResponse'
      { $sel:nextToken:ListComponentProvisionedResourcesResponse' :: Maybe Text
nextToken =
          forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:ListComponentProvisionedResourcesResponse' :: Int
httpStatus = Int
pHttpStatus_,
        $sel:provisionedResources:ListComponentProvisionedResourcesResponse' :: [ProvisionedResource]
provisionedResources =
          forall a. Monoid a => a
Prelude.mempty
      }

-- | A token that indicates the location of the next provisioned resource in
-- the array of provisioned resources, after the current requested list of
-- provisioned resources.
listComponentProvisionedResourcesResponse_nextToken :: Lens.Lens' ListComponentProvisionedResourcesResponse (Prelude.Maybe Prelude.Text)
listComponentProvisionedResourcesResponse_nextToken :: Lens' ListComponentProvisionedResourcesResponse (Maybe Text)
listComponentProvisionedResourcesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListComponentProvisionedResourcesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListComponentProvisionedResourcesResponse' :: ListComponentProvisionedResourcesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListComponentProvisionedResourcesResponse
s@ListComponentProvisionedResourcesResponse' {} Maybe Text
a -> ListComponentProvisionedResourcesResponse
s {$sel:nextToken:ListComponentProvisionedResourcesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListComponentProvisionedResourcesResponse)

-- | The response's http status code.
listComponentProvisionedResourcesResponse_httpStatus :: Lens.Lens' ListComponentProvisionedResourcesResponse Prelude.Int
listComponentProvisionedResourcesResponse_httpStatus :: Lens' ListComponentProvisionedResourcesResponse Int
listComponentProvisionedResourcesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListComponentProvisionedResourcesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListComponentProvisionedResourcesResponse' :: ListComponentProvisionedResourcesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListComponentProvisionedResourcesResponse
s@ListComponentProvisionedResourcesResponse' {} Int
a -> ListComponentProvisionedResourcesResponse
s {$sel:httpStatus:ListComponentProvisionedResourcesResponse' :: Int
httpStatus = Int
a} :: ListComponentProvisionedResourcesResponse)

-- | An array of provisioned resources for a component.
listComponentProvisionedResourcesResponse_provisionedResources :: Lens.Lens' ListComponentProvisionedResourcesResponse [ProvisionedResource]
listComponentProvisionedResourcesResponse_provisionedResources :: Lens'
  ListComponentProvisionedResourcesResponse [ProvisionedResource]
listComponentProvisionedResourcesResponse_provisionedResources = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListComponentProvisionedResourcesResponse' {[ProvisionedResource]
provisionedResources :: [ProvisionedResource]
$sel:provisionedResources:ListComponentProvisionedResourcesResponse' :: ListComponentProvisionedResourcesResponse -> [ProvisionedResource]
provisionedResources} -> [ProvisionedResource]
provisionedResources) (\s :: ListComponentProvisionedResourcesResponse
s@ListComponentProvisionedResourcesResponse' {} [ProvisionedResource]
a -> ListComponentProvisionedResourcesResponse
s {$sel:provisionedResources:ListComponentProvisionedResourcesResponse' :: [ProvisionedResource]
provisionedResources = [ProvisionedResource]
a} :: ListComponentProvisionedResourcesResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

instance
  Prelude.NFData
    ListComponentProvisionedResourcesResponse
  where
  rnf :: ListComponentProvisionedResourcesResponse -> ()
rnf ListComponentProvisionedResourcesResponse' {Int
[ProvisionedResource]
Maybe Text
provisionedResources :: [ProvisionedResource]
httpStatus :: Int
nextToken :: Maybe Text
$sel:provisionedResources:ListComponentProvisionedResourcesResponse' :: ListComponentProvisionedResourcesResponse -> [ProvisionedResource]
$sel:httpStatus:ListComponentProvisionedResourcesResponse' :: ListComponentProvisionedResourcesResponse -> Int
$sel:nextToken:ListComponentProvisionedResourcesResponse' :: ListComponentProvisionedResourcesResponse -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [ProvisionedResource]
provisionedResources