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-ecs.cabal b/amazonka-ecs.cabal
--- a/amazonka-ecs.cabal
+++ b/amazonka-ecs.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-ecs
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon EC2 Container Service SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -89,7 +89,7 @@
         , Network.AWS.ECS.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-ecs-test
@@ -109,9 +109,9 @@
         , Test.AWS.ECS.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-ecs == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-ecs == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/ECS/CreateCluster.hs b/gen/Network/AWS/ECS/CreateCluster.hs
--- a/gen/Network/AWS/ECS/CreateCluster.hs
+++ b/gen/Network/AWS/ECS/CreateCluster.hs
@@ -79,6 +79,8 @@
 
 instance Hashable CreateCluster
 
+instance NFData CreateCluster
+
 instance ToHeaders CreateCluster where
         toHeaders
           = const
@@ -129,3 +131,5 @@
 -- | The response status code.
 ccrsResponseStatus :: Lens' CreateClusterResponse Int
 ccrsResponseStatus = lens _ccrsResponseStatus (\ s a -> s{_ccrsResponseStatus = a});
+
+instance NFData CreateClusterResponse
diff --git a/gen/Network/AWS/ECS/CreateService.hs b/gen/Network/AWS/ECS/CreateService.hs
--- a/gen/Network/AWS/ECS/CreateService.hs
+++ b/gen/Network/AWS/ECS/CreateService.hs
@@ -205,6 +205,8 @@
 
 instance Hashable CreateService
 
+instance NFData CreateService
+
 instance ToHeaders CreateService where
         toHeaders
           = const
@@ -264,3 +266,5 @@
 -- | The response status code.
 csrsResponseStatus :: Lens' CreateServiceResponse Int
 csrsResponseStatus = lens _csrsResponseStatus (\ s a -> s{_csrsResponseStatus = a});
+
+instance NFData CreateServiceResponse
diff --git a/gen/Network/AWS/ECS/DeleteCluster.hs b/gen/Network/AWS/ECS/DeleteCluster.hs
--- a/gen/Network/AWS/ECS/DeleteCluster.hs
+++ b/gen/Network/AWS/ECS/DeleteCluster.hs
@@ -79,6 +79,8 @@
 
 instance Hashable DeleteCluster
 
+instance NFData DeleteCluster
+
 instance ToHeaders DeleteCluster where
         toHeaders
           = const
@@ -128,3 +130,5 @@
 -- | The response status code.
 drsResponseStatus :: Lens' DeleteClusterResponse Int
 drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});
+
+instance NFData DeleteClusterResponse
diff --git a/gen/Network/AWS/ECS/DeleteService.hs b/gen/Network/AWS/ECS/DeleteService.hs
--- a/gen/Network/AWS/ECS/DeleteService.hs
+++ b/gen/Network/AWS/ECS/DeleteService.hs
@@ -99,6 +99,8 @@
 
 instance Hashable DeleteService
 
+instance NFData DeleteService
+
 instance ToHeaders DeleteService where
         toHeaders
           = const
@@ -151,3 +153,5 @@
 -- | The response status code.
 dsrsResponseStatus :: Lens' DeleteServiceResponse Int
 dsrsResponseStatus = lens _dsrsResponseStatus (\ s a -> s{_dsrsResponseStatus = a});
+
+instance NFData DeleteServiceResponse
diff --git a/gen/Network/AWS/ECS/DeregisterContainerInstance.hs b/gen/Network/AWS/ECS/DeregisterContainerInstance.hs
--- a/gen/Network/AWS/ECS/DeregisterContainerInstance.hs
+++ b/gen/Network/AWS/ECS/DeregisterContainerInstance.hs
@@ -123,6 +123,8 @@
 
 instance Hashable DeregisterContainerInstance
 
+instance NFData DeregisterContainerInstance
+
 instance ToHeaders DeregisterContainerInstance where
         toHeaders
           = const
