amazonka-kinesis-1.4.3: test/Test/AWS/Gen/Kinesis.hs
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}
-- Derived from AWS service descriptions, licensed under Apache 2.0.
-- |
-- Module : Test.AWS.Gen.Kinesis
-- Copyright : (c) 2013-2016 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
module Test.AWS.Gen.Kinesis where
import Data.Proxy
import Test.AWS.Fixture
import Test.AWS.Prelude
import Test.Tasty
import Network.AWS.Kinesis
import Test.AWS.Kinesis.Internal
-- Auto-generated: the actual test selection needs to be manually placed into
-- the top-level so that real test data can be incrementally added.
--
-- This commented snippet is what the entire set should look like:
-- fixtures :: TestTree
-- fixtures =
-- [ testGroup "request"
-- [ requestPutRecord $
-- putRecord
--
-- , requestDecreaseStreamRetentionPeriod $
-- decreaseStreamRetentionPeriod
--
-- , requestMergeShards $
-- mergeShards
--
-- , requestGetShardIterator $
-- getShardIterator
--
-- , requestGetRecords $
-- getRecords
--
-- , requestEnableEnhancedMonitoring $
-- enableEnhancedMonitoring
--
-- , requestDisableEnhancedMonitoring $
-- disableEnhancedMonitoring
--
-- , requestListTagsForStream $
-- listTagsForStream
--
-- , requestAddTagsToStream $
-- addTagsToStream
--
-- , requestPutRecords $
-- putRecords
--
-- , requestDeleteStream $
-- deleteStream
--
-- , requestRemoveTagsFromStream $
-- removeTagsFromStream
--
-- , requestListStreams $
-- listStreams
--
-- , requestCreateStream $
-- createStream
--
-- , requestSplitShard $
-- splitShard
--
-- , requestIncreaseStreamRetentionPeriod $
-- increaseStreamRetentionPeriod
--
-- , requestDescribeStream $
-- describeStream
--
-- ]
-- , testGroup "response"
-- [ responsePutRecord $
-- putRecordResponse
--
-- , responseDecreaseStreamRetentionPeriod $
-- decreaseStreamRetentionPeriodResponse
--
-- , responseMergeShards $
-- mergeShardsResponse
--
-- , responseGetShardIterator $
-- getShardIteratorResponse
--
-- , responseGetRecords $
-- getRecordsResponse
--
-- , responseEnableEnhancedMonitoring $
-- enhancedMonitoringOutput
--
-- , responseDisableEnhancedMonitoring $
-- enhancedMonitoringOutput
--
-- , responseListTagsForStream $
-- listTagsForStreamResponse
--
-- , responseAddTagsToStream $
-- addTagsToStreamResponse
--
-- , responsePutRecords $
-- putRecordsResponse
--
-- , responseDeleteStream $
-- deleteStreamResponse
--
-- , responseRemoveTagsFromStream $
-- removeTagsFromStreamResponse
--
-- , responseListStreams $
-- listStreamsResponse
--
-- , responseCreateStream $
-- createStreamResponse
--
-- , responseSplitShard $
-- splitShardResponse
--
-- , responseIncreaseStreamRetentionPeriod $
-- increaseStreamRetentionPeriodResponse
--
-- , responseDescribeStream $
-- describeStreamResponse
--
-- ]
-- ]
-- Requests
requestPutRecord :: PutRecord -> TestTree
requestPutRecord = req
"PutRecord"
"fixture/PutRecord.yaml"
requestDecreaseStreamRetentionPeriod :: DecreaseStreamRetentionPeriod -> TestTree
requestDecreaseStreamRetentionPeriod = req
"DecreaseStreamRetentionPeriod"
"fixture/DecreaseStreamRetentionPeriod.yaml"
requestMergeShards :: MergeShards -> TestTree
requestMergeShards = req
"MergeShards"
"fixture/MergeShards.yaml"
requestGetShardIterator :: GetShardIterator -> TestTree
requestGetShardIterator = req
"GetShardIterator"
"fixture/GetShardIterator.yaml"
requestGetRecords :: GetRecords -> TestTree
requestGetRecords = req
"GetRecords"
"fixture/GetRecords.yaml"
requestEnableEnhancedMonitoring :: EnableEnhancedMonitoring -> TestTree
requestEnableEnhancedMonitoring = req
"EnableEnhancedMonitoring"
"fixture/EnableEnhancedMonitoring.yaml"
requestDisableEnhancedMonitoring :: DisableEnhancedMonitoring -> TestTree
requestDisableEnhancedMonitoring = req
"DisableEnhancedMonitoring"
"fixture/DisableEnhancedMonitoring.yaml"
requestListTagsForStream :: ListTagsForStream -> TestTree
requestListTagsForStream = req
"ListTagsForStream"
"fixture/ListTagsForStream.yaml"
requestAddTagsToStream :: AddTagsToStream -> TestTree
requestAddTagsToStream = req
"AddTagsToStream"
"fixture/AddTagsToStream.yaml"
requestPutRecords :: PutRecords -> TestTree
requestPutRecords = req
"PutRecords"
"fixture/PutRecords.yaml"
requestDeleteStream :: DeleteStream -> TestTree
requestDeleteStream = req
"DeleteStream"
"fixture/DeleteStream.yaml"
requestRemoveTagsFromStream :: RemoveTagsFromStream -> TestTree
requestRemoveTagsFromStream = req
"RemoveTagsFromStream"
"fixture/RemoveTagsFromStream.yaml"
requestListStreams :: ListStreams -> TestTree
requestListStreams = req
"ListStreams"
"fixture/ListStreams.yaml"
requestCreateStream :: CreateStream -> TestTree
requestCreateStream = req
"CreateStream"
"fixture/CreateStream.yaml"
requestSplitShard :: SplitShard -> TestTree
requestSplitShard = req
"SplitShard"
"fixture/SplitShard.yaml"
requestIncreaseStreamRetentionPeriod :: IncreaseStreamRetentionPeriod -> TestTree
requestIncreaseStreamRetentionPeriod = req
"IncreaseStreamRetentionPeriod"
"fixture/IncreaseStreamRetentionPeriod.yaml"
requestDescribeStream :: DescribeStream -> TestTree
requestDescribeStream = req
"DescribeStream"
"fixture/DescribeStream.yaml"
-- Responses
responsePutRecord :: PutRecordResponse -> TestTree
responsePutRecord = res
"PutRecordResponse"
"fixture/PutRecordResponse.proto"
kinesis
(Proxy :: Proxy PutRecord)
responseDecreaseStreamRetentionPeriod :: DecreaseStreamRetentionPeriodResponse -> TestTree
responseDecreaseStreamRetentionPeriod = res
"DecreaseStreamRetentionPeriodResponse"
"fixture/DecreaseStreamRetentionPeriodResponse.proto"
kinesis
(Proxy :: Proxy DecreaseStreamRetentionPeriod)
responseMergeShards :: MergeShardsResponse -> TestTree
responseMergeShards = res
"MergeShardsResponse"
"fixture/MergeShardsResponse.proto"
kinesis
(Proxy :: Proxy MergeShards)
responseGetShardIterator :: GetShardIteratorResponse -> TestTree
responseGetShardIterator = res
"GetShardIteratorResponse"
"fixture/GetShardIteratorResponse.proto"
kinesis
(Proxy :: Proxy GetShardIterator)
responseGetRecords :: GetRecordsResponse -> TestTree
responseGetRecords = res
"GetRecordsResponse"
"fixture/GetRecordsResponse.proto"
kinesis
(Proxy :: Proxy GetRecords)
responseEnableEnhancedMonitoring :: EnhancedMonitoringOutput -> TestTree
responseEnableEnhancedMonitoring = res
"EnableEnhancedMonitoringResponse"
"fixture/EnableEnhancedMonitoringResponse.proto"
kinesis
(Proxy :: Proxy EnableEnhancedMonitoring)
responseDisableEnhancedMonitoring :: EnhancedMonitoringOutput -> TestTree
responseDisableEnhancedMonitoring = res
"DisableEnhancedMonitoringResponse"
"fixture/DisableEnhancedMonitoringResponse.proto"
kinesis
(Proxy :: Proxy DisableEnhancedMonitoring)
responseListTagsForStream :: ListTagsForStreamResponse -> TestTree
responseListTagsForStream = res
"ListTagsForStreamResponse"
"fixture/ListTagsForStreamResponse.proto"
kinesis
(Proxy :: Proxy ListTagsForStream)
responseAddTagsToStream :: AddTagsToStreamResponse -> TestTree
responseAddTagsToStream = res
"AddTagsToStreamResponse"
"fixture/AddTagsToStreamResponse.proto"
kinesis
(Proxy :: Proxy AddTagsToStream)
responsePutRecords :: PutRecordsResponse -> TestTree
responsePutRecords = res
"PutRecordsResponse"
"fixture/PutRecordsResponse.proto"
kinesis
(Proxy :: Proxy PutRecords)
responseDeleteStream :: DeleteStreamResponse -> TestTree
responseDeleteStream = res
"DeleteStreamResponse"
"fixture/DeleteStreamResponse.proto"
kinesis
(Proxy :: Proxy DeleteStream)
responseRemoveTagsFromStream :: RemoveTagsFromStreamResponse -> TestTree
responseRemoveTagsFromStream = res
"RemoveTagsFromStreamResponse"
"fixture/RemoveTagsFromStreamResponse.proto"
kinesis
(Proxy :: Proxy RemoveTagsFromStream)
responseListStreams :: ListStreamsResponse -> TestTree
responseListStreams = res
"ListStreamsResponse"
"fixture/ListStreamsResponse.proto"
kinesis
(Proxy :: Proxy ListStreams)
responseCreateStream :: CreateStreamResponse -> TestTree
responseCreateStream = res
"CreateStreamResponse"
"fixture/CreateStreamResponse.proto"
kinesis
(Proxy :: Proxy CreateStream)
responseSplitShard :: SplitShardResponse -> TestTree
responseSplitShard = res
"SplitShardResponse"
"fixture/SplitShardResponse.proto"
kinesis
(Proxy :: Proxy SplitShard)
responseIncreaseStreamRetentionPeriod :: IncreaseStreamRetentionPeriodResponse -> TestTree
responseIncreaseStreamRetentionPeriod = res
"IncreaseStreamRetentionPeriodResponse"
"fixture/IncreaseStreamRetentionPeriodResponse.proto"
kinesis
(Proxy :: Proxy IncreaseStreamRetentionPeriod)
responseDescribeStream :: DescribeStreamResponse -> TestTree
responseDescribeStream = res
"DescribeStreamResponse"
"fixture/DescribeStreamResponse.proto"
kinesis
(Proxy :: Proxy DescribeStream)