packages feed

amazonka-devicefarm 1.4.2 → 1.4.3

raw patch · 31 files changed

+335/−511 lines, 31 filesdep ~amazonka-coredep ~amazonka-devicefarmdep ~amazonka-testPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core, amazonka-devicefarm, amazonka-test

API changes (from Hackage documentation)

Files

README.md view
@@ -8,14 +8,12 @@  ## Version -`1.4.2`+`1.4.3`   ## Description -AWS Device Farm is a service that enables mobile app developers to test-Android, iOS, and Fire OS apps on physical phones, tablets, and other-devices in the cloud.+AWS Device Farm is a service that enables mobile app developers to test Android, iOS, and Fire OS apps on physical phones, tablets, and other devices in the cloud.  Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-devicefarm) and the [AWS API Reference](https://aws.amazon.com/documentation/).
amazonka-devicefarm.cabal view
@@ -1,5 +1,5 @@ name:                  amazonka-devicefarm-version:               1.4.2+version:               1.4.3 synopsis:              Amazon Device Farm SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -13,9 +13,7 @@ cabal-version:         >= 1.10 extra-source-files:    README.md fixture/*.yaml fixture/*.proto description:-    AWS Device Farm is a service that enables mobile app developers to test-    Android, iOS, and Fire OS apps on physical phones, tablets, and other-    devices in the cloud.+    AWS Device Farm is a service that enables mobile app developers to test Android, iOS, and Fire OS apps on physical phones, tablets, and other devices in the cloud.     .     The types from this library are intended to be used with     <http://hackage.haskell.org/package/amazonka amazonka>, which provides@@ -88,7 +86,7 @@         , Network.AWS.DeviceFarm.Types.Sum      build-depends:-          amazonka-core == 1.4.2.*+          amazonka-core == 1.4.3.*         , base          >= 4.7     && < 5  test-suite amazonka-devicefarm-test@@ -108,9 +106,9 @@         , Test.AWS.DeviceFarm.Internal      build-depends:-          amazonka-core == 1.4.2.*-        , amazonka-test == 1.4.2.*-        , amazonka-devicefarm == 1.4.2.*+          amazonka-core == 1.4.3.*+        , amazonka-test == 1.4.3.*+        , amazonka-devicefarm == 1.4.3.*         , base         , bytestring         , tasty
gen/Network/AWS/DeviceFarm.hs view
@@ -11,9 +11,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- AWS Device Farm is a service that enables mobile app developers to test--- Android, iOS, and Fire OS apps on physical phones, tablets, and other--- devices in the cloud.+-- AWS Device Farm is a service that enables mobile app developers to test Android, iOS, and Fire OS apps on physical phones, tablets, and other devices in the cloud. module Network.AWS.DeviceFarm     (     -- * Service Configuration
gen/Network/AWS/DeviceFarm/CreateUpload.hs view
@@ -103,22 +103,17 @@ -- -- -   EXTERNAL_DATA: An external data upload. ----- -   APPIUM_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test package---     upload.+-- -   APPIUM_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test package upload. ----- -   APPIUM_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test package---     upload.+-- -   APPIUM_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test package upload. -- -- -   APPIUM_PYTHON_TEST_PACKAGE: An Appium Python test package upload. ----- -   APPIUM_WEB_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test---     package upload.+-- -   APPIUM_WEB_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test package upload. ----- -   APPIUM_WEB_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test---     package upload.+-- -   APPIUM_WEB_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test package upload. ----- -   APPIUM_WEB_PYTHON_TEST_PACKAGE: An Appium Python test package---     upload.+-- -   APPIUM_WEB_PYTHON_TEST_PACKAGE: An Appium Python test package upload. -- -- -   CALABASH_TEST_PACKAGE: A Calabash test package upload. --@@ -132,8 +127,7 @@ -- -- -   XCTEST_UI_TEST_PACKAGE: An XCode UI test package upload. ----- __Note__ If you call 'CreateUpload' with 'WEB_APP' specified, AWS Device--- Farm throws an 'ArgumentException' error.+-- __Note__ If you call 'CreateUpload' with 'WEB_APP' specified, AWS Device Farm throws an 'ArgumentException' error. cuType :: Lens' CreateUpload UploadType cuType = lens _cuType (\ s a -> s{_cuType = a});
gen/Network/AWS/DeviceFarm/DeleteDevicePool.hs view
@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Deletes a device pool given the pool ARN. Does not allow deletion of--- curated pools owned by the system.+-- Deletes a device pool given the pool ARN. Does not allow deletion of curated pools owned by the system. module Network.AWS.DeviceFarm.DeleteDevicePool     (     -- * Creating a Request@@ -62,8 +61,7 @@     { _ddpArn = pArn_     } --- | Represents the Amazon Resource Name (ARN) of the Device Farm device pool--- you wish to delete.+-- | Represents the Amazon Resource Name (ARN) of the Device Farm device pool you wish to delete. ddpArn :: Lens' DeleteDevicePool Text ddpArn = lens _ddpArn (\ s a -> s{_ddpArn = a});
gen/Network/AWS/DeviceFarm/DeleteProject.hs view
@@ -63,8 +63,7 @@     { _dpArn = pArn_     } --- | Represents the Amazon Resource Name (ARN) of the Device Farm project you--- wish to delete.+-- | Represents the Amazon Resource Name (ARN) of the Device Farm project you wish to delete. dpArn :: Lens' DeleteProject Text dpArn = lens _dpArn (\ s a -> s{_dpArn = a});
gen/Network/AWS/DeviceFarm/DeleteUpload.hs view
@@ -61,8 +61,7 @@     { _duArn = pArn_     } --- | Represents the Amazon Resource Name (ARN) of the Device Farm upload you--- wish to delete.+-- | Represents the Amazon Resource Name (ARN) of the Device Farm upload you wish to delete. duArn :: Lens' DeleteUpload Text duArn = lens _duArn (\ s a -> s{_duArn = a});
gen/Network/AWS/DeviceFarm/GetAccountSettings.hs view
@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns the number of unmetered iOS and\/or unmetered Android devices--- that have been purchased by the account.+-- Returns the number of unmetered iOS and\/or unmetered Android devices that have been purchased by the account. module Network.AWS.DeviceFarm.GetAccountSettings     (     -- * Creating a Request@@ -87,8 +86,7 @@ instance ToQuery GetAccountSettings where         toQuery = const mempty --- | Represents the account settings return values from the--- 'GetAccountSettings' request.+-- | Represents the account settings return values from the 'GetAccountSettings' request. -- -- /See:/ 'getAccountSettingsResponse' smart constructor. data GetAccountSettingsResponse = GetAccountSettingsResponse'
gen/Network/AWS/DeviceFarm/GetDevicePoolCompatibility.hs view
@@ -83,9 +83,7 @@ -- -- -   BUILTIN_FUZZ: The built-in fuzz type. ----- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an---     Android app, interacting with it and capturing screenshots at the---     same time.+-- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an Android app, interacting with it and capturing screenshots at the same time. -- -- -   APPIUM_JAVA_JUNIT: The Appium Java JUnit type. --
gen/Network/AWS/DeviceFarm/GetOfferingStatus.hs view
@@ -18,13 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Gets the current status and future status of all offerings purchased by--- an AWS account. The response indicates how many offerings are currently--- available and the offerings that will be available in the next period.--- The API returns a 'NotEligible' error if the user is not permitted to--- invoke the operation. Please contact--- <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com>--- if you believe that you should be able to invoke this operation.+-- Gets the current status and future status of all offerings purchased by an AWS account. The response indicates how many offerings are currently available and the offerings that will be available in the next period. The API returns a 'NotEligible' error if the user is not permitted to invoke the operation. Please contact <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com> if you believe that you should be able to invoke this operation. module Network.AWS.DeviceFarm.GetOfferingStatus     (     -- * Creating a Request@@ -50,8 +44,7 @@ import           Network.AWS.Request import           Network.AWS.Response --- | Represents the request to retrieve the offering status for the specified--- customer or account.+-- | Represents the request to retrieve the offering status for the specified customer or account. -- -- /See:/ 'getOfferingStatus' smart constructor. newtype GetOfferingStatus = GetOfferingStatus'@@ -70,9 +63,7 @@     { _gosNextToken = Nothing     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. gosNextToken :: Lens' GetOfferingStatus (Maybe Text) gosNextToken = lens _gosNextToken (\ s a -> s{_gosNextToken = a}); @@ -153,9 +144,7 @@ gosrsCurrent :: Lens' GetOfferingStatusResponse (HashMap Text OfferingStatus) gosrsCurrent = lens _gosrsCurrent (\ s a -> s{_gosrsCurrent = a}) . _Default . _Map; --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. gosrsNextToken :: Lens' GetOfferingStatusResponse (Maybe Text) gosrsNextToken = lens _gosrsNextToken (\ s a -> s{_gosrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListArtifacts.hs view
@@ -77,9 +77,7 @@     , _laType = pType_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. laNextToken :: Lens' ListArtifacts (Maybe Text) laNextToken = lens _laNextToken (\ s a -> s{_laNextToken = a}); @@ -173,9 +171,7 @@ larsArtifacts :: Lens' ListArtifactsResponse [Artifact] larsArtifacts = lens _larsArtifacts (\ s a -> s{_larsArtifacts = a}) . _Default . _Coerce; --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. larsNextToken :: Lens' ListArtifactsResponse (Maybe Text) larsNextToken = lens _larsNextToken (\ s a -> s{_larsNextToken = a});
gen/Network/AWS/DeviceFarm/ListDevicePools.hs view
@@ -76,9 +76,7 @@     , _ldpArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. ldpNextToken :: Lens' ListDevicePools (Maybe Text) ldpNextToken = lens _ldpNextToken (\ s a -> s{_ldpNextToken = a}); @@ -86,11 +84,9 @@ -- -- Allowed values include: ----- -   CURATED: A device pool that is created and managed by AWS Device---     Farm.+-- -   CURATED: A device pool that is created and managed by AWS Device Farm. ----- -   PRIVATE: A device pool that is created and managed by the device---     pool developer.+-- -   PRIVATE: A device pool that is created and managed by the device pool developer. -- ldpType :: Lens' ListDevicePools (Maybe DevicePoolType) ldpType = lens _ldpType (\ s a -> s{_ldpType = a});@@ -176,9 +172,7 @@ ldprsDevicePools :: Lens' ListDevicePoolsResponse [DevicePool] ldprsDevicePools = lens _ldprsDevicePools (\ s a -> s{_ldprsDevicePools = a}) . _Default . _Coerce; --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. ldprsNextToken :: Lens' ListDevicePoolsResponse (Maybe Text) ldprsNextToken = lens _ldprsNextToken (\ s a -> s{_ldprsNextToken = a});
gen/Network/AWS/DeviceFarm/ListDevices.hs view
@@ -74,9 +74,7 @@ ldArn :: Lens' ListDevices (Maybe Text) ldArn = lens _ldArn (\ s a -> s{_ldArn = a}); --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. ldNextToken :: Lens' ListDevices (Maybe Text) ldNextToken = lens _ldNextToken (\ s a -> s{_ldNextToken = a}); @@ -151,9 +149,7 @@     , _ldrsResponseStatus = pResponseStatus_     } --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. ldrsNextToken :: Lens' ListDevicesResponse (Maybe Text) ldrsNextToken = lens _ldrsNextToken (\ s a -> s{_ldrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListJobs.hs view
@@ -71,9 +71,7 @@     , _ljArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. ljNextToken :: Lens' ListJobs (Maybe Text) ljNextToken = lens _ljNextToken (\ s a -> s{_ljNextToken = a}); @@ -156,9 +154,7 @@ ljrsJobs :: Lens' ListJobsResponse [Job] ljrsJobs = lens _ljrsJobs (\ s a -> s{_ljrsJobs = a}) . _Default . _Coerce; --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. ljrsNextToken :: Lens' ListJobsResponse (Maybe Text) ljrsNextToken = lens _ljrsNextToken (\ s a -> s{_ljrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListOfferingTransactions.hs view
@@ -18,13 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns a list of all historical purchases, renewals, and system renewal--- transactions for an AWS account. The list is paginated and ordered by a--- descending timestamp (most recent transactions are first). The API--- returns a 'NotEligible' error if the user is not permitted to invoke the--- operation. Please contact--- <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com>--- if you believe that you should be able to invoke this operation.+-- Returns a list of all historical purchases, renewals, and system renewal transactions for an AWS account. The list is paginated and ordered by a descending timestamp (most recent transactions are first). The API returns a 'NotEligible' error if the user is not permitted to invoke the operation. Please contact <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com> if you believe that you should be able to invoke this operation. module Network.AWS.DeviceFarm.ListOfferingTransactions     (     -- * Creating a Request@@ -68,9 +62,7 @@     { _lotNextToken = Nothing     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lotNextToken :: Lens' ListOfferingTransactions (Maybe Text) lotNextToken = lens _lotNextToken (\ s a -> s{_lotNextToken = a}); @@ -139,14 +131,11 @@     , _lotrsResponseStatus = pResponseStatus_     } --- | The audit log of subscriptions you have purchased and modified through--- AWS Device Farm.+-- | The audit log of subscriptions you have purchased and modified through AWS Device Farm. lotrsOfferingTransactions :: Lens' ListOfferingTransactionsResponse [OfferingTransaction] lotrsOfferingTransactions = lens _lotrsOfferingTransactions (\ s a -> s{_lotrsOfferingTransactions = a}) . _Default . _Coerce; --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lotrsNextToken :: Lens' ListOfferingTransactionsResponse (Maybe Text) lotrsNextToken = lens _lotrsNextToken (\ s a -> s{_lotrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListOfferings.hs view
@@ -18,12 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns a list of products or offerings that the user can manage through--- the API. Each offering record indicates the recurring price per unit and--- the frequency for that offering. The API returns a 'NotEligible' error--- if the user is not permitted to invoke the operation. Please contact--- <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com>--- if you believe that you should be able to invoke this operation.+-- Returns a list of products or offerings that the user can manage through the API. Each offering record indicates the recurring price per unit and the frequency for that offering. The API returns a 'NotEligible' error if the user is not permitted to invoke the operation. Please contact <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com> if you believe that you should be able to invoke this operation. module Network.AWS.DeviceFarm.ListOfferings     (     -- * Creating a Request@@ -67,9 +62,7 @@     { _loNextToken = Nothing     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. loNextToken :: Lens' ListOfferings (Maybe Text) loNextToken = lens _loNextToken (\ s a -> s{_loNextToken = a}); @@ -136,9 +129,7 @@     , _lorsResponseStatus = pResponseStatus_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lorsNextToken :: Lens' ListOfferingsResponse (Maybe Text) lorsNextToken = lens _lorsNextToken (\ s a -> s{_lorsNextToken = a});
gen/Network/AWS/DeviceFarm/ListProjects.hs view
@@ -74,9 +74,7 @@ lpArn :: Lens' ListProjects (Maybe Text) lpArn = lens _lpArn (\ s a -> s{_lpArn = a}); --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lpNextToken :: Lens' ListProjects (Maybe Text) lpNextToken = lens _lpNextToken (\ s a -> s{_lpNextToken = a}); @@ -151,9 +149,7 @@     , _lprsResponseStatus = pResponseStatus_     } --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. lprsNextToken :: Lens' ListProjectsResponse (Maybe Text) lprsNextToken = lens _lprsNextToken (\ s a -> s{_lprsNextToken = a});
gen/Network/AWS/DeviceFarm/ListRuns.hs view
@@ -71,9 +71,7 @@     , _lrArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lrNextToken :: Lens' ListRuns (Maybe Text) lrNextToken = lens _lrNextToken (\ s a -> s{_lrNextToken = a}); @@ -156,9 +154,7 @@ lrrsRuns :: Lens' ListRunsResponse [Run] lrrsRuns = lens _lrrsRuns (\ s a -> s{_lrrsRuns = a}) . _Default . _Coerce; --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. lrrsNextToken :: Lens' ListRunsResponse (Maybe Text) lrrsNextToken = lens _lrrsNextToken (\ s a -> s{_lrrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListSamples.hs view
@@ -71,9 +71,7 @@     , _lsArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lsNextToken :: Lens' ListSamples (Maybe Text) lsNextToken = lens _lsNextToken (\ s a -> s{_lsNextToken = a}); @@ -152,9 +150,7 @@     , _lrsResponseStatus = pResponseStatus_     } --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. lrsNextToken :: Lens' ListSamplesResponse (Maybe Text) lrsNextToken = lens _lrsNextToken (\ s a -> s{_lrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListSuites.hs view
@@ -71,9 +71,7 @@     , _lArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lNextToken :: Lens' ListSuites (Maybe Text) lNextToken = lens _lNextToken (\ s a -> s{_lNextToken = a}); @@ -152,9 +150,7 @@     , _lsrsResponseStatus = pResponseStatus_     } --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. lsrsNextToken :: Lens' ListSuitesResponse (Maybe Text) lsrsNextToken = lens _lsrsNextToken (\ s a -> s{_lsrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListTests.hs view
@@ -71,9 +71,7 @@     , _ltArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. ltNextToken :: Lens' ListTests (Maybe Text) ltNextToken = lens _ltNextToken (\ s a -> s{_ltNextToken = a}); @@ -156,9 +154,7 @@ ltrsTests :: Lens' ListTestsResponse [Test] ltrsTests = lens _ltrsTests (\ s a -> s{_ltrsTests = a}) . _Default . _Coerce; --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. ltrsNextToken :: Lens' ListTestsResponse (Maybe Text) ltrsNextToken = lens _ltrsNextToken (\ s a -> s{_ltrsNextToken = a});
gen/Network/AWS/DeviceFarm/ListUniqueProblems.hs view
@@ -71,9 +71,7 @@     , _lupArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. lupNextToken :: Lens' ListUniqueProblems (Maybe Text) lupNextToken = lens _lupNextToken (\ s a -> s{_lupNextToken = a}); @@ -155,9 +153,7 @@     , _luprsResponseStatus = pResponseStatus_     } --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. luprsNextToken :: Lens' ListUniqueProblemsResponse (Maybe Text) luprsNextToken = lens _luprsNextToken (\ s a -> s{_luprsNextToken = a});
gen/Network/AWS/DeviceFarm/ListUploads.hs view
@@ -71,9 +71,7 @@     , _luArn = pArn_     } --- | An identifier that was returned from the previous call to this--- operation, which can be used to return the next set of items in the--- list.+-- | An identifier that was returned from the previous call to this operation, which can be used to return the next set of items in the list. luNextToken :: Lens' ListUploads (Maybe Text) luNextToken = lens _luNextToken (\ s a -> s{_luNextToken = a}); @@ -152,9 +150,7 @@     , _lursResponseStatus = pResponseStatus_     } --- | If the number of items that are returned is significantly large, this is--- an identifier that is also returned, which can be used in a subsequent--- call to this operation to return the next set of items in the list.+-- | If the number of items that are returned is significantly large, this is an identifier that is also returned, which can be used in a subsequent call to this operation to return the next set of items in the list. lursNextToken :: Lens' ListUploadsResponse (Maybe Text) lursNextToken = lens _lursNextToken (\ s a -> s{_lursNextToken = a});
gen/Network/AWS/DeviceFarm/PurchaseOffering.hs view
@@ -18,12 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Immediately purchases offerings for an AWS account. Offerings renew with--- the latest total purchased quantity for an offering, unless the renewal--- was overridden. The API returns a 'NotEligible' error if the user is not--- permitted to invoke the operation. Please contact--- <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com>--- if you believe that you should be able to invoke this operation.+-- Immediately purchases offerings for an AWS account. Offerings renew with the latest total purchased quantity for an offering, unless the renewal was overridden. The API returns a 'NotEligible' error if the user is not permitted to invoke the operation. Please contact <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com> if you believe that you should be able to invoke this operation. module Network.AWS.DeviceFarm.PurchaseOffering     (     -- * Creating a Request
gen/Network/AWS/DeviceFarm/RenewOffering.hs view
@@ -18,12 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Explicitly sets the quantity of devices to renew for an offering,--- starting from the 'effectiveDate' of the next period. The API returns a--- 'NotEligible' error if the user is not permitted to invoke the--- operation. Please contact--- <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com>--- if you believe that you should be able to invoke this operation.+-- Explicitly sets the quantity of devices to renew for an offering, starting from the 'effectiveDate' of the next period. The API returns a 'NotEligible' error if the user is not permitted to invoke the operation. Please contact <mailto:aws-devicefarm-support'amazon.com aws-devicefarm-support\'amazon.com> if you believe that you should be able to invoke this operation. module Network.AWS.DeviceFarm.RenewOffering     (     -- * Creating a Request
gen/Network/AWS/DeviceFarm/StopRun.hs view
@@ -18,13 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Initiates a stop request for the current test run. AWS Device Farm will--- immediately stop the run on devices where tests have not started--- executing, and you will not be billed for these devices. On devices--- where tests have started executing, Setup Suite and Teardown Suite tests--- will run to completion before stopping execution on those devices. You--- will be billed for Setup, Teardown, and any tests that were in progress--- or already completed.+-- Initiates a stop request for the current test run. AWS Device Farm will immediately stop the run on devices where tests have not started executing, and you will not be billed for these devices. On devices where tests have started executing, Setup Suite and Teardown Suite tests will run to completion before stopping execution on those devices. You will be billed for Setup, Teardown, and any tests that were in progress or already completed. module Network.AWS.DeviceFarm.StopRun     (     -- * Creating a Request@@ -68,8 +62,7 @@     { _srArn = pArn_     } --- | Represents the Amazon Resource Name (ARN) of the Device Farm run you--- wish to stop.+-- | Represents the Amazon Resource Name (ARN) of the Device Farm run you wish to stop. srArn :: Lens' StopRun Text srArn = lens _srArn (\ s a -> s{_srArn = a});
gen/Network/AWS/DeviceFarm/Types.hs view
@@ -397,8 +397,7 @@       | has (hasStatus 509) e = Just "limit_exceeded"       | otherwise = Nothing --- | Exception gets thrown when a user is not eligible to perform the--- specified transaction.+-- | Exception gets thrown when a user is not eligible to perform the specified transaction. _NotEligibleException :: AsError a => Getting (First ServiceError) a ServiceError _NotEligibleException = _ServiceError . hasCode "NotEligibleException"
gen/Network/AWS/DeviceFarm/Types/Product.hs view
@@ -56,8 +56,7 @@ asUnmeteredDevices :: Lens' AccountSettings (HashMap DevicePlatform Int) asUnmeteredDevices = lens _asUnmeteredDevices (\ s a -> s{_asUnmeteredDevices = a}) . _Default . _Map; --- | Returns the unmetered remote access devices you have purchased or want--- to purchase.+-- | Returns the unmetered remote access devices you have purchased or want to purchase. asUnmeteredRemoteAccessDevices :: Lens' AccountSettings (HashMap DevicePlatform Int) asUnmeteredRemoteAccessDevices = lens _asUnmeteredRemoteAccessDevices (\ s a -> s{_asUnmeteredRemoteAccessDevices = a}) . _Default . _Map; @@ -75,8 +74,7 @@  instance NFData AccountSettings --- | Represents the output of a test. Examples of artifacts include logs and--- screenshots.+-- | Represents the output of a test. Examples of artifacts include logs and screenshots. -- -- /See:/ 'artifact' smart constructor. data Artifact = Artifact'@@ -115,8 +113,7 @@ aArn :: Lens' Artifact (Maybe Text) aArn = lens _aArn (\ s a -> s{_aArn = a}); --- | The pre-signed Amazon S3 URL that can be used with a corresponding GET--- request to download the artifact\'s file.+-- | The pre-signed Amazon S3 URL that can be used with a corresponding GET request to download the artifact\'s file. aUrl :: Lens' Artifact (Maybe Text) aUrl = lens _aUrl (\ s a -> s{_aUrl = a}); @@ -148,8 +145,7 @@ -- -- -   INSTRUMENTATION_OUTPUT: The instrumentation type. ----- -   EXERCISER_MONKEY_OUTPUT: For Android, the artifact (log) generated---     by an Android fuzz test.+-- -   EXERCISER_MONKEY_OUTPUT: For Android, the artifact (log) generated by an Android fuzz test. -- -- -   CALABASH_JSON_OUTPUT: The Calabash JSON output type. --@@ -229,8 +225,7 @@ cpuFrequency :: Lens' CPU (Maybe Text) cpuFrequency = lens _cpuFrequency (\ s a -> s{_cpuFrequency = a}); --- | The clock speed of the device\'s CPU, expressed in hertz (Hz). For--- example, a 1.2 GHz CPU is expressed as 1200000000.+-- | The clock speed of the device\'s CPU, expressed in hertz (Hz). For example, a 1.2 GHz CPU is expressed as 1200000000. cpuClock :: Lens' CPU (Maybe Double) cpuClock = lens _cpuClock (\ s a -> s{_cpuClock = a}); @@ -501,8 +496,7 @@  instance NFData Device --- | Represents the total (metered or unmetered) minutes used by the resource--- to run tests. Contains the sum of minutes consumed by all children.+-- | Represents the total (metered or unmetered) minutes used by the resource to run tests. Contains the sum of minutes consumed by all children. -- -- /See:/ 'deviceMinutes' smart constructor. data DeviceMinutes = DeviceMinutes'@@ -529,18 +523,15 @@     , _dmUnmetered = Nothing     } --- | When specified, represents only the sum of metered minutes used by the--- resource to run tests.+-- | When specified, represents only the sum of metered minutes used by the resource to run tests. dmMetered :: Lens' DeviceMinutes (Maybe Double) dmMetered = lens _dmMetered (\ s a -> s{_dmMetered = a}); --- | When specified, represents the total minutes used by the resource to run--- tests.+-- | When specified, represents the total minutes used by the resource to run tests. dmTotal :: Lens' DeviceMinutes (Maybe Double) dmTotal = lens _dmTotal (\ s a -> s{_dmTotal = a}); --- | When specified, represents only the sum of unmetered minutes used by the--- resource to run tests.+-- | When specified, represents only the sum of unmetered minutes used by the resource to run tests. dmUnmetered :: Lens' DeviceMinutes (Maybe Double) dmUnmetered = lens _dmUnmetered (\ s a -> s{_dmUnmetered = a}); @@ -607,11 +598,9 @@ -- -- Allowed values include: ----- -   CURATED: A device pool that is created and managed by AWS Device---     Farm.+-- -   CURATED: A device pool that is created and managed by AWS Device Farm. ----- -   PRIVATE: A device pool that is created and managed by the device---     pool developer.+-- -   PRIVATE: A device pool that is created and managed by the device pool developer. -- dType :: Lens' DevicePool (Maybe DevicePoolType) dType = lens _dType (\ s a -> s{_dType = a});@@ -881,9 +870,7 @@ -- -- -   BUILTIN_FUZZ: The built-in fuzz type. ----- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an---     Android app, interacting with it and capturing screenshots at the---     same time.+-- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an Android app, interacting with it and capturing screenshots at the same time. -- -- -   APPIUM_JAVA_JUNIT: The Appium Java JUnit type. --@@ -941,8 +928,7 @@  instance NFData Job --- | Represents a latitude and longitude pair, expressed in geographic--- coordinate system degrees (for example 47.6204, -122.3491).+-- | Represents a latitude and longitude pair, expressed in geographic coordinate system degrees (for example 47.6204, -122.3491). -- -- Elevation is currently not supported. --@@ -988,8 +974,7 @@                  [Just ("latitude" .= _lLatitude),                   Just ("longitude" .= _lLongitude)]) --- | A number representing the monetary amount for an offering or--- transaction.+-- | A number representing the monetary amount for an offering or transaction. -- -- /See:/ 'monetaryAmount' smart constructor. data MonetaryAmount = MonetaryAmount'@@ -1016,8 +1001,7 @@ maAmount :: Lens' MonetaryAmount (Maybe Double) maAmount = lens _maAmount (\ s a -> s{_maAmount = a}); --- | The currency code of a monetary amount. For example, 'USD' means \"U.S.--- dollars.\"+-- | The currency code of a monetary amount. For example, 'USD' means \"U.S. dollars.\" maCurrencyCode :: Lens' MonetaryAmount (Maybe CurrencyCode) maCurrencyCode = lens _maCurrencyCode (\ s a -> s{_maCurrencyCode = a}); @@ -1366,8 +1350,7 @@  instance NFData ProblemDetail --- | Represents an operating-system neutral workspace for running and--- managing tests.+-- | Represents an operating-system neutral workspace for running and managing tests. -- -- /See:/ 'project' smart constructor. data Project = Project'@@ -1418,8 +1401,7 @@  instance NFData Project --- | Represents the set of radios and their states on a device. Examples of--- radios include Wi-Fi, GPS, Bluetooth, and NFC.+-- | Represents the set of radios and their states on a device. Examples of radios include Wi-Fi, GPS, Bluetooth, and NFC. -- -- /See:/ 'radios' smart constructor. data Radios = Radios'@@ -1458,8 +1440,7 @@ rGps :: Lens' Radios (Maybe Bool) rGps = lens _rGps (\ s a -> s{_rGps = a}); --- | True if Bluetooth is enabled at the beginning of the test; otherwise,--- false.+-- | True if Bluetooth is enabled at the beginning of the test; otherwise, false. rBluetooth :: Lens' Radios (Maybe Bool) rBluetooth = lens _rBluetooth (\ s a -> s{_rBluetooth = a}); @@ -1521,8 +1502,7 @@  instance NFData RecurringCharge --- | Represents the screen resolution of a device in height and width,--- expressed in pixels.+-- | Represents the screen resolution of a device in height and width, expressed in pixels. -- -- /See:/ 'resolution' smart constructor. data Resolution = Resolution'@@ -1590,8 +1570,7 @@     , _rValue = Nothing     } --- | The rule\'s stringified attribute. For example, specify the value as--- '\"\\\"abc\\\"\"'.+-- | The rule\'s stringified attribute. For example, specify the value as '\"\\\"abc\\\"\"'. -- -- Allowed values include: --@@ -1645,8 +1624,7 @@                   ("operator" .=) <$> _rOperator,                   ("value" .=) <$> _rValue]) --- | Represents an app on a set of devices with a specific test and--- configuration.+-- | Represents an app on a set of devices with a specific test and configuration. -- -- /See:/ 'run' smart constructor. data Run = Run'@@ -1721,8 +1699,7 @@     , _runStarted = Nothing     } --- | Specifies the billing method for a test run: 'metered' or 'unmetered'.--- If the parameter is not specified, the default value is 'unmetered'.+-- | Specifies the billing method for a test run: 'metered' or 'unmetered'. If the parameter is not specified, the default value is 'unmetered'. runBillingMethod :: Lens' Run (Maybe BillingMethod) runBillingMethod = lens _runBillingMethod (\ s a -> s{_runBillingMethod = a}); @@ -1807,8 +1784,7 @@ runName :: Lens' Run (Maybe Text) runName = lens _runName (\ s a -> s{_runName = a}); --- | Represents the total (metered or unmetered) minutes used by the test--- run.+-- | Represents the total (metered or unmetered) minutes used by the test run. runDeviceMinutes :: Lens' Run (Maybe DeviceMinutes) runDeviceMinutes = lens _runDeviceMinutes (\ s a -> s{_runDeviceMinutes = a}); @@ -1818,9 +1794,7 @@ -- -- -   BUILTIN_FUZZ: The built-in fuzz type. ----- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an---     Android app, interacting with it and capturing screenshots at the---     same time.+-- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an Android app, interacting with it and capturing screenshots at the same time. -- -- -   APPIUM_JAVA_JUNIT: The Appium Java JUnit type. --@@ -1916,8 +1890,7 @@ samArn :: Lens' Sample (Maybe Text) samArn = lens _samArn (\ s a -> s{_samArn = a}); --- | The pre-signed Amazon S3 URL that can be used with a corresponding GET--- request to download the sample\'s file.+-- | The pre-signed Amazon S3 URL that can be used with a corresponding GET request to download the sample\'s file. samUrl :: Lens' Sample (Maybe Text) samUrl = lens _samUrl (\ s a -> s{_samUrl = a}); @@ -1925,12 +1898,9 @@ -- -- Must be one of the following values: ----- -   CPU: A CPU sample type. This is expressed as the app processing CPU---     time (including child processes) as reported by process, as a---     percentage.+-- -   CPU: A CPU sample type. This is expressed as the app processing CPU time (including child processes) as reported by process, as a percentage. ----- -   MEMORY: A memory usage sample type. This is expressed as the total---     proportional set size of an app process, in kilobytes.+-- -   MEMORY: A memory usage sample type. This is expressed as the total proportional set size of an app process, in kilobytes. -- -- -   NATIVE_AVG_DRAWTIME --@@ -1954,16 +1924,13 @@ -- -- -   RX ----- -   RX_RATE: The total number of bytes per second (TCP and UDP) that are---     sent, by app process.+-- -   RX_RATE: The total number of bytes per second (TCP and UDP) that are sent, by app process. ----- -   THREADS: A threads sample type. This is expressed as the total---     number of threads per app process.+-- -   THREADS: A threads sample type. This is expressed as the total number of threads per app process. -- -- -   TX ----- -   TX_RATE: The total number of bytes per second (TCP and UDP) that are---     received, by app process.+-- -   TX_RATE: The total number of bytes per second (TCP and UDP) that are received, by app process. -- samType :: Lens' Sample (Maybe SampleType) samType = lens _samType (\ s a -> s{_samType = a});@@ -1979,8 +1946,7 @@  instance NFData Sample --- | Represents the settings for a run. Includes things like location, radio--- states, auxiliary apps, and network profiles.+-- | Represents the settings for a run. Includes things like location, radio states, auxiliary apps, and network profiles. -- -- /See:/ 'scheduleRunConfiguration' smart constructor. data ScheduleRunConfiguration = ScheduleRunConfiguration'@@ -2023,8 +1989,7 @@     , _srcAuxiliaryApps = Nothing     } --- | Specifies the billing method for a test run: 'metered' or 'unmetered'.--- If the parameter is not specified, the default value is 'unmetered'.+-- | Specifies the billing method for a test run: 'metered' or 'unmetered'. If the parameter is not specified, the default value is 'unmetered'. srcBillingMethod :: Lens' ScheduleRunConfiguration (Maybe BillingMethod) srcBillingMethod = lens _srcBillingMethod (\ s a -> s{_srcBillingMethod = a}); @@ -2044,9 +2009,7 @@ srcNetworkProfileARN :: Lens' ScheduleRunConfiguration (Maybe Text) srcNetworkProfileARN = lens _srcNetworkProfileARN (\ s a -> s{_srcNetworkProfileARN = a}); --- | The ARN of the extra data for the run. The extra data is a .zip file--- that AWS Device Farm will extract to external data for Android or the--- app\'s sandbox for iOS.+-- | The ARN of the extra data for the run. The extra data is a .zip file that AWS Device Farm will extract to external data for Android or the app\'s sandbox for iOS. srcExtraDataPackageARN :: Lens' ScheduleRunConfiguration (Maybe Text) srcExtraDataPackageARN = lens _srcExtraDataPackageARN (\ s a -> s{_srcExtraDataPackageARN = a}); @@ -2107,8 +2070,7 @@ srtTestPackageARN :: Lens' ScheduleRunTest (Maybe Text) srtTestPackageARN = lens _srtTestPackageARN (\ s a -> s{_srtTestPackageARN = a}); --- | The test\'s parameters, such as test framework parameters and fixture--- settings.+-- | The test\'s parameters, such as test framework parameters and fixture settings. srtParameters :: Lens' ScheduleRunTest (HashMap Text Text) srtParameters = lens _srtParameters (\ s a -> s{_srtParameters = a}) . _Default . _Map; @@ -2122,9 +2084,7 @@ -- -- -   BUILTIN_FUZZ: The built-in fuzz type. ----- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an---     Android app, interacting with it and capturing screenshots at the---     same time.+-- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an Android app, interacting with it and capturing screenshots at the same time. -- -- -   APPIUM_JAVA_JUNIT: The Appium Java JUnit type. --@@ -2291,8 +2251,7 @@ sName :: Lens' Suite (Maybe Text) sName = lens _sName (\ s a -> s{_sName = a}); --- | Represents the total (metered or unmetered) minutes used by the test--- suite.+-- | Represents the total (metered or unmetered) minutes used by the test suite. sDeviceMinutes :: Lens' Suite (Maybe DeviceMinutes) sDeviceMinutes = lens _sDeviceMinutes (\ s a -> s{_sDeviceMinutes = a}); @@ -2302,9 +2261,7 @@ -- -- -   BUILTIN_FUZZ: The built-in fuzz type. ----- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an---     Android app, interacting with it and capturing screenshots at the---     same time.+-- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an Android app, interacting with it and capturing screenshots at the same time. -- -- -   APPIUM_JAVA_JUNIT: The Appium Java JUnit type. --@@ -2496,9 +2453,7 @@ -- -- -   BUILTIN_FUZZ: The built-in fuzz type. ----- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an---     Android app, interacting with it and capturing screenshots at the---     same time.+-- -   BUILTIN_EXPLORER: For Android, an app explorer that will traverse an Android app, interacting with it and capturing screenshots at the same time. -- -- -   APPIUM_JAVA_JUNIT: The Appium Java JUnit type. --@@ -2597,8 +2552,7 @@  instance NFData UniqueProblem --- | An app or a set of one or more tests to upload or that have been--- uploaded.+-- | An app or a set of one or more tests to upload or that have been uploaded. -- -- /See:/ 'upload' smart constructor. data Upload = Upload'@@ -2672,8 +2626,7 @@ uCreated :: Lens' Upload (Maybe UTCTime) uCreated = lens _uCreated (\ s a -> s{_uCreated = a}) . mapping _Time; --- | The pre-signed Amazon S3 URL that was used to store a file through a--- corresponding PUT request.+-- | The pre-signed Amazon S3 URL that was used to store a file through a corresponding PUT request. uUrl :: Lens' Upload (Maybe Text) uUrl = lens _uUrl (\ s a -> s{_uUrl = a}); @@ -2681,9 +2634,7 @@ uName :: Lens' Upload (Maybe Text) uName = lens _uName (\ s a -> s{_uName = a}); --- | The upload\'s metadata. For example, for Android, this contains--- information that is parsed from the manifest and is displayed in the AWS--- Device Farm console after the associated app is uploaded.+-- | The upload\'s metadata. For example, for Android, this contains information that is parsed from the manifest and is displayed in the AWS Device Farm console after the associated app is uploaded. uMetadata :: Lens' Upload (Maybe Text) uMetadata = lens _uMetadata (\ s a -> s{_uMetadata = a}); @@ -2699,22 +2650,17 @@ -- -- -   EXTERNAL_DATA: An external data upload. ----- -   APPIUM_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test package---     upload.+-- -   APPIUM_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test package upload. ----- -   APPIUM_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test package---     upload.+-- -   APPIUM_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test package upload. -- -- -   APPIUM_PYTHON_TEST_PACKAGE: An Appium Python test package upload. ----- -   APPIUM_WEB_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test---     package upload.+-- -   APPIUM_WEB_JAVA_JUNIT_TEST_PACKAGE: An Appium Java JUnit test package upload. ----- -   APPIUM_WEB_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test---     package upload.+-- -   APPIUM_WEB_JAVA_TESTNG_TEST_PACKAGE: An Appium Java TestNG test package upload. ----- -   APPIUM_WEB_PYTHON_TEST_PACKAGE: An Appium Python test package---     upload.+-- -   APPIUM_WEB_PYTHON_TEST_PACKAGE: An Appium Python test package upload. -- -- -   CALABASH_TEST_PACKAGE: A Calabash test package upload. --
gen/Network/AWS/DeviceFarm/UpdateDevicePool.hs view
@@ -18,9 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Modifies the name, description, and rules in a device pool given the--- attributes and the pool ARN. Rule updates are all-or-nothing, meaning--- they can only be updated as a whole (or not at all).+-- Modifies the name, description, and rules in a device pool given the attributes and the pool ARN. Rule updates are all-or-nothing, meaning they can only be updated as a whole (or not at all). module Network.AWS.DeviceFarm.UpdateDevicePool     (     -- * Creating a Request@@ -79,9 +77,7 @@     , _udpArn = pArn_     } --- | Represents the rules you wish to modify for the device pool. Updating--- rules is optional; however, if you choose to update rules for your--- request, the update will replace the existing rules.+-- | Represents the rules you wish to modify for the device pool. Updating rules is optional; however, if you choose to update rules for your request, the update will replace the existing rules. udpRules :: Lens' UpdateDevicePool [Rule] udpRules = lens _udpRules (\ s a -> s{_udpRules = a}) . _Default . _Coerce; @@ -93,8 +89,7 @@ udpDescription :: Lens' UpdateDevicePool (Maybe Text) udpDescription = lens _udpDescription (\ s a -> s{_udpDescription = a}); --- | The Amazon Resourc Name (ARN) of the Device Farm device pool you wish to--- update.+-- | The Amazon Resourc Name (ARN) of the Device Farm device pool you wish to update. udpArn :: Lens' UpdateDevicePool Text udpArn = lens _udpArn (\ s a -> s{_udpArn = a});
gen/Network/AWS/DeviceFarm/UpdateProject.hs view
@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Modifies the specified project name, given the project ARN and a new--- name.+-- Modifies the specified project name, given the project ARN and a new name. module Network.AWS.DeviceFarm.UpdateProject     (     -- * Creating a Request@@ -72,8 +71,7 @@ upName :: Lens' UpdateProject (Maybe Text) upName = lens _upName (\ s a -> s{_upName = a}); --- | The Amazon Resource Name (ARN) of the project whose name you wish to--- update.+-- | The Amazon Resource Name (ARN) of the project whose name you wish to update. upArn :: Lens' UpdateProject Text upArn = lens _upArn (\ s a -> s{_upArn = a});
test/Test/AWS/Gen/DeviceFarm.hs view
@@ -28,229 +28,229 @@ -- fixtures :: TestTree -- fixtures = --     [ testGroup "request"---         [ testListProjects $+--         [ requestListProjects $ --             listProjects -----         , testDeleteProject $+--         , requestDeleteProject $ --             deleteProject -----         , testUpdateProject $+--         , requestUpdateProject $ --             updateProject -----         , testGetDevicePoolCompatibility $+--         , requestGetDevicePoolCompatibility $ --             getDevicePoolCompatibility -----         , testListTests $+--         , requestListTests $ --             listTests -----         , testListArtifacts $+--         , requestListArtifacts $ --             listArtifacts -----         , testCreateUpload $+--         , requestCreateUpload $ --             createUpload -----         , testDeleteUpload $+--         , requestDeleteUpload $ --             deleteUpload -----         , testGetDevicePool $+--         , requestGetDevicePool $ --             getDevicePool -----         , testListDevicePools $+--         , requestListDevicePools $ --             listDevicePools -----         , testUpdateDevicePool $+--         , requestUpdateDevicePool $ --             updateDevicePool -----         , testDeleteDevicePool $+--         , requestDeleteDevicePool $ --             deleteDevicePool -----         , testGetUpload $+--         , requestGetUpload $ --             getUpload -----         , testListOfferingTransactions $+--         , requestListOfferingTransactions $ --             listOfferingTransactions -----         , testCreateDevicePool $+--         , requestCreateDevicePool $ --             createDevicePool -----         , testDeleteRun $+--         , requestDeleteRun $ --             deleteRun -----         , testListRuns $+--         , requestListRuns $ --             listRuns -----         , testGetTest $+--         , requestGetTest $ --             getTest -----         , testRenewOffering $+--         , requestRenewOffering $ --             renewOffering -----         , testGetDevice $+--         , requestGetDevice $ --             getDevice -----         , testListJobs $+--         , requestListJobs $ --             listJobs -----         , testGetJob $+--         , requestGetJob $ --             getJob -----         , testScheduleRun $+--         , requestScheduleRun $ --             scheduleRun -----         , testGetRun $+--         , requestGetRun $ --             getRun -----         , testListSamples $+--         , requestListSamples $ --             listSamples -----         , testListSuites $+--         , requestListSuites $ --             listSuites -----         , testGetAccountSettings $+--         , requestGetAccountSettings $ --             getAccountSettings -----         , testGetOfferingStatus $+--         , requestGetOfferingStatus $ --             getOfferingStatus -----         , testListUploads $+--         , requestListUploads $ --             listUploads -----         , testGetSuite $+--         , requestGetSuite $ --             getSuite -----         , testPurchaseOffering $+--         , requestPurchaseOffering $ --             purchaseOffering -----         , testGetProject $+--         , requestGetProject $ --             getProject -----         , testListUniqueProblems $+--         , requestListUniqueProblems $ --             listUniqueProblems -----         , testStopRun $+--         , requestStopRun $ --             stopRun -----         , testListDevices $+--         , requestListDevices $ --             listDevices -----         , testCreateProject $+--         , requestCreateProject $ --             createProject -----         , testListOfferings $+--         , requestListOfferings $ --             listOfferings -- --           ]  --     , testGroup "response"---         [ testListProjectsResponse $+--         [ responseListProjects $ --             listProjectsResponse -----         , testDeleteProjectResponse $+--         , responseDeleteProject $ --             deleteProjectResponse -----         , testUpdateProjectResponse $+--         , responseUpdateProject $ --             updateProjectResponse -----         , testGetDevicePoolCompatibilityResponse $+--         , responseGetDevicePoolCompatibility $ --             getDevicePoolCompatibilityResponse -----         , testListTestsResponse $+--         , responseListTests $ --             listTestsResponse -----         , testListArtifactsResponse $+--         , responseListArtifacts $ --             listArtifactsResponse -----         , testCreateUploadResponse $+--         , responseCreateUpload $ --             createUploadResponse -----         , testDeleteUploadResponse $+--         , responseDeleteUpload $ --             deleteUploadResponse -----         , testGetDevicePoolResponse $+--         , responseGetDevicePool $ --             getDevicePoolResponse -----         , testListDevicePoolsResponse $+--         , responseListDevicePools $ --             listDevicePoolsResponse -----         , testUpdateDevicePoolResponse $+--         , responseUpdateDevicePool $ --             updateDevicePoolResponse -----         , testDeleteDevicePoolResponse $+--         , responseDeleteDevicePool $ --             deleteDevicePoolResponse -----         , testGetUploadResponse $+--         , responseGetUpload $ --             getUploadResponse -----         , testListOfferingTransactionsResponse $+--         , responseListOfferingTransactions $ --             listOfferingTransactionsResponse -----         , testCreateDevicePoolResponse $+--         , responseCreateDevicePool $ --             createDevicePoolResponse -----         , testDeleteRunResponse $+--         , responseDeleteRun $ --             deleteRunResponse -----         , testListRunsResponse $+--         , responseListRuns $ --             listRunsResponse -----         , testGetTestResponse $+--         , responseGetTest $ --             getTestResponse -----         , testRenewOfferingResponse $+--         , responseRenewOffering $ --             renewOfferingResponse -----         , testGetDeviceResponse $+--         , responseGetDevice $ --             getDeviceResponse -----         , testListJobsResponse $+--         , responseListJobs $ --             listJobsResponse -----         , testGetJobResponse $+--         , responseGetJob $ --             getJobResponse -----         , testScheduleRunResponse $+--         , responseScheduleRun $ --             scheduleRunResponse -----         , testGetRunResponse $+--         , responseGetRun $ --             getRunResponse -----         , testListSamplesResponse $+--         , responseListSamples $ --             listSamplesResponse -----         , testListSuitesResponse $+--         , responseListSuites $ --             listSuitesResponse -----         , testGetAccountSettingsResponse $+--         , responseGetAccountSettings $ --             getAccountSettingsResponse -----         , testGetOfferingStatusResponse $+--         , responseGetOfferingStatus $ --             getOfferingStatusResponse -----         , testListUploadsResponse $+--         , responseListUploads $ --             listUploadsResponse -----         , testGetSuiteResponse $+--         , responseGetSuite $ --             getSuiteResponse -----         , testPurchaseOfferingResponse $+--         , responsePurchaseOffering $ --             purchaseOfferingResponse -----         , testGetProjectResponse $+--         , responseGetProject $ --             getProjectResponse -----         , testListUniqueProblemsResponse $+--         , responseListUniqueProblems $ --             listUniqueProblemsResponse -----         , testStopRunResponse $+--         , responseStopRun $ --             stopRunResponse -----         , testListDevicesResponse $+--         , responseListDevices $ --             listDevicesResponse -----         , testCreateProjectResponse $+--         , responseCreateProject $ --             createProjectResponse -----         , testListOfferingsResponse $+--         , responseListOfferings $ --             listOfferingsResponse -- --           ]@@ -258,447 +258,447 @@  -- Requests -testListProjects :: ListProjects -> TestTree-testListProjects = req+requestListProjects :: ListProjects -> TestTree+requestListProjects = req     "ListProjects"     "fixture/ListProjects.yaml" -testDeleteProject :: DeleteProject -> TestTree-testDeleteProject = req+requestDeleteProject :: DeleteProject -> TestTree+requestDeleteProject = req     "DeleteProject"     "fixture/DeleteProject.yaml" -testUpdateProject :: UpdateProject -> TestTree-testUpdateProject = req+requestUpdateProject :: UpdateProject -> TestTree+requestUpdateProject = req     "UpdateProject"     "fixture/UpdateProject.yaml" -testGetDevicePoolCompatibility :: GetDevicePoolCompatibility -> TestTree-testGetDevicePoolCompatibility = req+requestGetDevicePoolCompatibility :: GetDevicePoolCompatibility -> TestTree+requestGetDevicePoolCompatibility = req     "GetDevicePoolCompatibility"     "fixture/GetDevicePoolCompatibility.yaml" -testListTests :: ListTests -> TestTree-testListTests = req+requestListTests :: ListTests -> TestTree+requestListTests = req     "ListTests"     "fixture/ListTests.yaml" -testListArtifacts :: ListArtifacts -> TestTree-testListArtifacts = req+requestListArtifacts :: ListArtifacts -> TestTree+requestListArtifacts = req     "ListArtifacts"     "fixture/ListArtifacts.yaml" -testCreateUpload :: CreateUpload -> TestTree-testCreateUpload = req+requestCreateUpload :: CreateUpload -> TestTree+requestCreateUpload = req     "CreateUpload"     "fixture/CreateUpload.yaml" -testDeleteUpload :: DeleteUpload -> TestTree-testDeleteUpload = req+requestDeleteUpload :: DeleteUpload -> TestTree+requestDeleteUpload = req     "DeleteUpload"     "fixture/DeleteUpload.yaml" -testGetDevicePool :: GetDevicePool -> TestTree-testGetDevicePool = req+requestGetDevicePool :: GetDevicePool -> TestTree+requestGetDevicePool = req     "GetDevicePool"     "fixture/GetDevicePool.yaml" -testListDevicePools :: ListDevicePools -> TestTree-testListDevicePools = req+requestListDevicePools :: ListDevicePools -> TestTree+requestListDevicePools = req     "ListDevicePools"     "fixture/ListDevicePools.yaml" -testUpdateDevicePool :: UpdateDevicePool -> TestTree-testUpdateDevicePool = req+requestUpdateDevicePool :: UpdateDevicePool -> TestTree+requestUpdateDevicePool = req     "UpdateDevicePool"     "fixture/UpdateDevicePool.yaml" -testDeleteDevicePool :: DeleteDevicePool -> TestTree-testDeleteDevicePool = req+requestDeleteDevicePool :: DeleteDevicePool -> TestTree+requestDeleteDevicePool = req     "DeleteDevicePool"     "fixture/DeleteDevicePool.yaml" -testGetUpload :: GetUpload -> TestTree-testGetUpload = req+requestGetUpload :: GetUpload -> TestTree+requestGetUpload = req     "GetUpload"     "fixture/GetUpload.yaml" -testListOfferingTransactions :: ListOfferingTransactions -> TestTree-testListOfferingTransactions = req+requestListOfferingTransactions :: ListOfferingTransactions -> TestTree+requestListOfferingTransactions = req     "ListOfferingTransactions"     "fixture/ListOfferingTransactions.yaml" -testCreateDevicePool :: CreateDevicePool -> TestTree-testCreateDevicePool = req+requestCreateDevicePool :: CreateDevicePool -> TestTree+requestCreateDevicePool = req     "CreateDevicePool"     "fixture/CreateDevicePool.yaml" -testDeleteRun :: DeleteRun -> TestTree-testDeleteRun = req+requestDeleteRun :: DeleteRun -> TestTree+requestDeleteRun = req     "DeleteRun"     "fixture/DeleteRun.yaml" -testListRuns :: ListRuns -> TestTree-testListRuns = req+requestListRuns :: ListRuns -> TestTree+requestListRuns = req     "ListRuns"     "fixture/ListRuns.yaml" -testGetTest :: GetTest -> TestTree-testGetTest = req+requestGetTest :: GetTest -> TestTree+requestGetTest = req     "GetTest"     "fixture/GetTest.yaml" -testRenewOffering :: RenewOffering -> TestTree-testRenewOffering = req+requestRenewOffering :: RenewOffering -> TestTree+requestRenewOffering = req     "RenewOffering"     "fixture/RenewOffering.yaml" -testGetDevice :: GetDevice -> TestTree-testGetDevice = req+requestGetDevice :: GetDevice -> TestTree+requestGetDevice = req     "GetDevice"     "fixture/GetDevice.yaml" -testListJobs :: ListJobs -> TestTree-testListJobs = req+requestListJobs :: ListJobs -> TestTree+requestListJobs = req     "ListJobs"     "fixture/ListJobs.yaml" -testGetJob :: GetJob -> TestTree-testGetJob = req+requestGetJob :: GetJob -> TestTree+requestGetJob = req     "GetJob"     "fixture/GetJob.yaml" -testScheduleRun :: ScheduleRun -> TestTree-testScheduleRun = req+requestScheduleRun :: ScheduleRun -> TestTree+requestScheduleRun = req     "ScheduleRun"     "fixture/ScheduleRun.yaml" -testGetRun :: GetRun -> TestTree-testGetRun = req+requestGetRun :: GetRun -> TestTree+requestGetRun = req     "GetRun"     "fixture/GetRun.yaml" -testListSamples :: ListSamples -> TestTree-testListSamples = req+requestListSamples :: ListSamples -> TestTree+requestListSamples = req     "ListSamples"     "fixture/ListSamples.yaml" -testListSuites :: ListSuites -> TestTree-testListSuites = req+requestListSuites :: ListSuites -> TestTree+requestListSuites = req     "ListSuites"     "fixture/ListSuites.yaml" -testGetAccountSettings :: GetAccountSettings -> TestTree-testGetAccountSettings = req+requestGetAccountSettings :: GetAccountSettings -> TestTree+requestGetAccountSettings = req     "GetAccountSettings"     "fixture/GetAccountSettings.yaml" -testGetOfferingStatus :: GetOfferingStatus -> TestTree-testGetOfferingStatus = req+requestGetOfferingStatus :: GetOfferingStatus -> TestTree+requestGetOfferingStatus = req     "GetOfferingStatus"     "fixture/GetOfferingStatus.yaml" -testListUploads :: ListUploads -> TestTree-testListUploads = req+requestListUploads :: ListUploads -> TestTree+requestListUploads = req     "ListUploads"     "fixture/ListUploads.yaml" -testGetSuite :: GetSuite -> TestTree-testGetSuite = req+requestGetSuite :: GetSuite -> TestTree+requestGetSuite = req     "GetSuite"     "fixture/GetSuite.yaml" -testPurchaseOffering :: PurchaseOffering -> TestTree-testPurchaseOffering = req+requestPurchaseOffering :: PurchaseOffering -> TestTree+requestPurchaseOffering = req     "PurchaseOffering"     "fixture/PurchaseOffering.yaml" -testGetProject :: GetProject -> TestTree-testGetProject = req+requestGetProject :: GetProject -> TestTree+requestGetProject = req     "GetProject"     "fixture/GetProject.yaml" -testListUniqueProblems :: ListUniqueProblems -> TestTree-testListUniqueProblems = req+requestListUniqueProblems :: ListUniqueProblems -> TestTree+requestListUniqueProblems = req     "ListUniqueProblems"     "fixture/ListUniqueProblems.yaml" -testStopRun :: StopRun -> TestTree-testStopRun = req+requestStopRun :: StopRun -> TestTree+requestStopRun = req     "StopRun"     "fixture/StopRun.yaml" -testListDevices :: ListDevices -> TestTree-testListDevices = req+requestListDevices :: ListDevices -> TestTree+requestListDevices = req     "ListDevices"     "fixture/ListDevices.yaml" -testCreateProject :: CreateProject -> TestTree-testCreateProject = req+requestCreateProject :: CreateProject -> TestTree+requestCreateProject = req     "CreateProject"     "fixture/CreateProject.yaml" -testListOfferings :: ListOfferings -> TestTree-testListOfferings = req+requestListOfferings :: ListOfferings -> TestTree+requestListOfferings = req     "ListOfferings"     "fixture/ListOfferings.yaml"  -- Responses -testListProjectsResponse :: ListProjectsResponse -> TestTree-testListProjectsResponse = res+responseListProjects :: ListProjectsResponse -> TestTree+responseListProjects = res     "ListProjectsResponse"     "fixture/ListProjectsResponse.proto"     deviceFarm     (Proxy :: Proxy ListProjects) -testDeleteProjectResponse :: DeleteProjectResponse -> TestTree-testDeleteProjectResponse = res+responseDeleteProject :: DeleteProjectResponse -> TestTree+responseDeleteProject = res     "DeleteProjectResponse"     "fixture/DeleteProjectResponse.proto"     deviceFarm     (Proxy :: Proxy DeleteProject) -testUpdateProjectResponse :: UpdateProjectResponse -> TestTree-testUpdateProjectResponse = res+responseUpdateProject :: UpdateProjectResponse -> TestTree+responseUpdateProject = res     "UpdateProjectResponse"     "fixture/UpdateProjectResponse.proto"     deviceFarm     (Proxy :: Proxy UpdateProject) -testGetDevicePoolCompatibilityResponse :: GetDevicePoolCompatibilityResponse -> TestTree-testGetDevicePoolCompatibilityResponse = res+responseGetDevicePoolCompatibility :: GetDevicePoolCompatibilityResponse -> TestTree+responseGetDevicePoolCompatibility = res     "GetDevicePoolCompatibilityResponse"     "fixture/GetDevicePoolCompatibilityResponse.proto"     deviceFarm     (Proxy :: Proxy GetDevicePoolCompatibility) -testListTestsResponse :: ListTestsResponse -> TestTree-testListTestsResponse = res+responseListTests :: ListTestsResponse -> TestTree+responseListTests = res     "ListTestsResponse"     "fixture/ListTestsResponse.proto"     deviceFarm     (Proxy :: Proxy ListTests) -testListArtifactsResponse :: ListArtifactsResponse -> TestTree-testListArtifactsResponse = res+responseListArtifacts :: ListArtifactsResponse -> TestTree+responseListArtifacts = res     "ListArtifactsResponse"     "fixture/ListArtifactsResponse.proto"     deviceFarm     (Proxy :: Proxy ListArtifacts) -testCreateUploadResponse :: CreateUploadResponse -> TestTree-testCreateUploadResponse = res+responseCreateUpload :: CreateUploadResponse -> TestTree+responseCreateUpload = res     "CreateUploadResponse"     "fixture/CreateUploadResponse.proto"     deviceFarm     (Proxy :: Proxy CreateUpload) -testDeleteUploadResponse :: DeleteUploadResponse -> TestTree-testDeleteUploadResponse = res+responseDeleteUpload :: DeleteUploadResponse -> TestTree+responseDeleteUpload = res     "DeleteUploadResponse"     "fixture/DeleteUploadResponse.proto"     deviceFarm     (Proxy :: Proxy DeleteUpload) -testGetDevicePoolResponse :: GetDevicePoolResponse -> TestTree-testGetDevicePoolResponse = res+responseGetDevicePool :: GetDevicePoolResponse -> TestTree+responseGetDevicePool = res     "GetDevicePoolResponse"     "fixture/GetDevicePoolResponse.proto"     deviceFarm     (Proxy :: Proxy GetDevicePool) -testListDevicePoolsResponse :: ListDevicePoolsResponse -> TestTree-testListDevicePoolsResponse = res+responseListDevicePools :: ListDevicePoolsResponse -> TestTree+responseListDevicePools = res     "ListDevicePoolsResponse"     "fixture/ListDevicePoolsResponse.proto"     deviceFarm     (Proxy :: Proxy ListDevicePools) -testUpdateDevicePoolResponse :: UpdateDevicePoolResponse -> TestTree-testUpdateDevicePoolResponse = res+responseUpdateDevicePool :: UpdateDevicePoolResponse -> TestTree+responseUpdateDevicePool = res     "UpdateDevicePoolResponse"     "fixture/UpdateDevicePoolResponse.proto"     deviceFarm     (Proxy :: Proxy UpdateDevicePool) -testDeleteDevicePoolResponse :: DeleteDevicePoolResponse -> TestTree-testDeleteDevicePoolResponse = res+responseDeleteDevicePool :: DeleteDevicePoolResponse -> TestTree+responseDeleteDevicePool = res     "DeleteDevicePoolResponse"     "fixture/DeleteDevicePoolResponse.proto"     deviceFarm     (Proxy :: Proxy DeleteDevicePool) -testGetUploadResponse :: GetUploadResponse -> TestTree-testGetUploadResponse = res+responseGetUpload :: GetUploadResponse -> TestTree+responseGetUpload = res     "GetUploadResponse"     "fixture/GetUploadResponse.proto"     deviceFarm     (Proxy :: Proxy GetUpload) -testListOfferingTransactionsResponse :: ListOfferingTransactionsResponse -> TestTree-testListOfferingTransactionsResponse = res+responseListOfferingTransactions :: ListOfferingTransactionsResponse -> TestTree+responseListOfferingTransactions = res     "ListOfferingTransactionsResponse"     "fixture/ListOfferingTransactionsResponse.proto"     deviceFarm     (Proxy :: Proxy ListOfferingTransactions) -testCreateDevicePoolResponse :: CreateDevicePoolResponse -> TestTree-testCreateDevicePoolResponse = res+responseCreateDevicePool :: CreateDevicePoolResponse -> TestTree+responseCreateDevicePool = res     "CreateDevicePoolResponse"     "fixture/CreateDevicePoolResponse.proto"     deviceFarm     (Proxy :: Proxy CreateDevicePool) -testDeleteRunResponse :: DeleteRunResponse -> TestTree-testDeleteRunResponse = res+responseDeleteRun :: DeleteRunResponse -> TestTree+responseDeleteRun = res     "DeleteRunResponse"     "fixture/DeleteRunResponse.proto"     deviceFarm     (Proxy :: Proxy DeleteRun) -testListRunsResponse :: ListRunsResponse -> TestTree-testListRunsResponse = res+responseListRuns :: ListRunsResponse -> TestTree+responseListRuns = res     "ListRunsResponse"     "fixture/ListRunsResponse.proto"     deviceFarm     (Proxy :: Proxy ListRuns) -testGetTestResponse :: GetTestResponse -> TestTree-testGetTestResponse = res+responseGetTest :: GetTestResponse -> TestTree+responseGetTest = res     "GetTestResponse"     "fixture/GetTestResponse.proto"     deviceFarm     (Proxy :: Proxy GetTest) -testRenewOfferingResponse :: RenewOfferingResponse -> TestTree-testRenewOfferingResponse = res+responseRenewOffering :: RenewOfferingResponse -> TestTree+responseRenewOffering = res     "RenewOfferingResponse"     "fixture/RenewOfferingResponse.proto"     deviceFarm     (Proxy :: Proxy RenewOffering) -testGetDeviceResponse :: GetDeviceResponse -> TestTree-testGetDeviceResponse = res+responseGetDevice :: GetDeviceResponse -> TestTree+responseGetDevice = res     "GetDeviceResponse"     "fixture/GetDeviceResponse.proto"     deviceFarm     (Proxy :: Proxy GetDevice) -testListJobsResponse :: ListJobsResponse -> TestTree-testListJobsResponse = res+responseListJobs :: ListJobsResponse -> TestTree+responseListJobs = res     "ListJobsResponse"     "fixture/ListJobsResponse.proto"     deviceFarm     (Proxy :: Proxy ListJobs) -testGetJobResponse :: GetJobResponse -> TestTree-testGetJobResponse = res+responseGetJob :: GetJobResponse -> TestTree+responseGetJob = res     "GetJobResponse"     "fixture/GetJobResponse.proto"     deviceFarm     (Proxy :: Proxy GetJob) -testScheduleRunResponse :: ScheduleRunResponse -> TestTree-testScheduleRunResponse = res+responseScheduleRun :: ScheduleRunResponse -> TestTree+responseScheduleRun = res     "ScheduleRunResponse"     "fixture/ScheduleRunResponse.proto"     deviceFarm     (Proxy :: Proxy ScheduleRun) -testGetRunResponse :: GetRunResponse -> TestTree-testGetRunResponse = res+responseGetRun :: GetRunResponse -> TestTree+responseGetRun = res     "GetRunResponse"     "fixture/GetRunResponse.proto"     deviceFarm     (Proxy :: Proxy GetRun) -testListSamplesResponse :: ListSamplesResponse -> TestTree-testListSamplesResponse = res+responseListSamples :: ListSamplesResponse -> TestTree+responseListSamples = res     "ListSamplesResponse"     "fixture/ListSamplesResponse.proto"     deviceFarm     (Proxy :: Proxy ListSamples) -testListSuitesResponse :: ListSuitesResponse -> TestTree-testListSuitesResponse = res+responseListSuites :: ListSuitesResponse -> TestTree+responseListSuites = res     "ListSuitesResponse"     "fixture/ListSuitesResponse.proto"     deviceFarm     (Proxy :: Proxy ListSuites) -testGetAccountSettingsResponse :: GetAccountSettingsResponse -> TestTree-testGetAccountSettingsResponse = res+responseGetAccountSettings :: GetAccountSettingsResponse -> TestTree+responseGetAccountSettings = res     "GetAccountSettingsResponse"     "fixture/GetAccountSettingsResponse.proto"     deviceFarm     (Proxy :: Proxy GetAccountSettings) -testGetOfferingStatusResponse :: GetOfferingStatusResponse -> TestTree-testGetOfferingStatusResponse = res+responseGetOfferingStatus :: GetOfferingStatusResponse -> TestTree+responseGetOfferingStatus = res     "GetOfferingStatusResponse"     "fixture/GetOfferingStatusResponse.proto"     deviceFarm     (Proxy :: Proxy GetOfferingStatus) -testListUploadsResponse :: ListUploadsResponse -> TestTree-testListUploadsResponse = res+responseListUploads :: ListUploadsResponse -> TestTree+responseListUploads = res     "ListUploadsResponse"     "fixture/ListUploadsResponse.proto"     deviceFarm     (Proxy :: Proxy ListUploads) -testGetSuiteResponse :: GetSuiteResponse -> TestTree-testGetSuiteResponse = res+responseGetSuite :: GetSuiteResponse -> TestTree+responseGetSuite = res     "GetSuiteResponse"     "fixture/GetSuiteResponse.proto"     deviceFarm     (Proxy :: Proxy GetSuite) -testPurchaseOfferingResponse :: PurchaseOfferingResponse -> TestTree-testPurchaseOfferingResponse = res+responsePurchaseOffering :: PurchaseOfferingResponse -> TestTree+responsePurchaseOffering = res     "PurchaseOfferingResponse"     "fixture/PurchaseOfferingResponse.proto"     deviceFarm     (Proxy :: Proxy PurchaseOffering) -testGetProjectResponse :: GetProjectResponse -> TestTree-testGetProjectResponse = res+responseGetProject :: GetProjectResponse -> TestTree+responseGetProject = res     "GetProjectResponse"     "fixture/GetProjectResponse.proto"     deviceFarm     (Proxy :: Proxy GetProject) -testListUniqueProblemsResponse :: ListUniqueProblemsResponse -> TestTree-testListUniqueProblemsResponse = res+responseListUniqueProblems :: ListUniqueProblemsResponse -> TestTree+responseListUniqueProblems = res     "ListUniqueProblemsResponse"     "fixture/ListUniqueProblemsResponse.proto"     deviceFarm     (Proxy :: Proxy ListUniqueProblems) -testStopRunResponse :: StopRunResponse -> TestTree-testStopRunResponse = res+responseStopRun :: StopRunResponse -> TestTree+responseStopRun = res     "StopRunResponse"     "fixture/StopRunResponse.proto"     deviceFarm     (Proxy :: Proxy StopRun) -testListDevicesResponse :: ListDevicesResponse -> TestTree-testListDevicesResponse = res+responseListDevices :: ListDevicesResponse -> TestTree+responseListDevices = res     "ListDevicesResponse"     "fixture/ListDevicesResponse.proto"     deviceFarm     (Proxy :: Proxy ListDevices) -testCreateProjectResponse :: CreateProjectResponse -> TestTree-testCreateProjectResponse = res+responseCreateProject :: CreateProjectResponse -> TestTree+responseCreateProject = res     "CreateProjectResponse"     "fixture/CreateProjectResponse.proto"     deviceFarm     (Proxy :: Proxy CreateProject) -testListOfferingsResponse :: ListOfferingsResponse -> TestTree-testListOfferingsResponse = res+responseListOfferings :: ListOfferingsResponse -> TestTree+responseListOfferings = res     "ListOfferingsResponse"     "fixture/ListOfferingsResponse.proto"     deviceFarm