diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.4.0`
+`1.4.1`
 
 
 ## Description
diff --git a/amazonka-ml.cabal b/amazonka-ml.cabal
--- a/amazonka-ml.cabal
+++ b/amazonka-ml.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-ml
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon Machine Learning SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -74,7 +74,7 @@
         , Network.AWS.MachineLearning.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-ml-test
@@ -94,9 +94,9 @@
         , Test.AWS.MachineLearning.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-ml == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-ml == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/MachineLearning/CreateBatchPrediction.hs b/gen/Network/AWS/MachineLearning/CreateBatchPrediction.hs
--- a/gen/Network/AWS/MachineLearning/CreateBatchPrediction.hs
+++ b/gen/Network/AWS/MachineLearning/CreateBatchPrediction.hs
@@ -139,6 +139,8 @@
 
 instance Hashable CreateBatchPrediction
 
+instance NFData CreateBatchPrediction
+
 instance ToHeaders CreateBatchPrediction where
         toHeaders
           = const
@@ -206,3 +208,5 @@
 -- | The response status code.
 cbprsResponseStatus :: Lens' CreateBatchPredictionResponse Int
 cbprsResponseStatus = lens _cbprsResponseStatus (\ s a -> s{_cbprsResponseStatus = a});
+
+instance NFData CreateBatchPredictionResponse
diff --git a/gen/Network/AWS/MachineLearning/CreateDataSourceFromRDS.hs b/gen/Network/AWS/MachineLearning/CreateDataSourceFromRDS.hs
--- a/gen/Network/AWS/MachineLearning/CreateDataSourceFromRDS.hs
+++ b/gen/Network/AWS/MachineLearning/CreateDataSourceFromRDS.hs
@@ -184,6 +184,8 @@
 
 instance Hashable CreateDataSourceFromRDS
 
+instance NFData CreateDataSourceFromRDS
+
 instance ToHeaders CreateDataSourceFromRDS where
         toHeaders
           = const
@@ -251,3 +253,5 @@
 -- | The response status code.
 cdsfrdsrsResponseStatus :: Lens' CreateDataSourceFromRDSResponse Int
 cdsfrdsrsResponseStatus = lens _cdsfrdsrsResponseStatus (\ s a -> s{_cdsfrdsrsResponseStatus = a});
+
+instance NFData CreateDataSourceFromRDSResponse
diff --git a/gen/Network/AWS/MachineLearning/CreateDataSourceFromRedshift.hs b/gen/Network/AWS/MachineLearning/CreateDataSourceFromRedshift.hs
--- a/gen/Network/AWS/MachineLearning/CreateDataSourceFromRedshift.hs
+++ b/gen/Network/AWS/MachineLearning/CreateDataSourceFromRedshift.hs
@@ -189,6 +189,8 @@
 
 instance Hashable CreateDataSourceFromRedshift
 
+instance NFData CreateDataSourceFromRedshift
+
 instance ToHeaders CreateDataSourceFromRedshift where
         toHeaders
           = const
@@ -252,3 +254,5 @@
 -- | The response status code.
 cdsfrrsResponseStatus :: Lens' CreateDataSourceFromRedshiftResponse Int
 cdsfrrsResponseStatus = lens _cdsfrrsResponseStatus (\ s a -> s{_cdsfrrsResponseStatus = a});
+
+instance NFData CreateDataSourceFromRedshiftResponse
diff --git a/gen/Network/AWS/MachineLearning/CreateDataSourceFromS3.hs b/gen/Network/AWS/MachineLearning/CreateDataSourceFromS3.hs
--- a/gen/Network/AWS/MachineLearning/CreateDataSourceFromS3.hs
+++ b/gen/Network/AWS/MachineLearning/CreateDataSourceFromS3.hs
@@ -156,6 +156,8 @@
 
 instance Hashable CreateDataSourceFromS3
 
+instance NFData CreateDataSourceFromS3
+
 instance ToHeaders CreateDataSourceFromS3 where
         toHeaders
           = const
@@ -218,3 +220,5 @@
 -- | The response status code.
 cdsfsrsResponseStatus :: Lens' CreateDataSourceFromS3Response Int
 cdsfsrsResponseStatus = lens _cdsfsrsResponseStatus (\ s a -> s{_cdsfsrsResponseStatus = a});
+
+instance NFData CreateDataSourceFromS3Response
diff --git a/gen/Network/AWS/MachineLearning/CreateEvaluation.hs b/gen/Network/AWS/MachineLearning/CreateEvaluation.hs
--- a/gen/Network/AWS/MachineLearning/CreateEvaluation.hs
+++ b/gen/Network/AWS/MachineLearning/CreateEvaluation.hs
@@ -125,6 +125,8 @@
 
 instance Hashable CreateEvaluation
 
+instance NFData CreateEvaluation
+
 instance ToHeaders CreateEvaluation where
         toHeaders
           = const
@@ -189,3 +191,5 @@
 -- | The response status code.
 cersResponseStatus :: Lens' CreateEvaluationResponse Int
 cersResponseStatus = lens _cersResponseStatus (\ s a -> s{_cersResponseStatus = a});
+
+instance NFData CreateEvaluationResponse
diff --git a/gen/Network/AWS/MachineLearning/CreateMLModel.hs b/gen/Network/AWS/MachineLearning/CreateMLModel.hs
--- a/gen/Network/AWS/MachineLearning/CreateMLModel.hs
+++ b/gen/Network/AWS/MachineLearning/CreateMLModel.hs
@@ -199,6 +199,8 @@
 
 instance Hashable CreateMLModel
 
+instance NFData CreateMLModel
+
 instance ToHeaders CreateMLModel where
         toHeaders
           = const
@@ -265,3 +267,5 @@
 -- | The response status code.
 cmlmrsResponseStatus :: Lens' CreateMLModelResponse Int
 cmlmrsResponseStatus = lens _cmlmrsResponseStatus (\ s a -> s{_cmlmrsResponseStatus = a});
+
+instance NFData CreateMLModelResponse
diff --git a/gen/Network/AWS/MachineLearning/CreateRealtimeEndpoint.hs b/gen/Network/AWS/MachineLearning/CreateRealtimeEndpoint.hs
--- a/gen/Network/AWS/MachineLearning/CreateRealtimeEndpoint.hs
+++ b/gen/Network/AWS/MachineLearning/CreateRealtimeEndpoint.hs
@@ -81,6 +81,8 @@
 
 instance Hashable CreateRealtimeEndpoint
 
+instance NFData CreateRealtimeEndpoint
+
 instance ToHeaders CreateRealtimeEndpoint where
         toHeaders
           = const
@@ -148,3 +150,5 @@
 -- | The response status code.
 crersResponseStatus :: Lens' CreateRealtimeEndpointResponse Int
 crersResponseStatus = lens _crersResponseStatus (\ s a -> s{_crersResponseStatus = a});
+
+instance NFData CreateRealtimeEndpointResponse
diff --git a/gen/Network/AWS/MachineLearning/DeleteBatchPrediction.hs b/gen/Network/AWS/MachineLearning/DeleteBatchPrediction.hs
--- a/gen/Network/AWS/MachineLearning/DeleteBatchPrediction.hs
+++ b/gen/Network/AWS/MachineLearning/DeleteBatchPrediction.hs
@@ -84,6 +84,8 @@
 
 instance Hashable DeleteBatchPrediction
 
+instance NFData DeleteBatchPrediction
+
 instance ToHeaders DeleteBatchPrediction where
         toHeaders
           = const
@@ -144,3 +146,5 @@
 -- | The response status code.
 dbprsResponseStatus :: Lens' DeleteBatchPredictionResponse Int
 dbprsResponseStatus = lens _dbprsResponseStatus (\ s a -> s{_dbprsResponseStatus = a});
+
+instance NFData DeleteBatchPredictionResponse
diff --git a/gen/Network/AWS/MachineLearning/DeleteDataSource.hs b/gen/Network/AWS/MachineLearning/DeleteDataSource.hs
--- a/gen/Network/AWS/MachineLearning/DeleteDataSource.hs
+++ b/gen/Network/AWS/MachineLearning/DeleteDataSource.hs
@@ -82,6 +82,8 @@
 
 instance Hashable DeleteDataSource
 
+instance NFData DeleteDataSource
+
 instance ToHeaders DeleteDataSource where
         toHeaders
           = const
@@ -135,3 +137,5 @@
 -- | The response status code.
 ddsrsResponseStatus :: Lens' DeleteDataSourceResponse Int
 ddsrsResponseStatus = lens _ddsrsResponseStatus (\ s a -> s{_ddsrsResponseStatus = a});
+
+instance NFData DeleteDataSourceResponse
diff --git a/gen/Network/AWS/MachineLearning/DeleteEvaluation.hs b/gen/Network/AWS/MachineLearning/DeleteEvaluation.hs
--- a/gen/Network/AWS/MachineLearning/DeleteEvaluation.hs
+++ b/gen/Network/AWS/MachineLearning/DeleteEvaluation.hs
@@ -82,6 +82,8 @@
 
 instance Hashable DeleteEvaluation
 
+instance NFData DeleteEvaluation
+
 instance ToHeaders DeleteEvaluation where
         toHeaders
           = const
@@ -140,3 +142,5 @@
 -- | The response status code.
 dersResponseStatus :: Lens' DeleteEvaluationResponse Int
 dersResponseStatus = lens _dersResponseStatus (\ s a -> s{_dersResponseStatus = a});
+
+instance NFData DeleteEvaluationResponse
diff --git a/gen/Network/AWS/MachineLearning/DeleteMLModel.hs b/gen/Network/AWS/MachineLearning/DeleteMLModel.hs
--- a/gen/Network/AWS/MachineLearning/DeleteMLModel.hs
+++ b/gen/Network/AWS/MachineLearning/DeleteMLModel.hs
@@ -81,6 +81,8 @@
 
 instance Hashable DeleteMLModel
 
+instance NFData DeleteMLModel
+
 instance ToHeaders DeleteMLModel where
         toHeaders
           = const
@@ -136,3 +138,5 @@
 -- | The response status code.
 dmlmrsResponseStatus :: Lens' DeleteMLModelResponse Int
 dmlmrsResponseStatus = lens _dmlmrsResponseStatus (\ s a -> s{_dmlmrsResponseStatus = a});
+
+instance NFData DeleteMLModelResponse
diff --git a/gen/Network/AWS/MachineLearning/DeleteRealtimeEndpoint.hs b/gen/Network/AWS/MachineLearning/DeleteRealtimeEndpoint.hs
--- a/gen/Network/AWS/MachineLearning/DeleteRealtimeEndpoint.hs
+++ b/gen/Network/AWS/MachineLearning/DeleteRealtimeEndpoint.hs
@@ -79,6 +79,8 @@
 
 instance Hashable DeleteRealtimeEndpoint
 
+instance NFData DeleteRealtimeEndpoint
+
 instance ToHeaders DeleteRealtimeEndpoint where
         toHeaders
           = const
@@ -143,3 +145,5 @@
 -- | The response status code.
 drersResponseStatus :: Lens' DeleteRealtimeEndpointResponse Int
 drersResponseStatus = lens _drersResponseStatus (\ s a -> s{_drersResponseStatus = a});
+
+instance NFData DeleteRealtimeEndpointResponse
diff --git a/gen/Network/AWS/MachineLearning/DescribeBatchPredictions.hs b/gen/Network/AWS/MachineLearning/DescribeBatchPredictions.hs
--- a/gen/Network/AWS/MachineLearning/DescribeBatchPredictions.hs
+++ b/gen/Network/AWS/MachineLearning/DescribeBatchPredictions.hs
@@ -225,6 +225,8 @@
 
 instance Hashable DescribeBatchPredictions
 
+instance NFData DescribeBatchPredictions
+
 instance ToHeaders DescribeBatchPredictions where
         toHeaders
           = const
@@ -295,3 +297,5 @@
 -- | The response status code.
 drsResponseStatus :: Lens' DescribeBatchPredictionsResponse Int
 drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});
+
+instance NFData DescribeBatchPredictionsResponse
diff --git a/gen/Network/AWS/MachineLearning/DescribeDataSources.hs b/gen/Network/AWS/MachineLearning/DescribeDataSources.hs
--- a/gen/Network/AWS/MachineLearning/DescribeDataSources.hs
+++ b/gen/Network/AWS/MachineLearning/DescribeDataSources.hs
@@ -219,6 +219,8 @@
 
 instance Hashable DescribeDataSources
 
+instance NFData DescribeDataSources
+
 instance ToHeaders DescribeDataSources where
         toHeaders
           = const
@@ -289,3 +291,5 @@
 -- | The response status code.
 ddssrsResponseStatus :: Lens' DescribeDataSourcesResponse Int
 ddssrsResponseStatus = lens _ddssrsResponseStatus (\ s a -> s{_ddssrsResponseStatus = a});
+
+instance NFData DescribeDataSourcesResponse
diff --git a/gen/Network/AWS/MachineLearning/DescribeEvaluations.hs b/gen/Network/AWS/MachineLearning/DescribeEvaluations.hs
--- a/gen/Network/AWS/MachineLearning/DescribeEvaluations.hs
+++ b/gen/Network/AWS/MachineLearning/DescribeEvaluations.hs
@@ -224,6 +224,8 @@
 
 instance Hashable DescribeEvaluations
 
+instance NFData DescribeEvaluations
+
 instance ToHeaders DescribeEvaluations where
         toHeaders
           = const
@@ -294,3 +296,5 @@
 -- | The response status code.
 desrsResponseStatus :: Lens' DescribeEvaluationsResponse Int
 desrsResponseStatus = lens _desrsResponseStatus (\ s a -> s{_desrsResponseStatus = a});
+
+instance NFData DescribeEvaluationsResponse
diff --git a/gen/Network/AWS/MachineLearning/DescribeMLModels.hs b/gen/Network/AWS/MachineLearning/DescribeMLModels.hs
--- a/gen/Network/AWS/MachineLearning/DescribeMLModels.hs
+++ b/gen/Network/AWS/MachineLearning/DescribeMLModels.hs
@@ -224,6 +224,8 @@
 
 instance Hashable DescribeMLModels
 
+instance NFData DescribeMLModels
+
 instance ToHeaders DescribeMLModels where
         toHeaders
           = const
@@ -293,3 +295,5 @@
 -- | The response status code.
 dmlmsrsResponseStatus :: Lens' DescribeMLModelsResponse Int
 dmlmsrsResponseStatus = lens _dmlmsrsResponseStatus (\ s a -> s{_dmlmsrsResponseStatus = a});
+
+instance NFData DescribeMLModelsResponse
diff --git a/gen/Network/AWS/MachineLearning/GetBatchPrediction.hs b/gen/Network/AWS/MachineLearning/GetBatchPrediction.hs
--- a/gen/Network/AWS/MachineLearning/GetBatchPrediction.hs
+++ b/gen/Network/AWS/MachineLearning/GetBatchPrediction.hs
@@ -99,6 +99,8 @@
 
 instance Hashable GetBatchPrediction
 
+instance NFData GetBatchPrediction
+
 instance ToHeaders GetBatchPrediction where
         toHeaders
           = const
@@ -263,3 +265,5 @@
 -- | The response status code.
 gbprsResponseStatus :: Lens' GetBatchPredictionResponse Int
 gbprsResponseStatus = lens _gbprsResponseStatus (\ s a -> s{_gbprsResponseStatus = a});
+
+instance NFData GetBatchPredictionResponse
diff --git a/gen/Network/AWS/MachineLearning/GetDataSource.hs b/gen/Network/AWS/MachineLearning/GetDataSource.hs
--- a/gen/Network/AWS/MachineLearning/GetDataSource.hs
+++ b/gen/Network/AWS/MachineLearning/GetDataSource.hs
@@ -126,6 +126,8 @@
 
 instance Hashable GetDataSource
 
+instance NFData GetDataSource
+
 instance ToHeaders GetDataSource where
         toHeaders
           = const
@@ -331,3 +333,5 @@
 -- | The response status code.
 gdsrsResponseStatus :: Lens' GetDataSourceResponse Int
 gdsrsResponseStatus = lens _gdsrsResponseStatus (\ s a -> s{_gdsrsResponseStatus = a});
+
+instance NFData GetDataSourceResponse
diff --git a/gen/Network/AWS/MachineLearning/GetEvaluation.hs b/gen/Network/AWS/MachineLearning/GetEvaluation.hs
--- a/gen/Network/AWS/MachineLearning/GetEvaluation.hs
+++ b/gen/Network/AWS/MachineLearning/GetEvaluation.hs
@@ -100,6 +100,8 @@
 
 instance Hashable GetEvaluation
 
+instance NFData GetEvaluation
+
 instance ToHeaders GetEvaluation where
         toHeaders
           = const
@@ -272,3 +274,5 @@
 -- | The response status code.
 gersResponseStatus :: Lens' GetEvaluationResponse Int
 gersResponseStatus = lens _gersResponseStatus (\ s a -> s{_gersResponseStatus = a});
+
+instance NFData GetEvaluationResponse
diff --git a/gen/Network/AWS/MachineLearning/GetMLModel.hs b/gen/Network/AWS/MachineLearning/GetMLModel.hs
--- a/gen/Network/AWS/MachineLearning/GetMLModel.hs
+++ b/gen/Network/AWS/MachineLearning/GetMLModel.hs
@@ -125,6 +125,8 @@
 
 instance Hashable GetMLModel
 
+instance NFData GetMLModel
+
 instance ToHeaders GetMLModel where
         toHeaders
           = const
@@ -389,3 +391,5 @@
 -- | The response status code.
 gmlmrsResponseStatus :: Lens' GetMLModelResponse Int
 gmlmrsResponseStatus = lens _gmlmrsResponseStatus (\ s a -> s{_gmlmrsResponseStatus = a});
+
+instance NFData GetMLModelResponse
diff --git a/gen/Network/AWS/MachineLearning/Predict.hs b/gen/Network/AWS/MachineLearning/Predict.hs
--- a/gen/Network/AWS/MachineLearning/Predict.hs
+++ b/gen/Network/AWS/MachineLearning/Predict.hs
@@ -100,6 +100,8 @@
 
 instance Hashable Predict
 
+instance NFData Predict
+
 instance ToHeaders Predict where
         toHeaders
           = const
@@ -152,3 +154,5 @@
 -- | The response status code.
 prsResponseStatus :: Lens' PredictResponse Int
 prsResponseStatus = lens _prsResponseStatus (\ s a -> s{_prsResponseStatus = a});
+
+instance NFData PredictResponse
diff --git a/gen/Network/AWS/MachineLearning/Types.hs b/gen/Network/AWS/MachineLearning/Types.hs
--- a/gen/Network/AWS/MachineLearning/Types.hs
+++ b/gen/Network/AWS/MachineLearning/Types.hs
@@ -252,6 +252,8 @@
       | has (hasCode "ThrottlingException" . hasStatus 400) e =
           Just "throttling_exception"
       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
+      | has (hasStatus 504) e = Just "gateway_timeout"
+      | has (hasStatus 502) e = Just "bad_gateway"
       | has (hasStatus 503) e = Just "service_unavailable"
       | has (hasStatus 500) e = Just "general_server_error"
       | has (hasStatus 509) e = Just "limit_exceeded"
diff --git a/gen/Network/AWS/MachineLearning/Types/Product.hs b/gen/Network/AWS/MachineLearning/Types/Product.hs
--- a/gen/Network/AWS/MachineLearning/Types/Product.hs
+++ b/gen/Network/AWS/MachineLearning/Types/Product.hs
@@ -167,6 +167,8 @@
 
 instance Hashable BatchPrediction
 
+instance NFData BatchPrediction
+
 -- | Represents the output of the < GetDataSource> operation.
 --
 -- The content consists of the detailed metadata and data file information
@@ -345,6 +347,8 @@
 
 instance Hashable DataSource
 
+instance NFData DataSource
+
 -- | Represents the output of < GetEvaluation> operation.
 --
 -- The content consists of the detailed metadata and data file information
@@ -499,6 +503,8 @@
 
 instance Hashable Evaluation
 
+instance NFData Evaluation
+
 -- | Represents the output of a < GetMLModel> operation.
 --
 -- The content consists of the detailed metadata and the current status of
@@ -731,6 +737,8 @@
 
 instance Hashable MLModel
 
+instance NFData MLModel
+
 -- | Measurements of how well the 'MLModel' performed on known observations.
 -- One of the following metrics is returned, based on the type of the
 -- 'MLModel':
@@ -779,6 +787,8 @@
 
 instance Hashable PerformanceMetrics
 
+instance NFData PerformanceMetrics
+
 -- | The output from a 'Predict' operation:
 --
 -- -   'Details' - Contains the following attributes:
@@ -850,6 +860,8 @@
 
 instance Hashable Prediction
 
+instance NFData Prediction
+
 -- | The data specification of an Amazon Relational Database Service (Amazon
 -- RDS) 'DataSource'.
 --
@@ -1016,6 +1028,8 @@
 
 instance Hashable RDSDataSpec
 
+instance NFData RDSDataSpec
+
 instance ToJSON RDSDataSpec where
         toJSON RDSDataSpec'{..}
           = object
@@ -1078,6 +1092,8 @@
 
 instance Hashable RDSDatabase
 
+instance NFData RDSDatabase
+
 instance ToJSON RDSDatabase where
         toJSON RDSDatabase'{..}
           = object
@@ -1121,6 +1137,8 @@
 
 instance Hashable RDSDatabaseCredentials
 
+instance NFData RDSDatabaseCredentials
+
 instance ToJSON RDSDatabaseCredentials where
         toJSON RDSDatabaseCredentials'{..}
           = object
@@ -1215,6 +1233,8 @@
 
 instance Hashable RDSMetadata
 
+instance NFData RDSMetadata
+
 -- | Describes the real-time endpoint information for an 'MLModel'.
 --
 -- /See:/ 'realtimeEndpointInfo' smart constructor.
@@ -1286,6 +1306,8 @@
 
 instance Hashable RealtimeEndpointInfo
 
+instance NFData RealtimeEndpointInfo
+
 -- | Describes the data specification of an Amazon Redshift 'DataSource'.
 --
 -- /See:/ 'redshiftDataSpec' smart constructor.
@@ -1399,6 +1421,8 @@
 
 instance Hashable RedshiftDataSpec
 
+instance NFData RedshiftDataSpec
+
 instance ToJSON RedshiftDataSpec where
         toJSON RedshiftDataSpec'{..}
           = object
@@ -1456,6 +1480,8 @@
 
 instance Hashable RedshiftDatabase
 
+instance NFData RedshiftDatabase
+
 instance ToJSON RedshiftDatabase where
         toJSON RedshiftDatabase'{..}
           = object
@@ -1499,6 +1525,8 @@
 
 instance Hashable RedshiftDatabaseCredentials
 
+instance NFData RedshiftDatabaseCredentials
+
 instance ToJSON RedshiftDatabaseCredentials where
         toJSON RedshiftDatabaseCredentials'{..}
           = object
@@ -1557,6 +1585,8 @@
 
 instance Hashable RedshiftMetadata
 
+instance NFData RedshiftMetadata
+
 -- | Describes the data specification of a 'DataSource'.
 --
 -- /See:/ 's3DataSpec' smart constructor.
@@ -1638,6 +1668,8 @@
 sdsDataLocationS3 = lens _sdsDataLocationS3 (\ s a -> s{_sdsDataLocationS3 = a});
 
 instance Hashable S3DataSpec
+
+instance NFData S3DataSpec
 
 instance ToJSON S3DataSpec where
         toJSON S3DataSpec'{..}
diff --git a/gen/Network/AWS/MachineLearning/Types/Sum.hs b/gen/Network/AWS/MachineLearning/Types/Sum.hs
--- a/gen/Network/AWS/MachineLearning/Types/Sum.hs
+++ b/gen/Network/AWS/MachineLearning/Types/Sum.hs
@@ -39,6 +39,7 @@
         SGD -> "sgd"
 
 instance Hashable     Algorithm
+instance NFData       Algorithm
 instance ToByteString Algorithm
 instance ToQuery      Algorithm
 instance ToHeader     Algorithm
@@ -99,6 +100,7 @@
         BatchStatus -> "Status"
 
 instance Hashable     BatchPredictionFilterVariable
+instance NFData       BatchPredictionFilterVariable
 instance ToByteString BatchPredictionFilterVariable
 instance ToQuery      BatchPredictionFilterVariable
 instance ToHeader     BatchPredictionFilterVariable
@@ -152,6 +154,7 @@
         DataStatus -> "Status"
 
 instance Hashable     DataSourceFilterVariable
+instance NFData       DataSourceFilterVariable
 instance ToByteString DataSourceFilterVariable
 instance ToQuery      DataSourceFilterVariable
 instance ToHeader     DataSourceFilterVariable
@@ -180,6 +183,7 @@
         PredictiveModelType -> "PredictiveModelType"
 
 instance Hashable     DetailsAttributes
+instance NFData       DetailsAttributes
 instance ToByteString DetailsAttributes
 instance ToQuery      DetailsAttributes
 instance ToHeader     DetailsAttributes
@@ -221,6 +225,7 @@
         ESPending -> "PENDING"
 
 instance Hashable     EntityStatus
+instance NFData       EntityStatus
 instance ToByteString EntityStatus
 instance ToQuery      EntityStatus
 instance ToHeader     EntityStatus
@@ -280,6 +285,7 @@
         EvalStatus -> "Status"
 
 instance Hashable     EvaluationFilterVariable
+instance NFData       EvaluationFilterVariable
 instance ToByteString EvaluationFilterVariable
 instance ToQuery      EvaluationFilterVariable
 instance ToHeader     EvaluationFilterVariable
@@ -329,6 +335,7 @@
         MLMFVTrainingDataURI -> "TrainingDataURI"
 
 instance Hashable     MLModelFilterVariable
+instance NFData       MLModelFilterVariable
 instance ToByteString MLModelFilterVariable
 instance ToQuery      MLModelFilterVariable
 instance ToHeader     MLModelFilterVariable
@@ -357,6 +364,7 @@
         Regression -> "REGRESSION"
 
 instance Hashable     MLModelType
+instance NFData       MLModelType
 instance ToByteString MLModelType
 instance ToQuery      MLModelType
 instance ToHeader     MLModelType
@@ -391,6 +399,7 @@
         Updating -> "UPDATING"
 
 instance Hashable     RealtimeEndpointStatus
+instance NFData       RealtimeEndpointStatus
 instance ToByteString RealtimeEndpointStatus
 instance ToQuery      RealtimeEndpointStatus
 instance ToHeader     RealtimeEndpointStatus
@@ -421,6 +430,7 @@
         Dsc -> "dsc"
 
 instance Hashable     SortOrder
+instance NFData       SortOrder
 instance ToByteString SortOrder
 instance ToQuery      SortOrder
 instance ToHeader     SortOrder
diff --git a/gen/Network/AWS/MachineLearning/UpdateBatchPrediction.hs b/gen/Network/AWS/MachineLearning/UpdateBatchPrediction.hs
--- a/gen/Network/AWS/MachineLearning/UpdateBatchPrediction.hs
+++ b/gen/Network/AWS/MachineLearning/UpdateBatchPrediction.hs
@@ -89,6 +89,8 @@
 
 instance Hashable UpdateBatchPrediction
 
+instance NFData UpdateBatchPrediction
+
 instance ToHeaders UpdateBatchPrediction where
         toHeaders
           = const
@@ -149,3 +151,5 @@
 -- | The response status code.
 ubprsResponseStatus :: Lens' UpdateBatchPredictionResponse Int
 ubprsResponseStatus = lens _ubprsResponseStatus (\ s a -> s{_ubprsResponseStatus = a});
+
+instance NFData UpdateBatchPredictionResponse
diff --git a/gen/Network/AWS/MachineLearning/UpdateDataSource.hs b/gen/Network/AWS/MachineLearning/UpdateDataSource.hs
--- a/gen/Network/AWS/MachineLearning/UpdateDataSource.hs
+++ b/gen/Network/AWS/MachineLearning/UpdateDataSource.hs
@@ -89,6 +89,8 @@
 
 instance Hashable UpdateDataSource
 
+instance NFData UpdateDataSource
+
 instance ToHeaders UpdateDataSource where
         toHeaders
           = const
@@ -146,3 +148,5 @@
 -- | The response status code.
 udsrsResponseStatus :: Lens' UpdateDataSourceResponse Int
 udsrsResponseStatus = lens _udsrsResponseStatus (\ s a -> s{_udsrsResponseStatus = a});
+
+instance NFData UpdateDataSourceResponse
diff --git a/gen/Network/AWS/MachineLearning/UpdateEvaluation.hs b/gen/Network/AWS/MachineLearning/UpdateEvaluation.hs
--- a/gen/Network/AWS/MachineLearning/UpdateEvaluation.hs
+++ b/gen/Network/AWS/MachineLearning/UpdateEvaluation.hs
@@ -89,6 +89,8 @@
 
 instance Hashable UpdateEvaluation
 
+instance NFData UpdateEvaluation
+
 instance ToHeaders UpdateEvaluation where
         toHeaders
           = const
@@ -145,3 +147,5 @@
 -- | The response status code.
 uersResponseStatus :: Lens' UpdateEvaluationResponse Int
 uersResponseStatus = lens _uersResponseStatus (\ s a -> s{_uersResponseStatus = a});
+
+instance NFData UpdateEvaluationResponse
diff --git a/gen/Network/AWS/MachineLearning/UpdateMLModel.hs b/gen/Network/AWS/MachineLearning/UpdateMLModel.hs
--- a/gen/Network/AWS/MachineLearning/UpdateMLModel.hs
+++ b/gen/Network/AWS/MachineLearning/UpdateMLModel.hs
@@ -102,6 +102,8 @@
 
 instance Hashable UpdateMLModel
 
+instance NFData UpdateMLModel
+
 instance ToHeaders UpdateMLModel where
         toHeaders
           = const
@@ -159,3 +161,5 @@
 -- | The response status code.
 umlmrsResponseStatus :: Lens' UpdateMLModelResponse Int
 umlmrsResponseStatus = lens _umlmrsResponseStatus (\ s a -> s{_umlmrsResponseStatus = a});
+
+instance NFData UpdateMLModelResponse