{-# 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.Glue.ListTriggers
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieves the names of all trigger resources in this Amazon Web Services
-- account, or the resources with the specified tag. This operation allows
-- you to see which resources are available in your account, and their
-- names.
--
-- This operation takes the optional @Tags@ field, which you can use as a
-- filter on the response so that tagged resources can be retrieved as a
-- group. If you choose to use tags filtering, only resources with the tag
-- are retrieved.
module Amazonka.Glue.ListTriggers
  ( -- * Creating a Request
    ListTriggers (..),
    newListTriggers,

    -- * Request Lenses
    listTriggers_dependentJobName,
    listTriggers_maxResults,
    listTriggers_nextToken,
    listTriggers_tags,

    -- * Destructuring the Response
    ListTriggersResponse (..),
    newListTriggersResponse,

    -- * Response Lenses
    listTriggersResponse_nextToken,
    listTriggersResponse_triggerNames,
    listTriggersResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Glue.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newListTriggers' smart constructor.
data ListTriggers = ListTriggers'
  { -- | The name of the job for which to retrieve triggers. The trigger that can
    -- start this job is returned. If there is no such trigger, all triggers
    -- are returned.
    ListTriggers -> Maybe Text
dependentJobName :: Prelude.Maybe Prelude.Text,
    -- | The maximum size of a list to return.
    ListTriggers -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
    -- | A continuation token, if this is a continuation request.
    ListTriggers -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | Specifies to return only these tagged resources.
    ListTriggers -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)
  }
  deriving (ListTriggers -> ListTriggers -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListTriggers -> ListTriggers -> Bool
$c/= :: ListTriggers -> ListTriggers -> Bool
== :: ListTriggers -> ListTriggers -> Bool
$c== :: ListTriggers -> ListTriggers -> Bool
Prelude.Eq, ReadPrec [ListTriggers]
ReadPrec ListTriggers
Int -> ReadS ListTriggers
ReadS [ListTriggers]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListTriggers]
$creadListPrec :: ReadPrec [ListTriggers]
readPrec :: ReadPrec ListTriggers
$creadPrec :: ReadPrec ListTriggers
readList :: ReadS [ListTriggers]
$creadList :: ReadS [ListTriggers]
readsPrec :: Int -> ReadS ListTriggers
$creadsPrec :: Int -> ReadS ListTriggers
Prelude.Read, Int -> ListTriggers -> ShowS
[ListTriggers] -> ShowS
ListTriggers -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListTriggers] -> ShowS
$cshowList :: [ListTriggers] -> ShowS
show :: ListTriggers -> String
$cshow :: ListTriggers -> String
showsPrec :: Int -> ListTriggers -> ShowS
$cshowsPrec :: Int -> ListTriggers -> ShowS
Prelude.Show, forall x. Rep ListTriggers x -> ListTriggers
forall x. ListTriggers -> Rep ListTriggers x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListTriggers x -> ListTriggers
$cfrom :: forall x. ListTriggers -> Rep ListTriggers x
Prelude.Generic)

-- |
-- Create a value of 'ListTriggers' 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:
--
-- 'dependentJobName', 'listTriggers_dependentJobName' - The name of the job for which to retrieve triggers. The trigger that can
-- start this job is returned. If there is no such trigger, all triggers
-- are returned.
--
-- 'maxResults', 'listTriggers_maxResults' - The maximum size of a list to return.
--
-- 'nextToken', 'listTriggers_nextToken' - A continuation token, if this is a continuation request.
--
-- 'tags', 'listTriggers_tags' - Specifies to return only these tagged resources.
newListTriggers ::
  ListTriggers
newListTriggers :: ListTriggers
newListTriggers =
  ListTriggers'
    { $sel:dependentJobName:ListTriggers' :: Maybe Text
dependentJobName = forall a. Maybe a
Prelude.Nothing,
      $sel:maxResults:ListTriggers' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:ListTriggers' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:tags:ListTriggers' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing
    }

-- | The name of the job for which to retrieve triggers. The trigger that can
-- start this job is returned. If there is no such trigger, all triggers
-- are returned.
listTriggers_dependentJobName :: Lens.Lens' ListTriggers (Prelude.Maybe Prelude.Text)
listTriggers_dependentJobName :: Lens' ListTriggers (Maybe Text)
listTriggers_dependentJobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTriggers' {Maybe Text
dependentJobName :: Maybe Text
$sel:dependentJobName:ListTriggers' :: ListTriggers -> Maybe Text
dependentJobName} -> Maybe Text
dependentJobName) (\s :: ListTriggers
s@ListTriggers' {} Maybe Text
a -> ListTriggers
s {$sel:dependentJobName:ListTriggers' :: Maybe Text
dependentJobName = Maybe Text
a} :: ListTriggers)