@@ -176,3 +178,5 @@
 -- | The response status code.
 dcirsResponseStatus :: Lens' DeregisterContainerInstanceResponse Int
 dcirsResponseStatus = lens _dcirsResponseStatus (\ s a -> s{_dcirsResponseStatus = a});
+
+instance NFData DeregisterContainerInstanceResponse
diff --git a/gen/Network/AWS/ECS/DeregisterTaskDefinition.hs b/gen/Network/AWS/ECS/DeregisterTaskDefinition.hs
--- a/gen/Network/AWS/ECS/DeregisterTaskDefinition.hs
+++ b/gen/Network/AWS/ECS/DeregisterTaskDefinition.hs
@@ -89,6 +89,8 @@
 
 instance Hashable DeregisterTaskDefinition
 
+instance NFData DeregisterTaskDefinition
+
 instance ToHeaders DeregisterTaskDefinition where
         toHeaders
           = const
@@ -140,3 +142,5 @@
 -- | The response status code.
 dtdrsResponseStatus :: Lens' DeregisterTaskDefinitionResponse Int
 dtdrsResponseStatus = lens _dtdrsResponseStatus (\ s a -> s{_dtdrsResponseStatus = a});
+
+instance NFData DeregisterTaskDefinitionResponse
diff --git a/gen/Network/AWS/ECS/DescribeClusters.hs b/gen/Network/AWS/ECS/DescribeClusters.hs
--- a/gen/Network/AWS/ECS/DescribeClusters.hs
+++ b/gen/Network/AWS/ECS/DescribeClusters.hs
@@ -79,6 +79,8 @@
 
 instance Hashable DescribeClusters
 
+instance NFData DescribeClusters
+
 instance ToHeaders DescribeClusters where
         toHeaders
           = const
@@ -137,3 +139,5 @@
 -- | The response status code.
 dcrsResponseStatus :: Lens' DescribeClustersResponse Int
 dcrsResponseStatus = lens _dcrsResponseStatus (\ s a -> s{_dcrsResponseStatus = a});
+
+instance NFData DescribeClustersResponse
diff --git a/gen/Network/AWS/ECS/DescribeContainerInstances.hs b/gen/Network/AWS/ECS/DescribeContainerInstances.hs
--- a/gen/Network/AWS/ECS/DescribeContainerInstances.hs
+++ b/gen/Network/AWS/ECS/DescribeContainerInstances.hs
@@ -92,6 +92,8 @@
 
 instance Hashable DescribeContainerInstances
 
+instance NFData DescribeContainerInstances
+
 instance ToHeaders DescribeContainerInstances where
         toHeaders
           = const
@@ -153,3 +155,5 @@
 -- | The response status code.
 dcisrsResponseStatus :: Lens' DescribeContainerInstancesResponse Int
 dcisrsResponseStatus = lens _dcisrsResponseStatus (\ s a -> s{_dcisrsResponseStatus = a});
+
+instance NFData DescribeContainerInstancesResponse
diff --git a/gen/Network/AWS/ECS/DescribeServices.hs b/gen/Network/AWS/ECS/DescribeServices.hs
--- a/gen/Network/AWS/ECS/DescribeServices.hs
+++ b/gen/Network/AWS/ECS/DescribeServices.hs
@@ -87,6 +87,8 @@
 
 instance Hashable DescribeServices
 
+instance NFData DescribeServices
+
 instance ToHeaders DescribeServices where
         toHeaders
           = const
@@ -147,3 +149,5 @@
 -- | The response status code.
 dssrsResponseStatus :: Lens' DescribeServicesResponse Int
 dssrsResponseStatus = lens _dssrsResponseStatus (\ s a -> s{_dssrsResponseStatus = a});
+
+instance NFData DescribeServicesResponse
diff --git a/gen/Network/AWS/ECS/DescribeTaskDefinition.hs b/gen/Network/AWS/ECS/DescribeTaskDefinition.hs
--- a/gen/Network/AWS/ECS/DescribeTaskDefinition.hs
+++ b/gen/Network/AWS/ECS/DescribeTaskDefinition.hs
@@ -83,6 +83,8 @@
 
 instance Hashable DescribeTaskDefinition
 