-- | The maximum size of a list to return.
listTriggers_maxResults :: Lens.Lens' ListTriggers (Prelude.Maybe Prelude.Natural)
listTriggers_maxResults :: Lens' ListTriggers (Maybe Natural)
listTriggers_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTriggers' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListTriggers' :: ListTriggers -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListTriggers
s@ListTriggers' {} Maybe Natural
a -> ListTriggers
s {$sel:maxResults:ListTriggers' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListTriggers)

-- | A continuation token, if this is a continuation request.
listTriggers_nextToken :: Lens.Lens' ListTriggers (Prelude.Maybe Prelude.Text)
listTriggers_nextToken :: Lens' ListTriggers (Maybe Text)
listTriggers_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTriggers' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListTriggers' :: ListTriggers -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListTriggers
s@ListTriggers' {} Maybe Text
a -> ListTriggers
s {$sel:nextToken:ListTriggers' :: Maybe Text
nextToken = Maybe Text
a} :: ListTriggers)

-- | Specifies to return only these tagged resources.
listTriggers_tags :: Lens.Lens' ListTriggers (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
listTriggers_tags :: Lens' ListTriggers (Maybe (HashMap Text Text))
listTriggers_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTriggers' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:ListTriggers' :: ListTriggers -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: ListTriggers
s@ListTriggers' {} Maybe (HashMap Text Text)
a -> ListTriggers
s {$sel:tags:ListTriggers' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: ListTriggers) 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 Core.AWSRequest ListTriggers where
  type AWSResponse ListTriggers = ListTriggersResponse
  request :: (Service -> Service) -> ListTriggers -> Request ListTriggers
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 ListTriggers
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse ListTriggers)))
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] -> Int -> ListTriggersResponse
ListTriggersResponse'
            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.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"TriggerNames" 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 ListTriggers where
  hashWithSalt :: Int -> ListTriggers -> Int
hashWithSalt Int
_salt ListTriggers' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
nextToken :: Maybe Text
maxResults :: Maybe Natural
dependentJobName :: Maybe Text
$sel:tags:ListTriggers' :: ListTriggers -> Maybe (HashMap Text Text)
$sel:nextToken:ListTriggers' :: ListTriggers -> Maybe Text
$sel:maxResults:ListTriggers' :: ListTriggers -> Maybe Natural
$sel:dependentJobName:ListTriggers' :: ListTriggers -> Maybe Text
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dependentJobName
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
tags

instance Prelude.NFData ListTriggers where
  rnf :: ListTriggers -> ()
rnf ListTriggers' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
nextToken :: Maybe Text
maxResults :: Maybe Natural
dependentJobName :: Maybe Text
$sel:tags:ListTriggers' :: ListTriggers -> Maybe (HashMap Text Text)
$sel:nextToken:ListTriggers' :: ListTriggers -> Maybe Text
$sel:maxResults:ListTriggers' :: ListTriggers -> Maybe Natural
$sel:dependentJobName:ListTriggers' :: ListTriggers -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dependentJobName
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
      seq :: forall a b. a -> b -> b
`Prelude.seq` 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 Maybe (HashMap Text Text)
tags

instance Data.ToHeaders ListTriggers where
  toHeaders :: ListTriggers -> 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
"AWSGlue.ListTriggers" :: 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 ListTriggers where
  toJSON :: ListTriggers -> Value