+instance NFData DescribeTaskDefinition
+
 instance ToHeaders DescribeTaskDefinition where
         toHeaders
           = const
@@ -134,3 +136,5 @@
 -- | The response status code.
 desrsResponseStatus :: Lens' DescribeTaskDefinitionResponse Int
 desrsResponseStatus = lens _desrsResponseStatus (\ s a -> s{_desrsResponseStatus = a});
+
+instance NFData DescribeTaskDefinitionResponse
diff --git a/gen/Network/AWS/ECS/DescribeTasks.hs b/gen/Network/AWS/ECS/DescribeTasks.hs
--- a/gen/Network/AWS/ECS/DescribeTasks.hs
+++ b/gen/Network/AWS/ECS/DescribeTasks.hs
@@ -89,6 +89,8 @@
 
 instance Hashable DescribeTasks
 
+instance NFData DescribeTasks
+
 instance ToHeaders DescribeTasks where
         toHeaders
           = const
@@ -149,3 +151,5 @@
 -- | The response status code.
 dtrsResponseStatus :: Lens' DescribeTasksResponse Int
 dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a});
+
+instance NFData DescribeTasksResponse
diff --git a/gen/Network/AWS/ECS/DiscoverPollEndpoint.hs b/gen/Network/AWS/ECS/DiscoverPollEndpoint.hs
--- a/gen/Network/AWS/ECS/DiscoverPollEndpoint.hs
+++ b/gen/Network/AWS/ECS/DiscoverPollEndpoint.hs
@@ -95,6 +95,8 @@
 
 instance Hashable DiscoverPollEndpoint
 
+instance NFData DiscoverPollEndpoint
+
 instance ToHeaders DiscoverPollEndpoint where
         toHeaders
           = const
@@ -155,3 +157,5 @@
 -- | The response status code.
 dpersResponseStatus :: Lens' DiscoverPollEndpointResponse Int
 dpersResponseStatus = lens _dpersResponseStatus (\ s a -> s{_dpersResponseStatus = a});
+
+instance NFData DiscoverPollEndpointResponse
diff --git a/gen/Network/AWS/ECS/ListClusters.hs b/gen/Network/AWS/ECS/ListClusters.hs
--- a/gen/Network/AWS/ECS/ListClusters.hs
+++ b/gen/Network/AWS/ECS/ListClusters.hs
@@ -107,6 +107,8 @@
 
 instance Hashable ListClusters
 
+instance NFData ListClusters
+
 instance ToHeaders ListClusters where
         toHeaders
           = const
@@ -171,3 +173,5 @@
 -- | The response status code.
 lcrsResponseStatus :: Lens' ListClustersResponse Int
 lcrsResponseStatus = lens _lcrsResponseStatus (\ s a -> s{_lcrsResponseStatus = a});
+
+instance NFData ListClustersResponse
diff --git a/gen/Network/AWS/ECS/ListContainerInstances.hs b/gen/Network/AWS/ECS/ListContainerInstances.hs
--- a/gen/Network/AWS/ECS/ListContainerInstances.hs
+++ b/gen/Network/AWS/ECS/ListContainerInstances.hs
@@ -120,6 +120,8 @@
 
 instance Hashable ListContainerInstances
 
+instance NFData ListContainerInstances
+
 instance ToHeaders ListContainerInstances where
         toHeaders
           = const
@@ -186,3 +188,5 @@
 -- | The response status code.
 lcirsResponseStatus :: Lens' ListContainerInstancesResponse Int
 lcirsResponseStatus = lens _lcirsResponseStatus (\ s a -> s{_lcirsResponseStatus = a});
+
+instance NFData ListContainerInstancesResponse
diff --git a/gen/Network/AWS/ECS/ListServices.hs b/gen/Network/AWS/ECS/ListServices.hs
--- a/gen/Network/AWS/ECS/ListServices.hs
+++ b/gen/Network/AWS/ECS/ListServices.hs
@@ -118,6 +118,8 @@
 
 instance Hashable ListServices
 
+instance NFData ListServices
+
 instance ToHeaders ListServices where
         toHeaders
           = const
@@ -183,3 +185,5 @@
 -- | The response status code.
 lsrsResponseStatus :: Lens' ListServicesResponse Int
 lsrsResponseStatus = lens _lsrsResponseStatus (\ s a -> s{_lsrsResponseStatus = a});
+
+instance NFData ListServicesResponse
diff --git a/gen/Network/AWS/ECS/ListTaskDefinitionFamilies.hs b/gen/Network/AWS/ECS/ListTaskDefinitionFamilies.hs
--- a/gen/Network/AWS/ECS/ListTaskDefinitionFamilies.hs
+++ b/gen/Network/AWS/ECS/ListTaskDefinitionFamilies.hs
@@ -123,6 +123,8 @@
 
 instance Hashable ListTaskDefinitionFamilies
 
+instance NFData ListTaskDefinitionFamilies
+
 instance ToHeaders ListTaskDefinitionFamilies where
         toHeaders
           = const
@@ -189,3 +191,5 @@
 -- | The response status code.
 ltdfrsResponseStatus :: Lens' ListTaskDefinitionFamiliesResponse Int
 ltdfrsResponseStatus = lens _ltdfrsResponseStatus (\ s a -> s{_ltdfrsResponseStatus = a});
+
+instance NFData ListTaskDefinitionFamiliesResponse
diff --git a/gen/Network/AWS/ECS/ListTaskDefinitions.hs b/gen/Network/AWS/ECS/ListTaskDefinitions.hs
--- a/gen/Network/AWS/ECS/ListTaskDefinitions.hs
+++ b/gen/Network/AWS/ECS/ListTaskDefinitions.hs
@@ -150,6 +150,8 @@
 
 instance Hashable ListTaskDefinitions
 
+instance NFData ListTaskDefinitions
+
 instance ToHeaders ListTaskDefinitions where
         toHeaders
           = const
@@ -217,3 +219,5 @@
 -- | The response status code.
 ltdrsResponseStatus :: Lens' ListTaskDefinitionsResponse Int
 ltdrsResponseStatus = lens _ltdrsResponseStatus (\ s a -> s{_ltdrsResponseStatus = a});
+
+instance NFData ListTaskDefinitionsResponse
diff --git a/gen/Network/AWS/ECS/ListTasks.hs b/gen/Network/AWS/ECS/ListTasks.hs
--- a/gen/Network/AWS/ECS/ListTasks.hs
+++ b/gen/Network/AWS/ECS/ListTasks.hs
@@ -178,6 +178,8 @@
 
 instance Hashable ListTasks
 
+instance NFData ListTasks
+
 instance ToHeaders ListTasks where
         toHeaders
           = const
@@ -248,3 +250,5 @@
 -- | The response status code.
 ltrsResponseStatus :: Lens' ListTasksResponse Int
 ltrsResponseStatus = lens _ltrsResponseStatus (\ s a -> s{_ltrsResponseStatus = a});
+
+instance NFData ListTasksResponse
diff --git a/gen/Network/AWS/ECS/RegisterContainerInstance.hs b/gen/Network/AWS/ECS/RegisterContainerInstance.hs
--- a/gen/Network/AWS/ECS/RegisterContainerInstance.hs
+++ b/gen/Network/AWS/ECS/RegisterContainerInstance.hs
@@ -143,6 +143,8 @@
 
 instance Hashable RegisterContainerInstance
 
+instance NFData RegisterContainerInstance
+
 instance ToHeaders RegisterContainerInstance where
         toHeaders
           = const
@@ -203,3 +205,5 @@
 -- | The response status code.
 rcirsResponseStatus :: Lens' RegisterContainerInstanceResponse Int
 rcirsResponseStatus = lens _rcirsResponseStatus (\ s a -> s{_rcirsResponseStatus = a});
+
+instance NFData RegisterContainerInstanceResponse
diff --git a/gen/Network/AWS/ECS/RegisterTaskDefinition.hs b/gen/Network/AWS/ECS/RegisterTaskDefinition.hs
--- a/gen/Network/AWS/ECS/RegisterTaskDefinition.hs
+++ b/gen/Network/AWS/ECS/RegisterTaskDefinition.hs
@@ -104,6 +104,8 @@
 
 instance Hashable RegisterTaskDefinition
 
+instance NFData RegisterTaskDefinition
+
 instance ToHeaders RegisterTaskDefinition where
         toHeaders
           = const
@@ -159,3 +161,5 @@
 -- | The response status code.
 rtdrsResponseStatus :: Lens' RegisterTaskDefinitionResponse Int
 rtdrsResponseStatus = lens _rtdrsResponseStatus (\ s a -> s{_rtdrsResponseStatus = a});
+
+instance NFData RegisterTaskDefinitionResponse
diff --git a/gen/Network/AWS/ECS/RunTask.hs b/gen/Network/AWS/ECS/RunTask.hs
--- a/gen/Network/AWS/ECS/RunTask.hs
+++ b/gen/Network/AWS/ECS/RunTask.hs
@@ -141,6 +141,8 @@
 
 instance Hashable RunTask
 
+instance NFData RunTask
+
 instance ToHeaders RunTask where
         toHeaders
           = const
@@ -205,3 +207,5 @@
 -- | The response status code.
 rtrsResponseStatus :: Lens' RunTaskResponse Int
 rtrsResponseStatus = lens _rtrsResponseStatus (\ s a -> s{_rtrsResponseStatus = a});
+
+instance NFData RunTaskResponse
diff --git a/gen/Network/AWS/ECS/StartTask.hs b/gen/Network/AWS/ECS/StartTask.hs
--- a/gen/Network/AWS/ECS/StartTask.hs
+++ b/gen/Network/AWS/ECS/StartTask.hs
@@ -141,6 +141,8 @@
 
 instance Hashable StartTask
 
+instance NFData StartTask
+
 instance ToHeaders StartTask where
         toHeaders
           = const
@@ -205,3 +207,5 @@
 -- | The response status code.
 strsResponseStatus :: Lens' StartTaskResponse Int
 strsResponseStatus = lens _strsResponseStatus (\ s a -> s{_strsResponseStatus = a});
+
+instance NFData StartTaskResponse
diff --git a/gen/Network/AWS/ECS/StopTask.hs b/gen/Network/AWS/ECS/StopTask.hs
--- a/gen/Network/AWS/ECS/StopTask.hs
+++ b/gen/Network/AWS/ECS/StopTask.hs
@@ -107,6 +107,8 @@
 
 instance Hashable StopTask
 
+instance NFData StopTask
+
 instance ToHeaders StopTask where
         toHeaders
           = const
@@ -160,3 +162,5 @@
 -- | The response status code.
 srsResponseStatus :: Lens' StopTaskResponse Int
 srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a});
+
+instance NFData StopTaskResponse
diff --git a/gen/Network/AWS/ECS/SubmitContainerStateChange.hs b/gen/Network/AWS/ECS/SubmitContainerStateChange.hs
--- a/gen/Network/AWS/ECS/SubmitContainerStateChange.hs
+++ b/gen/Network/AWS/ECS/SubmitContainerStateChange.hs
@@ -134,6 +134,8 @@
 
 instance Hashable SubmitContainerStateChange
 
+instance NFData SubmitContainerStateChange
+
 instance ToHeaders SubmitContainerStateChange where
         toHeaders
           = const
@@ -191,3 +193,5 @@
 -- | The response status code.
 scscrsResponseStatus :: Lens' SubmitContainerStateChangeResponse Int
 scscrsResponseStatus = lens _scscrsResponseStatus (\ s a -> s{_scscrsResponseStatus = a});
+
+instance NFData SubmitContainerStateChangeResponse
diff --git a/gen/Network/AWS/ECS/SubmitTaskStateChange.hs b/gen/Network/AWS/ECS/SubmitTaskStateChange.hs
--- a/gen/Network/AWS/ECS/SubmitTaskStateChange.hs
+++ b/gen/Network/AWS/ECS/SubmitTaskStateChange.hs
@@ -107,6 +107,8 @@
 
 instance Hashable SubmitTaskStateChange
 
+instance NFData SubmitTaskStateChange
+
 instance ToHeaders SubmitTaskStateChange where
         toHeaders
           = const
@@ -161,3 +163,5 @@
 -- | The response status code.
 stscrsResponseStatus :: Lens' SubmitTaskStateChangeResponse Int
 stscrsResponseStatus = lens _stscrsResponseStatus (\ s a -> s{_stscrsResponseStatus = a});
+
+instance NFData SubmitTaskStateChangeResponse
diff --git a/gen/Network/AWS/ECS/Types.hs b/gen/Network/AWS/ECS/Types.hs
--- a/gen/Network/AWS/ECS/Types.hs
+++ b/gen/Network/AWS/ECS/Types.hs
@@ -331,6 +331,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/ECS/Types/Product.hs b/gen/Network/AWS/ECS/Types/Product.hs
--- a/gen/Network/AWS/ECS/Types/Product.hs
+++ b/gen/Network/AWS/ECS/Types/Product.hs
@@ -63,6 +63,8 @@
 
 instance Hashable Attribute
 
+instance NFData Attribute
+
 instance ToJSON Attribute where
         toJSON Attribute'{..}
           = object
@@ -165,6 +167,8 @@
 
 instance Hashable Cluster
 
+instance NFData Cluster
+
 -- | A Docker container that is part of a task.
 --
 -- /See:/ 'container' smart constructor.
@@ -252,6 +256,8 @@
 
 instance Hashable Container
 
+instance NFData Container
+
 -- | Container definitions are used in task definitions to describe the
 -- different containers that are launched as part of a task.
 --
@@ -763,6 +769,8 @@
 
 instance Hashable ContainerDefinition
 
+instance NFData ContainerDefinition
+
 instance ToJSON ContainerDefinition where
         toJSON ContainerDefinition'{..}
           = object
@@ -933,6 +941,8 @@
 
 instance Hashable ContainerInstance
 
+instance NFData ContainerInstance
+
 -- | The overrides that should be sent to a container.
 --
 -- /See:/ 'containerOverride' smart constructor.
@@ -987,6 +997,8 @@
 
 instance Hashable ContainerOverride
 
+instance NFData ContainerOverride
+
 instance ToJSON ContainerOverride where
         toJSON ContainerOverride'{..}
           = object
@@ -1154,6 +1166,8 @@
 
 instance Hashable ContainerService
 
+instance NFData ContainerService
+
 -- | The details of an Amazon ECS service deployment.
 --
 -- /See:/ 'deployment' smart constructor.
@@ -1254,6 +1268,8 @@
 
 instance Hashable Deployment
 
+instance NFData Deployment
+
 -- | Optional deployment parameters that control how many tasks run during
 -- the deployment and the ordering of stopping and starting tasks.
 --
@@ -1304,6 +1320,8 @@
 
 instance Hashable DeploymentConfiguration
 
+instance NFData DeploymentConfiguration
+
 instance ToJSON DeploymentConfiguration where
         toJSON DeploymentConfiguration'{..}
           = object
@@ -1351,6 +1369,8 @@
 
 instance Hashable Failure
 
+instance NFData Failure
+
 -- | Hostnames and IP address entries that are added to the '\/etc\/hosts'
 -- file of a container via the 'extraHosts' parameter of its
 -- < ContainerDefinition>.
@@ -1395,6 +1415,8 @@
 
 instance Hashable HostEntry
 
+instance NFData HostEntry
+
 instance ToJSON HostEntry where
         toJSON HostEntry'{..}
           = object
@@ -1440,6 +1462,8 @@
 
 instance Hashable HostVolumeProperties
 
+instance NFData HostVolumeProperties
+
 instance ToJSON HostVolumeProperties where
         toJSON HostVolumeProperties'{..}
           = object
@@ -1486,6 +1510,8 @@
 
 instance Hashable KeyValuePair
 
+instance NFData KeyValuePair
+
 instance ToJSON KeyValuePair where
         toJSON KeyValuePair'{..}
           = object
@@ -1547,6 +1573,8 @@
 
 instance Hashable LoadBalancer
 
+instance NFData LoadBalancer
+
 instance ToJSON LoadBalancer where
         toJSON LoadBalancer'{..}
           = object
@@ -1605,6 +1633,8 @@
 
 instance Hashable LogConfiguration
 
+instance NFData LogConfiguration
+
 instance ToJSON LogConfiguration where
         toJSON LogConfiguration'{..}
           = object
@@ -1663,6 +1693,8 @@
 
 instance Hashable MountPoint
 
+instance NFData MountPoint
+
 instance ToJSON MountPoint where
         toJSON MountPoint'{..}
           = object
@@ -1733,6 +1765,8 @@
 
 instance Hashable NetworkBinding
 
+instance NFData NetworkBinding
+
 instance ToJSON NetworkBinding where
         toJSON NetworkBinding'{..}
           = object
@@ -1822,6 +1856,8 @@
 
 instance Hashable PortMapping
 
+instance NFData PortMapping
+
 instance ToJSON PortMapping where
         toJSON PortMapping'{..}
           = object
@@ -1913,6 +1949,8 @@
 
 instance Hashable Resource
 
+instance NFData Resource
+
 instance ToJSON Resource where
         toJSON Resource'{..}
           = object
@@ -1972,6 +2010,8 @@
 
 instance Hashable ServiceEvent
 
+instance NFData ServiceEvent
+
 -- | Details on a task in a cluster.
 --
 -- /See:/ 'task' smart constructor.
@@ -2119,6 +2159,8 @@
 
 instance Hashable Task
 
+instance NFData Task
+
 -- | Details of a task definition.
 --
 -- /See:/ 'taskDefinition' smart constructor.
@@ -2216,6 +2258,8 @@
 
 instance Hashable TaskDefinition
 
+instance NFData TaskDefinition
+
 -- | The overrides associated with a task.
 --
 -- /See:/ 'taskOverride' smart constructor.
@@ -2248,6 +2292,8 @@
 
 instance Hashable TaskOverride
 
+instance NFData TaskOverride
+
 instance ToJSON TaskOverride where
         toJSON TaskOverride'{..}
           = object
@@ -2307,6 +2353,8 @@
 
 instance Hashable Ulimit
 
+instance NFData Ulimit
+
 instance ToJSON Ulimit where
         toJSON Ulimit'{..}
           = object
@@ -2367,6 +2415,8 @@
 
 instance Hashable VersionInfo
 
+instance NFData VersionInfo
+
 instance ToJSON VersionInfo where
         toJSON VersionInfo'{..}
           = object
@@ -2420,6 +2470,8 @@
 
 instance Hashable Volume
 
+instance NFData Volume
+
 instance ToJSON Volume where
         toJSON Volume'{..}
           = object
@@ -2467,6 +2519,8 @@
                    (x .:? "sourceContainer") <*> (x .:? "readOnly"))
 
 instance Hashable VolumeFrom
+
+instance NFData VolumeFrom
 
 instance ToJSON VolumeFrom where
         toJSON VolumeFrom'{..}
diff --git a/gen/Network/AWS/ECS/Types/Sum.hs b/gen/Network/AWS/ECS/Types/Sum.hs
--- a/gen/Network/AWS/ECS/Types/Sum.hs
+++ b/gen/Network/AWS/ECS/Types/Sum.hs
@@ -49,6 +49,7 @@
         AUSUpdating -> "UPDATING"
 
 instance Hashable     AgentUpdateStatus
+instance NFData       AgentUpdateStatus
 instance ToByteString AgentUpdateStatus
 instance ToQuery      AgentUpdateStatus
 instance ToHeader     AgentUpdateStatus
@@ -77,6 +78,7 @@
         Stopped -> "STOPPED"
 
 instance Hashable     DesiredStatus
+instance NFData       DesiredStatus
 instance ToByteString DesiredStatus
 instance ToQuery      DesiredStatus
 instance ToHeader     DesiredStatus
@@ -111,6 +113,7 @@
         Syslog -> "syslog"
 
 instance Hashable     LogDriver
+instance NFData       LogDriver
 instance ToByteString LogDriver
 instance ToQuery      LogDriver
 instance ToHeader     LogDriver
@@ -139,6 +142,7 @@
         Desc -> "DESC"
 
 instance Hashable     SortOrder
+instance NFData       SortOrder
 instance ToByteString SortOrder
 instance ToQuery      SortOrder
 instance ToHeader     SortOrder
@@ -164,6 +168,7 @@
         Inactive -> "INACTIVE"
 
 instance Hashable     TaskDefinitionStatus
+instance NFData       TaskDefinitionStatus
 instance ToByteString TaskDefinitionStatus
 instance ToQuery      TaskDefinitionStatus
 instance ToHeader     TaskDefinitionStatus
@@ -192,6 +197,7 @@
         Udp -> "udp"
 
 instance Hashable     TransportProtocol
+instance NFData       TransportProtocol
 instance ToByteString TransportProtocol
 instance ToQuery      TransportProtocol
 instance ToHeader     TransportProtocol
@@ -259,6 +265,7 @@
         Stack -> "stack"
 
 instance Hashable     UlimitName
+instance NFData       UlimitName
 instance ToByteString UlimitName
 instance ToQuery      UlimitName
 instance ToHeader     UlimitName
diff --git a/gen/Network/AWS/ECS/UpdateContainerAgent.hs b/gen/Network/AWS/ECS/UpdateContainerAgent.hs
--- a/gen/Network/AWS/ECS/UpdateContainerAgent.hs
+++ b/gen/Network/AWS/ECS/UpdateContainerAgent.hs
@@ -100,6 +100,8 @@
 
 instance Hashable UpdateContainerAgent
 
+instance NFData UpdateContainerAgent
+
 instance ToHeaders UpdateContainerAgent where
         toHeaders
           = const
@@ -152,3 +154,5 @@
 -- | The response status code.
 ucarsResponseStatus :: Lens' UpdateContainerAgentResponse Int
 ucarsResponseStatus = lens _ucarsResponseStatus (\ s a -> s{_ucarsResponseStatus = a});
+
+instance NFData UpdateContainerAgentResponse
diff --git a/gen/Network/AWS/ECS/UpdateService.hs b/gen/Network/AWS/ECS/UpdateService.hs
--- a/gen/Network/AWS/ECS/UpdateService.hs
+++ b/gen/Network/AWS/ECS/UpdateService.hs
@@ -178,6 +178,8 @@
 
 instance Hashable UpdateService
 
+instance NFData UpdateService
+
 instance ToHeaders UpdateService where
         toHeaders
           = const
@@ -234,3 +236,5 @@
 -- | The response status code.
 usrsResponseStatus :: Lens' UpdateServiceResponse Int
 usrsResponseStatus = lens _usrsResponseStatus (\ s a -> s{_usrsResponseStatus = a});
+
+instance NFData UpdateServiceResponse