toJSON ListTriggers' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
nextToken :: Maybe Text
maxResults :: Maybe Natural
dependentJobName :: Maybe Text
$sel:tags:ListTriggers' :: ListTriggers -> Maybe (HashMap Text Text)
$sel:nextToken:ListTriggers' :: ListTriggers -> Maybe Text
$sel:maxResults:ListTriggers' :: ListTriggers -> Maybe Natural
$sel:dependentJobName:ListTriggers' :: ListTriggers -> Maybe Text
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"DependentJobName" 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
dependentJobName,
            (Key
"MaxResults" 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 Natural
maxResults,
            (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,
            (Key
"Tags" 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 (HashMap Text Text)
tags
          ]
      )

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

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

-- | /See:/ 'newListTriggersResponse' smart constructor.
data ListTriggersResponse = ListTriggersResponse'
  { -- | A continuation token, if the returned list does not contain the last
    -- metric available.
    ListTriggersResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The names of all triggers in the account, or the triggers with the
    -- specified tags.
    ListTriggersResponse -> Maybe [Text]
triggerNames :: Prelude.Maybe [Prelude.Text],
    -- | The response's http status code.
    ListTriggersResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (ListTriggersResponse -> ListTriggersResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListTriggersResponse -> ListTriggersResponse -> Bool
$c/= :: ListTriggersResponse -> ListTriggersResponse -> Bool
== :: ListTriggersResponse -> ListTriggersResponse -> Bool
$c== :: ListTriggersResponse -> ListTriggersResponse -> Bool
Prelude.Eq, ReadPrec [ListTriggersResponse]
ReadPrec ListTriggersResponse
Int -> ReadS ListTriggersResponse
ReadS [ListTriggersResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListTriggersResponse]
$creadListPrec :: ReadPrec [ListTriggersResponse]
readPrec :: ReadPrec ListTriggersResponse
$creadPrec :: ReadPrec ListTriggersResponse
readList :: ReadS [ListTriggersResponse]
$creadList :: ReadS [ListTriggersResponse]
readsPrec :: Int -> ReadS ListTriggersResponse
$creadsPrec :: Int -> ReadS ListTriggersResponse
Prelude.Read, Int -> ListTriggersResponse -> ShowS
[ListTriggersResponse] -> ShowS
ListTriggersResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListTriggersResponse] -> ShowS
$cshowList :: [ListTriggersResponse] -> ShowS
show :: ListTriggersResponse -> String
$cshow :: ListTriggersResponse -> String
showsPrec :: Int -> ListTriggersResponse -> ShowS
$cshowsPrec :: Int -> ListTriggersResponse -> ShowS
Prelude.Show, forall x. Rep ListTriggersResponse x -> ListTriggersResponse
forall x. ListTriggersResponse -> Rep ListTriggersResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListTriggersResponse x -> ListTriggersResponse
$cfrom :: forall x. ListTriggersResponse -> Rep ListTriggersResponse x
Prelude.Generic)

-- |
-- Create a value of 'ListTriggersResponse' 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', 'listTriggersResponse_nextToken' - A continuation token, if the returned list does not contain the last
-- metric available.
--
-- 'triggerNames', 'listTriggersResponse_triggerNames' - The names of all triggers in the account, or the triggers with the
-- specified tags.
--
-- 'httpStatus', 'listTriggersResponse_httpStatus' - The response's http status code.
newListTriggersResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ListTriggersResponse
newListTriggersResponse :: Int -> ListTriggersResponse
newListTriggersResponse Int
pHttpStatus_ =
  ListTriggersResponse'
    { $sel:nextToken:ListTriggersResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:triggerNames:ListTriggersResponse' :: Maybe [Text]
triggerNames = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:ListTriggersResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | A continuation token, if the returned list does not contain the last
-- metric available.
listTriggersResponse_nextToken :: Lens.Lens' ListTriggersResponse (Prelude.Maybe Prelude.Text)
listTriggersResponse_nextToken :: Lens' ListTriggersResponse (Maybe Text)
listTriggersResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTriggersResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListTriggersResponse' :: ListTriggersResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListTriggersResponse
s@ListTriggersResponse' {} Maybe Text
a -> ListTriggersResponse
s {$sel:nextToken:ListTriggersResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListTriggersResponse)

-- | The names of all triggers in the account, or the triggers with the
-- specified tags.
listTriggersResponse_triggerNames :: Lens.Lens' ListTriggersResponse (Prelude.Maybe [Prelude.Text])
listTriggersResponse_triggerNames :: Lens' ListTriggersResponse (Maybe [Text])
listTriggersResponse_triggerNames = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListTriggersResponse' {Maybe [Text]
triggerNames :: Maybe [Text]
$sel:triggerNames:ListTriggersResponse' :: ListTriggersResponse -> Maybe [Text]
triggerNames} -> Maybe [Text]
triggerNames) (\s :: ListTriggersResponse
s@ListTriggersResponse' {} Maybe [Text]
a -> ListTriggersResponse
s {$sel:triggerNames:ListTriggersResponse' :: Maybe [Text]
triggerNames = Maybe [Text]
a} :: ListTriggersResponse) 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

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

instance Prelude.NFData ListTriggersResponse where
  rnf :: ListTriggersResponse -> ()
rnf ListTriggersResponse' {Int
Maybe [Text]
Maybe Text
httpStatus :: Int
triggerNames :: Maybe [Text]
nextToken :: Maybe Text
$sel:httpStatus:ListTriggersResponse' :: ListTriggersResponse -> Int
$sel:triggerNames:ListTriggersResponse' :: ListTriggersResponse -> Maybe [Text]
$sel:nextToken:ListTriggersResponse' :: ListTriggersResponse -> 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 Maybe [Text]
triggerNames
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus