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-autoscaling.cabal b/amazonka-autoscaling.cabal
--- a/amazonka-autoscaling.cabal
+++ b/amazonka-autoscaling.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-autoscaling
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon Auto Scaling SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -103,7 +103,7 @@
         , Network.AWS.AutoScaling.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-autoscaling-test
@@ -123,9 +123,9 @@
         , Test.AWS.AutoScaling.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-autoscaling == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-autoscaling == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/AutoScaling.hs b/gen/Network/AWS/AutoScaling.hs
--- a/gen/Network/AWS/AutoScaling.hs
+++ b/gen/Network/AWS/AutoScaling.hs
@@ -257,12 +257,12 @@
     -- ** AutoScalingInstanceDetails
     , AutoScalingInstanceDetails
     , autoScalingInstanceDetails
+    , asidLaunchConfigurationName
     , asidInstanceId
     , asidAutoScalingGroupName
     , asidAvailabilityZone
     , asidLifecycleState
     , asidHealthStatus
-    , asidLaunchConfigurationName
     , asidProtectedFromScaleIn
 
     -- ** BlockDeviceMapping
diff --git a/gen/Network/AWS/AutoScaling/AttachInstances.hs b/gen/Network/AWS/AutoScaling/AttachInstances.hs
--- a/gen/Network/AWS/AutoScaling/AttachInstances.hs
+++ b/gen/Network/AWS/AutoScaling/AttachInstances.hs
@@ -86,6 +86,8 @@
 
 instance Hashable AttachInstances
 
+instance NFData AttachInstances
+
 instance ToHeaders AttachInstances where
         toHeaders = const mempty
 
@@ -111,3 +113,5 @@
 attachInstancesResponse
     :: AttachInstancesResponse
 attachInstancesResponse = AttachInstancesResponse'
+
+instance NFData AttachInstancesResponse
diff --git a/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs b/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs
--- a/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs
+++ b/gen/Network/AWS/AutoScaling/AttachLoadBalancers.hs
@@ -90,6 +90,8 @@
 
 instance Hashable AttachLoadBalancers
 
+instance NFData AttachLoadBalancers
+
 instance ToHeaders AttachLoadBalancers where
         toHeaders = const mempty
 
@@ -127,3 +129,5 @@
 -- | The response status code.
 albrsResponseStatus :: Lens' AttachLoadBalancersResponse Int
 albrsResponseStatus = lens _albrsResponseStatus (\ s a -> s{_albrsResponseStatus = a});
+
+instance NFData AttachLoadBalancersResponse
diff --git a/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs b/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs
--- a/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs
+++ b/gen/Network/AWS/AutoScaling/CompleteLifecycleAction.hs
@@ -139,6 +139,8 @@
 
 instance Hashable CompleteLifecycleAction
 
+instance NFData CompleteLifecycleAction
+
 instance ToHeaders CompleteLifecycleAction where
         toHeaders = const mempty
 
@@ -178,3 +180,5 @@
 -- | The response status code.
 clarsResponseStatus :: Lens' CompleteLifecycleActionResponse Int
 clarsResponseStatus = lens _clarsResponseStatus (\ s a -> s{_clarsResponseStatus = a});
+
+instance NFData CompleteLifecycleActionResponse
diff --git a/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs
--- a/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs
+++ b/gen/Network/AWS/AutoScaling/CreateAutoScalingGroup.hs
@@ -278,6 +278,8 @@
 
 instance Hashable CreateAutoScalingGroup
 
+instance NFData CreateAutoScalingGroup
+
 instance ToHeaders CreateAutoScalingGroup where
         toHeaders = const mempty
 
@@ -326,3 +328,5 @@
 createAutoScalingGroupResponse
     :: CreateAutoScalingGroupResponse
 createAutoScalingGroupResponse = CreateAutoScalingGroupResponse'
+
+instance NFData CreateAutoScalingGroupResponse
diff --git a/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs b/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs
--- a/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs
+++ b/gen/Network/AWS/AutoScaling/CreateLaunchConfiguration.hs
@@ -330,6 +330,8 @@
 
 instance Hashable CreateLaunchConfiguration
 
+instance NFData CreateLaunchConfiguration
+
 instance ToHeaders CreateLaunchConfiguration where
         toHeaders = const mempty
 
@@ -380,3 +382,5 @@
 createLaunchConfigurationResponse
     :: CreateLaunchConfigurationResponse
 createLaunchConfigurationResponse = CreateLaunchConfigurationResponse'
+
+instance NFData CreateLaunchConfigurationResponse
diff --git a/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs b/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs
--- a/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs
+++ b/gen/Network/AWS/AutoScaling/CreateOrUpdateTags.hs
@@ -76,6 +76,8 @@
 
 instance Hashable CreateOrUpdateTags
 
+instance NFData CreateOrUpdateTags
+
 instance ToHeaders CreateOrUpdateTags where
         toHeaders = const mempty
 
@@ -99,3 +101,5 @@
 createOrUpdateTagsResponse
     :: CreateOrUpdateTagsResponse
 createOrUpdateTagsResponse = CreateOrUpdateTagsResponse'
+
+instance NFData CreateOrUpdateTagsResponse
diff --git a/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs
--- a/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs
+++ b/gen/Network/AWS/AutoScaling/DeleteAutoScalingGroup.hs
@@ -98,6 +98,8 @@
 
 instance Hashable DeleteAutoScalingGroup
 
+instance NFData DeleteAutoScalingGroup
+
 instance ToHeaders DeleteAutoScalingGroup where
         toHeaders = const mempty
 
@@ -123,3 +125,5 @@
 deleteAutoScalingGroupResponse
     :: DeleteAutoScalingGroupResponse
 deleteAutoScalingGroupResponse = DeleteAutoScalingGroupResponse'
+
+instance NFData DeleteAutoScalingGroupResponse
diff --git a/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs b/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs
--- a/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs
+++ b/gen/Network/AWS/AutoScaling/DeleteLaunchConfiguration.hs
@@ -74,6 +74,8 @@
 
 instance Hashable DeleteLaunchConfiguration
 
+instance NFData DeleteLaunchConfiguration
+
 instance ToHeaders DeleteLaunchConfiguration where
         toHeaders = const mempty
 
@@ -99,3 +101,5 @@
 deleteLaunchConfigurationResponse
     :: DeleteLaunchConfigurationResponse
 deleteLaunchConfigurationResponse = DeleteLaunchConfigurationResponse'
+
+instance NFData DeleteLaunchConfigurationResponse
diff --git a/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs b/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs
--- a/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs
+++ b/gen/Network/AWS/AutoScaling/DeleteLifecycleHook.hs
@@ -88,6 +88,8 @@
 
 instance Hashable DeleteLifecycleHook
 
+instance NFData DeleteLifecycleHook
+
 instance ToHeaders DeleteLifecycleHook where
         toHeaders = const mempty
 
@@ -123,3 +125,5 @@
 -- | The response status code.
 drsResponseStatus :: Lens' DeleteLifecycleHookResponse Int
 drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});
+
+instance NFData DeleteLifecycleHookResponse
diff --git a/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs b/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs
--- a/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs
+++ b/gen/Network/AWS/AutoScaling/DeleteNotificationConfiguration.hs
@@ -83,6 +83,8 @@
 
 instance Hashable DeleteNotificationConfiguration
 
+instance NFData DeleteNotificationConfiguration
+
 instance ToHeaders DeleteNotificationConfiguration
          where
         toHeaders = const mempty
@@ -111,3 +113,6 @@
     :: DeleteNotificationConfigurationResponse
 deleteNotificationConfigurationResponse =
     DeleteNotificationConfigurationResponse'
+
+instance NFData
+         DeleteNotificationConfigurationResponse
diff --git a/gen/Network/AWS/AutoScaling/DeletePolicy.hs b/gen/Network/AWS/AutoScaling/DeletePolicy.hs
--- a/gen/Network/AWS/AutoScaling/DeletePolicy.hs
+++ b/gen/Network/AWS/AutoScaling/DeletePolicy.hs
@@ -82,6 +82,8 @@
 
 instance Hashable DeletePolicy
 
+instance NFData DeletePolicy
+
 instance ToHeaders DeletePolicy where
         toHeaders = const mempty
 
@@ -106,3 +108,5 @@
 deletePolicyResponse
     :: DeletePolicyResponse
 deletePolicyResponse = DeletePolicyResponse'
+
+instance NFData DeletePolicyResponse
diff --git a/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs b/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs
--- a/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs
+++ b/gen/Network/AWS/AutoScaling/DeleteScheduledAction.hs
@@ -78,6 +78,8 @@
 
 instance Hashable DeleteScheduledAction
 
+instance NFData DeleteScheduledAction
+
 instance ToHeaders DeleteScheduledAction where
         toHeaders = const mempty
 
@@ -102,3 +104,5 @@
 deleteScheduledActionResponse
     :: DeleteScheduledActionResponse
 deleteScheduledActionResponse = DeleteScheduledActionResponse'
+
+instance NFData DeleteScheduledActionResponse
diff --git a/gen/Network/AWS/AutoScaling/DeleteTags.hs b/gen/Network/AWS/AutoScaling/DeleteTags.hs
--- a/gen/Network/AWS/AutoScaling/DeleteTags.hs
+++ b/gen/Network/AWS/AutoScaling/DeleteTags.hs
@@ -67,6 +67,8 @@
 
 instance Hashable DeleteTags
 
+instance NFData DeleteTags
+
 instance ToHeaders DeleteTags where
         toHeaders = const mempty
 
@@ -90,3 +92,5 @@
 deleteTagsResponse
     :: DeleteTagsResponse
 deleteTagsResponse = DeleteTagsResponse'
+
+instance NFData DeleteTagsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs b/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs
--- a/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeAccountLimits.hs
@@ -74,6 +74,8 @@
 
 instance Hashable DescribeAccountLimits
 
+instance NFData DescribeAccountLimits
+
 instance ToHeaders DescribeAccountLimits where
         toHeaders = const mempty
 
@@ -142,3 +144,5 @@
 -- | The response status code.
 dalrsResponseStatus :: Lens' DescribeAccountLimitsResponse Int
 dalrsResponseStatus = lens _dalrsResponseStatus (\ s a -> s{_dalrsResponseStatus = a});
+
+instance NFData DescribeAccountLimitsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs b/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs
--- a/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeAdjustmentTypes.hs
@@ -65,6 +65,8 @@
 
 instance Hashable DescribeAdjustmentTypes
 
+instance NFData DescribeAdjustmentTypes
+
 instance ToHeaders DescribeAdjustmentTypes where
         toHeaders = const mempty
 
@@ -108,3 +110,5 @@
 -- | The response status code.
 datrsResponseStatus :: Lens' DescribeAdjustmentTypesResponse Int
 datrsResponseStatus = lens _datrsResponseStatus (\ s a -> s{_datrsResponseStatus = a});
+
+instance NFData DescribeAdjustmentTypesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs b/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs
--- a/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeAutoScalingGroups.hs
@@ -108,6 +108,8 @@
 
 instance Hashable DescribeAutoScalingGroups
 
+instance NFData DescribeAutoScalingGroups
+
 instance ToHeaders DescribeAutoScalingGroups where
         toHeaders = const mempty
 
@@ -165,3 +167,5 @@
 -- | The groups.
 dasgrsAutoScalingGroups :: Lens' DescribeAutoScalingGroupsResponse [AutoScalingGroup]
 dasgrsAutoScalingGroups = lens _dasgrsAutoScalingGroups (\ s a -> s{_dasgrsAutoScalingGroups = a}) . _Coerce;
+
+instance NFData DescribeAutoScalingGroupsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs b/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs
--- a/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeAutoScalingInstances.hs
@@ -113,6 +113,8 @@
 
 instance Hashable DescribeAutoScalingInstances
 
+instance NFData DescribeAutoScalingInstances
+
 instance ToHeaders DescribeAutoScalingInstances where
         toHeaders = const mempty
 
@@ -168,3 +170,5 @@
 -- | The response status code.
 dasirsResponseStatus :: Lens' DescribeAutoScalingInstancesResponse Int
 dasirsResponseStatus = lens _dasirsResponseStatus (\ s a -> s{_dasirsResponseStatus = a});
+
+instance NFData DescribeAutoScalingInstancesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs b/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs
--- a/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeAutoScalingNotificationTypes.hs
@@ -68,6 +68,8 @@
 instance Hashable
          DescribeAutoScalingNotificationTypes
 
+instance NFData DescribeAutoScalingNotificationTypes
+
 instance ToHeaders
          DescribeAutoScalingNotificationTypes where
         toHeaders = const mempty
@@ -126,3 +128,6 @@
 -- | The response status code.
 dasntrsResponseStatus :: Lens' DescribeAutoScalingNotificationTypesResponse Int
 dasntrsResponseStatus = lens _dasntrsResponseStatus (\ s a -> s{_dasntrsResponseStatus = a});
+
+instance NFData
+         DescribeAutoScalingNotificationTypesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs b/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs
--- a/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeLaunchConfigurations.hs
@@ -111,6 +111,8 @@
 
 instance Hashable DescribeLaunchConfigurations
 
+instance NFData DescribeLaunchConfigurations
+
 instance ToHeaders DescribeLaunchConfigurations where
         toHeaders = const mempty
 
@@ -168,3 +170,5 @@
 -- | The launch configurations.
 dlcrsLaunchConfigurations :: Lens' DescribeLaunchConfigurationsResponse [LaunchConfiguration]
 dlcrsLaunchConfigurations = lens _dlcrsLaunchConfigurations (\ s a -> s{_dlcrsLaunchConfigurations = a}) . _Coerce;
+
+instance NFData DescribeLaunchConfigurationsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs b/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs
--- a/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeLifecycleHookTypes.hs
@@ -66,6 +66,8 @@
 
 instance Hashable DescribeLifecycleHookTypes
 
+instance NFData DescribeLifecycleHookTypes
+
 instance ToHeaders DescribeLifecycleHookTypes where
         toHeaders = const mempty
 
@@ -114,3 +116,5 @@
 -- | The response status code.
 dlhtrsResponseStatus :: Lens' DescribeLifecycleHookTypesResponse Int
 dlhtrsResponseStatus = lens _dlhtrsResponseStatus (\ s a -> s{_dlhtrsResponseStatus = a});
+
+instance NFData DescribeLifecycleHookTypesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs b/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs
--- a/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeLifecycleHooks.hs
@@ -87,6 +87,8 @@
 
 instance Hashable DescribeLifecycleHooks
 
+instance NFData DescribeLifecycleHooks
+
 instance ToHeaders DescribeLifecycleHooks where
         toHeaders = const mempty
 
@@ -133,3 +135,5 @@
 -- | The response status code.
 dlhrsResponseStatus :: Lens' DescribeLifecycleHooksResponse Int
 dlhrsResponseStatus = lens _dlhrsResponseStatus (\ s a -> s{_dlhrsResponseStatus = a});
+
+instance NFData DescribeLifecycleHooksResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs b/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs
--- a/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeLoadBalancers.hs
@@ -99,6 +99,8 @@
 
 instance Hashable DescribeLoadBalancers
 
+instance NFData DescribeLoadBalancers
+
 instance ToHeaders DescribeLoadBalancers where
         toHeaders = const mempty
 
@@ -152,3 +154,5 @@
 -- | The response status code.
 dlbrsResponseStatus :: Lens' DescribeLoadBalancersResponse Int
 dlbrsResponseStatus = lens _dlbrsResponseStatus (\ s a -> s{_dlbrsResponseStatus = a});
+
+instance NFData DescribeLoadBalancersResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs b/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs
--- a/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeMetricCollectionTypes.hs
@@ -75,6 +75,8 @@
 
 instance Hashable DescribeMetricCollectionTypes
 
+instance NFData DescribeMetricCollectionTypes
+
 instance ToHeaders DescribeMetricCollectionTypes
          where
         toHeaders = const mempty
@@ -127,3 +129,5 @@
 -- | The response status code.
 dmctrsResponseStatus :: Lens' DescribeMetricCollectionTypesResponse Int
 dmctrsResponseStatus = lens _dmctrsResponseStatus (\ s a -> s{_dmctrsResponseStatus = a});
+
+instance NFData DescribeMetricCollectionTypesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs b/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs
--- a/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeNotificationConfigurations.hs
@@ -112,6 +112,8 @@
 
 instance Hashable DescribeNotificationConfigurations
 
+instance NFData DescribeNotificationConfigurations
+
 instance ToHeaders DescribeNotificationConfigurations
          where
         toHeaders = const mempty
@@ -171,3 +173,6 @@
 -- | The notification configurations.
 dncrsNotificationConfigurations :: Lens' DescribeNotificationConfigurationsResponse [NotificationConfiguration]
 dncrsNotificationConfigurations = lens _dncrsNotificationConfigurations (\ s a -> s{_dncrsNotificationConfigurations = a}) . _Coerce;
+
+instance NFData
+         DescribeNotificationConfigurationsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribePolicies.hs b/gen/Network/AWS/AutoScaling/DescribePolicies.hs
--- a/gen/Network/AWS/AutoScaling/DescribePolicies.hs
+++ b/gen/Network/AWS/AutoScaling/DescribePolicies.hs
@@ -129,6 +129,8 @@
 
 instance Hashable DescribePolicies
 
+instance NFData DescribePolicies
+
 instance ToHeaders DescribePolicies where
         toHeaders = const mempty
 
@@ -186,3 +188,5 @@
 -- | The response status code.
 dprsResponseStatus :: Lens' DescribePoliciesResponse Int
 dprsResponseStatus = lens _dprsResponseStatus (\ s a -> s{_dprsResponseStatus = a});
+
+instance NFData DescribePoliciesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs b/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs
--- a/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeScalingActivities.hs
@@ -123,6 +123,8 @@
 
 instance Hashable DescribeScalingActivities
 
+instance NFData DescribeScalingActivities
+
 instance ToHeaders DescribeScalingActivities where
         toHeaders = const mempty
 
@@ -179,3 +181,5 @@
 -- | The scaling activities.
 dsasrsActivities :: Lens' DescribeScalingActivitiesResponse [Activity]
 dsasrsActivities = lens _dsasrsActivities (\ s a -> s{_dsasrsActivities = a}) . _Coerce;
+
+instance NFData DescribeScalingActivitiesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs b/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs
--- a/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeScalingProcessTypes.hs
@@ -67,6 +67,8 @@
 
 instance Hashable DescribeScalingProcessTypes
 
+instance NFData DescribeScalingProcessTypes
+
 instance ToHeaders DescribeScalingProcessTypes where
         toHeaders = const mempty
 
@@ -110,3 +112,5 @@
 -- | The response status code.
 dsptrsResponseStatus :: Lens' DescribeScalingProcessTypesResponse Int
 dsptrsResponseStatus = lens _dsptrsResponseStatus (\ s a -> s{_dsptrsResponseStatus = a});
+
+instance NFData DescribeScalingProcessTypesResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs b/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs
--- a/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeScheduledActions.hs
@@ -146,6 +146,8 @@
 
 instance Hashable DescribeScheduledActions
 
+instance NFData DescribeScheduledActions
+
 instance ToHeaders DescribeScheduledActions where
         toHeaders = const mempty
 
@@ -205,3 +207,5 @@
 -- | The response status code.
 dsarsResponseStatus :: Lens' DescribeScheduledActionsResponse Int
 dsarsResponseStatus = lens _dsarsResponseStatus (\ s a -> s{_dsarsResponseStatus = a});
+
+instance NFData DescribeScheduledActionsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeTags.hs b/gen/Network/AWS/AutoScaling/DescribeTags.hs
--- a/gen/Network/AWS/AutoScaling/DescribeTags.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeTags.hs
@@ -116,6 +116,8 @@
 
 instance Hashable DescribeTags
 
+instance NFData DescribeTags
+
 instance ToHeaders DescribeTags where
         toHeaders = const mempty
 
@@ -170,3 +172,5 @@
 -- | The response status code.
 dtrsResponseStatus :: Lens' DescribeTagsResponse Int
 dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a});
+
+instance NFData DescribeTagsResponse
diff --git a/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs b/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs
--- a/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs
+++ b/gen/Network/AWS/AutoScaling/DescribeTerminationPolicyTypes.hs
@@ -67,6 +67,8 @@
 
 instance Hashable DescribeTerminationPolicyTypes
 
+instance NFData DescribeTerminationPolicyTypes
+
 instance ToHeaders DescribeTerminationPolicyTypes
          where
         toHeaders = const mempty
@@ -113,3 +115,6 @@
 -- | The response status code.
 dtptrsResponseStatus :: Lens' DescribeTerminationPolicyTypesResponse Int
 dtptrsResponseStatus = lens _dtptrsResponseStatus (\ s a -> s{_dtptrsResponseStatus = a});
+
+instance NFData
+         DescribeTerminationPolicyTypesResponse
diff --git a/gen/Network/AWS/AutoScaling/DetachInstances.hs b/gen/Network/AWS/AutoScaling/DetachInstances.hs
--- a/gen/Network/AWS/AutoScaling/DetachInstances.hs
+++ b/gen/Network/AWS/AutoScaling/DetachInstances.hs
@@ -107,6 +107,8 @@
 
 instance Hashable DetachInstances
 
+instance NFData DetachInstances
+
 instance ToHeaders DetachInstances where
         toHeaders = const mempty
 
@@ -154,3 +156,5 @@
 -- | The response status code.
 dirsResponseStatus :: Lens' DetachInstancesResponse Int
 dirsResponseStatus = lens _dirsResponseStatus (\ s a -> s{_dirsResponseStatus = a});
+
+instance NFData DetachInstancesResponse
diff --git a/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs b/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs
--- a/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs
+++ b/gen/Network/AWS/AutoScaling/DetachLoadBalancers.hs
@@ -88,6 +88,8 @@
 
 instance Hashable DetachLoadBalancers
 
+instance NFData DetachLoadBalancers
+
 instance ToHeaders DetachLoadBalancers where
         toHeaders = const mempty
 
@@ -125,3 +127,5 @@
 -- | The response status code.
 dlbsrsResponseStatus :: Lens' DetachLoadBalancersResponse Int
 dlbsrsResponseStatus = lens _dlbsrsResponseStatus (\ s a -> s{_dlbsrsResponseStatus = a});
+
+instance NFData DetachLoadBalancersResponse
diff --git a/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs b/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs
--- a/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs
+++ b/gen/Network/AWS/AutoScaling/DisableMetricsCollection.hs
@@ -98,6 +98,8 @@
 
 instance Hashable DisableMetricsCollection
 
+instance NFData DisableMetricsCollection
+
 instance ToHeaders DisableMetricsCollection where
         toHeaders = const mempty
 
@@ -124,3 +126,5 @@
 disableMetricsCollectionResponse
     :: DisableMetricsCollectionResponse
 disableMetricsCollectionResponse = DisableMetricsCollectionResponse'
+
+instance NFData DisableMetricsCollectionResponse
diff --git a/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs b/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs
--- a/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs
+++ b/gen/Network/AWS/AutoScaling/EnableMetricsCollection.hs
@@ -114,6 +114,8 @@
 
 instance Hashable EnableMetricsCollection
 
+instance NFData EnableMetricsCollection
+
 instance ToHeaders EnableMetricsCollection where
         toHeaders = const mempty
 
@@ -141,3 +143,5 @@
 enableMetricsCollectionResponse
     :: EnableMetricsCollectionResponse
 enableMetricsCollectionResponse = EnableMetricsCollectionResponse'
+
+instance NFData EnableMetricsCollectionResponse
diff --git a/gen/Network/AWS/AutoScaling/EnterStandby.hs b/gen/Network/AWS/AutoScaling/EnterStandby.hs
--- a/gen/Network/AWS/AutoScaling/EnterStandby.hs
+++ b/gen/Network/AWS/AutoScaling/EnterStandby.hs
@@ -104,6 +104,8 @@
 
 instance Hashable EnterStandby
 
+instance NFData EnterStandby
+
 instance ToHeaders EnterStandby where
         toHeaders = const mempty
 
@@ -150,3 +152,5 @@
 -- | The response status code.
 ersResponseStatus :: Lens' EnterStandbyResponse Int
 ersResponseStatus = lens _ersResponseStatus (\ s a -> s{_ersResponseStatus = a});
+
+instance NFData EnterStandbyResponse
diff --git a/gen/Network/AWS/AutoScaling/ExecutePolicy.hs b/gen/Network/AWS/AutoScaling/ExecutePolicy.hs
--- a/gen/Network/AWS/AutoScaling/ExecutePolicy.hs
+++ b/gen/Network/AWS/AutoScaling/ExecutePolicy.hs
@@ -125,6 +125,8 @@
 
 instance Hashable ExecutePolicy
 
+instance NFData ExecutePolicy
+
 instance ToHeaders ExecutePolicy where
         toHeaders = const mempty
 
@@ -152,3 +154,5 @@
 executePolicyResponse
     :: ExecutePolicyResponse
 executePolicyResponse = ExecutePolicyResponse'
+
+instance NFData ExecutePolicyResponse
diff --git a/gen/Network/AWS/AutoScaling/ExitStandby.hs b/gen/Network/AWS/AutoScaling/ExitStandby.hs
--- a/gen/Network/AWS/AutoScaling/ExitStandby.hs
+++ b/gen/Network/AWS/AutoScaling/ExitStandby.hs
@@ -90,6 +90,8 @@
 
 instance Hashable ExitStandby
 
+instance NFData ExitStandby
+
 instance ToHeaders ExitStandby where
         toHeaders = const mempty
 
@@ -134,3 +136,5 @@
 -- | The response status code.
 esrsResponseStatus :: Lens' ExitStandbyResponse Int
 esrsResponseStatus = lens _esrsResponseStatus (\ s a -> s{_esrsResponseStatus = a});
+
+instance NFData ExitStandbyResponse
diff --git a/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs b/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs
--- a/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs
+++ b/gen/Network/AWS/AutoScaling/PutLifecycleHook.hs
@@ -207,6 +207,8 @@
 
 instance Hashable PutLifecycleHook
 
+instance NFData PutLifecycleHook
+
 instance ToHeaders PutLifecycleHook where
         toHeaders = const mempty
 
@@ -248,3 +250,5 @@
 -- | The response status code.
 plhrsResponseStatus :: Lens' PutLifecycleHookResponse Int
 plhrsResponseStatus = lens _plhrsResponseStatus (\ s a -> s{_plhrsResponseStatus = a});
+
+instance NFData PutLifecycleHookResponse
diff --git a/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs b/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs
--- a/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs
+++ b/gen/Network/AWS/AutoScaling/PutNotificationConfiguration.hs
@@ -101,6 +101,8 @@
 
 instance Hashable PutNotificationConfiguration
 
+instance NFData PutNotificationConfiguration
+
 instance ToHeaders PutNotificationConfiguration where
         toHeaders = const mempty
 
@@ -128,3 +130,5 @@
 putNotificationConfigurationResponse
     :: PutNotificationConfigurationResponse
 putNotificationConfigurationResponse = PutNotificationConfigurationResponse'
+
+instance NFData PutNotificationConfigurationResponse
diff --git a/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs b/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs
--- a/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs
+++ b/gen/Network/AWS/AutoScaling/PutScalingPolicy.hs
@@ -212,6 +212,8 @@
 
 instance Hashable PutScalingPolicy
 
+instance NFData PutScalingPolicy
+
 instance ToHeaders PutScalingPolicy where
         toHeaders = const mempty
 
@@ -268,3 +270,5 @@
 -- | The response status code.
 psprsResponseStatus :: Lens' PutScalingPolicyResponse Int
 psprsResponseStatus = lens _psprsResponseStatus (\ s a -> s{_psprsResponseStatus = a});
+
+instance NFData PutScalingPolicyResponse
diff --git a/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs b/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs
--- a/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs
+++ b/gen/Network/AWS/AutoScaling/PutScheduledUpdateGroupAction.hs
@@ -163,6 +163,8 @@
 
 instance Hashable PutScheduledUpdateGroupAction
 
+instance NFData PutScheduledUpdateGroupAction
+
 instance ToHeaders PutScheduledUpdateGroupAction
          where
         toHeaders = const mempty
@@ -195,3 +197,5 @@
 putScheduledUpdateGroupActionResponse
     :: PutScheduledUpdateGroupActionResponse
 putScheduledUpdateGroupActionResponse = PutScheduledUpdateGroupActionResponse'
+
+instance NFData PutScheduledUpdateGroupActionResponse
diff --git a/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs b/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs
--- a/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs
+++ b/gen/Network/AWS/AutoScaling/RecordLifecycleActionHeartbeat.hs
@@ -130,6 +130,8 @@
 
 instance Hashable RecordLifecycleActionHeartbeat
 
+instance NFData RecordLifecycleActionHeartbeat
+
 instance ToHeaders RecordLifecycleActionHeartbeat
          where
         toHeaders = const mempty
@@ -169,3 +171,6 @@
 -- | The response status code.
 rlahrsResponseStatus :: Lens' RecordLifecycleActionHeartbeatResponse Int
 rlahrsResponseStatus = lens _rlahrsResponseStatus (\ s a -> s{_rlahrsResponseStatus = a});
+
+instance NFData
+         RecordLifecycleActionHeartbeatResponse
diff --git a/gen/Network/AWS/AutoScaling/ResumeProcesses.hs b/gen/Network/AWS/AutoScaling/ResumeProcesses.hs
--- a/gen/Network/AWS/AutoScaling/ResumeProcesses.hs
+++ b/gen/Network/AWS/AutoScaling/ResumeProcesses.hs
@@ -99,6 +99,8 @@
 
 instance Hashable ResumeProcesses
 
+instance NFData ResumeProcesses
+
 instance ToHeaders ResumeProcesses where
         toHeaders = const mempty
 
@@ -125,3 +127,5 @@
 resumeProcessesResponse
     :: ResumeProcessesResponse
 resumeProcessesResponse = ResumeProcessesResponse'
+
+instance NFData ResumeProcessesResponse
diff --git a/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs b/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs
--- a/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs
+++ b/gen/Network/AWS/AutoScaling/SetDesiredCapacity.hs
@@ -97,6 +97,8 @@
 
 instance Hashable SetDesiredCapacity
 
+instance NFData SetDesiredCapacity
+
 instance ToHeaders SetDesiredCapacity where
         toHeaders = const mempty
 
@@ -122,3 +124,5 @@
 setDesiredCapacityResponse
     :: SetDesiredCapacityResponse
 setDesiredCapacityResponse = SetDesiredCapacityResponse'
+
+instance NFData SetDesiredCapacityResponse
diff --git a/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs b/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs
--- a/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs
+++ b/gen/Network/AWS/AutoScaling/SetInstanceHealth.hs
@@ -100,6 +100,8 @@
 
 instance Hashable SetInstanceHealth
 
+instance NFData SetInstanceHealth
+
 instance ToHeaders SetInstanceHealth where
         toHeaders = const mempty
 
@@ -126,3 +128,5 @@
 setInstanceHealthResponse
     :: SetInstanceHealthResponse
 setInstanceHealthResponse = SetInstanceHealthResponse'
+
+instance NFData SetInstanceHealthResponse
diff --git a/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs b/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs
--- a/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs
+++ b/gen/Network/AWS/AutoScaling/SetInstanceProtection.hs
@@ -99,6 +99,8 @@
 
 instance Hashable SetInstanceProtection
 
+instance NFData SetInstanceProtection
+
 instance ToHeaders SetInstanceProtection where
         toHeaders = const mempty
 
@@ -136,3 +138,5 @@
 -- | The response status code.
 siprsResponseStatus :: Lens' SetInstanceProtectionResponse Int
 siprsResponseStatus = lens _siprsResponseStatus (\ s a -> s{_siprsResponseStatus = a});
+
+instance NFData SetInstanceProtectionResponse
diff --git a/gen/Network/AWS/AutoScaling/SuspendProcesses.hs b/gen/Network/AWS/AutoScaling/SuspendProcesses.hs
--- a/gen/Network/AWS/AutoScaling/SuspendProcesses.hs
+++ b/gen/Network/AWS/AutoScaling/SuspendProcesses.hs
@@ -104,6 +104,8 @@
 
 instance Hashable SuspendProcesses
 
+instance NFData SuspendProcesses
+
 instance ToHeaders SuspendProcesses where
         toHeaders = const mempty
 
@@ -130,3 +132,5 @@
 suspendProcessesResponse
     :: SuspendProcessesResponse
 suspendProcessesResponse = SuspendProcessesResponse'
+
+instance NFData SuspendProcessesResponse
diff --git a/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs
--- a/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs
+++ b/gen/Network/AWS/AutoScaling/TerminateInstanceInAutoScalingGroup.hs
@@ -93,6 +93,8 @@
 
 instance Hashable TerminateInstanceInAutoScalingGroup
 
+instance NFData TerminateInstanceInAutoScalingGroup
+
 instance ToHeaders
          TerminateInstanceInAutoScalingGroup where
         toHeaders = const mempty
@@ -142,3 +144,6 @@
 -- | The response status code.
 tiiasgrsResponseStatus :: Lens' TerminateInstanceInAutoScalingGroupResponse Int
 tiiasgrsResponseStatus = lens _tiiasgrsResponseStatus (\ s a -> s{_tiiasgrsResponseStatus = a});
+
+instance NFData
+         TerminateInstanceInAutoScalingGroupResponse
diff --git a/gen/Network/AWS/AutoScaling/Types.hs b/gen/Network/AWS/AutoScaling/Types.hs
--- a/gen/Network/AWS/AutoScaling/Types.hs
+++ b/gen/Network/AWS/AutoScaling/Types.hs
@@ -82,12 +82,12 @@
     -- * AutoScalingInstanceDetails
     , AutoScalingInstanceDetails
     , autoScalingInstanceDetails
+    , asidLaunchConfigurationName
     , asidInstanceId
     , asidAutoScalingGroupName
     , asidAvailabilityZone
     , asidLifecycleState
     , asidHealthStatus
-    , asidLaunchConfigurationName
     , asidProtectedFromScaleIn
 
     -- * BlockDeviceMapping
@@ -301,6 +301,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/AutoScaling/Types/Product.hs b/gen/Network/AWS/AutoScaling/Types/Product.hs
--- a/gen/Network/AWS/AutoScaling/Types/Product.hs
+++ b/gen/Network/AWS/AutoScaling/Types/Product.hs
@@ -138,6 +138,8 @@
 
 instance Hashable Activity
 
+instance NFData Activity
+
 -- | Describes a policy adjustment type.
 --
 -- For more information, see
@@ -172,6 +174,8 @@
 
 instance Hashable AdjustmentType
 
+instance NFData AdjustmentType
+
 -- | Describes an alarm.
 --
 -- /See:/ 'alarm' smart constructor.
@@ -210,6 +214,8 @@
 
 instance Hashable Alarm
 
+instance NFData Alarm
+
 -- | Describes an Auto Scaling group.
 --
 -- /See:/ 'autoScalingGroup' smart constructor.
@@ -453,16 +459,18 @@
 
 instance Hashable AutoScalingGroup
 
+instance NFData AutoScalingGroup
+
 -- | Describes an EC2 instance associated with an Auto Scaling group.
 --
 -- /See:/ 'autoScalingInstanceDetails' smart constructor.
 data AutoScalingInstanceDetails = AutoScalingInstanceDetails'
-    { _asidInstanceId              :: !Text
+    { _asidLaunchConfigurationName :: !(Maybe Text)
+    , _asidInstanceId              :: !Text
     , _asidAutoScalingGroupName    :: !Text
     , _asidAvailabilityZone        :: !Text
     , _asidLifecycleState          :: !Text
     , _asidHealthStatus            :: !Text
-    , _asidLaunchConfigurationName :: !Text
     , _asidProtectedFromScaleIn    :: !Bool
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
@@ -470,6 +478,8 @@
 --
 -- Use one of the following lenses to modify other fields as desired:
 --
+-- * 'asidLaunchConfigurationName'
+--
 -- * 'asidInstanceId'
 --
 -- * 'asidAutoScalingGroupName'
@@ -480,8 +490,6 @@
 --
 -- * 'asidHealthStatus'
 --
--- * 'asidLaunchConfigurationName'
---
 -- * 'asidProtectedFromScaleIn'
 autoScalingInstanceDetails
     :: Text -- ^ 'asidInstanceId'
@@ -489,20 +497,23 @@
     -> Text -- ^ 'asidAvailabilityZone'
     -> Text -- ^ 'asidLifecycleState'
     -> Text -- ^ 'asidHealthStatus'
-    -> Text -- ^ 'asidLaunchConfigurationName'
     -> Bool -- ^ 'asidProtectedFromScaleIn'
     -> AutoScalingInstanceDetails
-autoScalingInstanceDetails pInstanceId_ pAutoScalingGroupName_ pAvailabilityZone_ pLifecycleState_ pHealthStatus_ pLaunchConfigurationName_ pProtectedFromScaleIn_ =
+autoScalingInstanceDetails pInstanceId_ pAutoScalingGroupName_ pAvailabilityZone_ pLifecycleState_ pHealthStatus_ pProtectedFromScaleIn_ =
     AutoScalingInstanceDetails'
-    { _asidInstanceId = pInstanceId_
+    { _asidLaunchConfigurationName = Nothing
+    , _asidInstanceId = pInstanceId_
     , _asidAutoScalingGroupName = pAutoScalingGroupName_
     , _asidAvailabilityZone = pAvailabilityZone_
     , _asidLifecycleState = pLifecycleState_
     , _asidHealthStatus = pHealthStatus_
-    , _asidLaunchConfigurationName = pLaunchConfigurationName_
     , _asidProtectedFromScaleIn = pProtectedFromScaleIn_
     }
 
+-- | The launch configuration associated with the instance.
+asidLaunchConfigurationName :: Lens' AutoScalingInstanceDetails (Maybe Text)
+asidLaunchConfigurationName = lens _asidLaunchConfigurationName (\ s a -> s{_asidLaunchConfigurationName = a});
+
 -- | The ID of the instance.
 asidInstanceId :: Lens' AutoScalingInstanceDetails Text
 asidInstanceId = lens _asidInstanceId (\ s a -> s{_asidInstanceId = a});
@@ -527,10 +538,6 @@
 asidHealthStatus :: Lens' AutoScalingInstanceDetails Text
 asidHealthStatus = lens _asidHealthStatus (\ s a -> s{_asidHealthStatus = a});
 
--- | The launch configuration associated with the instance.
-asidLaunchConfigurationName :: Lens' AutoScalingInstanceDetails Text
-asidLaunchConfigurationName = lens _asidLaunchConfigurationName (\ s a -> s{_asidLaunchConfigurationName = a});
-
 -- | Indicates whether the instance is protected from termination by Auto
 -- Scaling when scaling in.
 asidProtectedFromScaleIn :: Lens' AutoScalingInstanceDetails Bool
@@ -539,15 +546,18 @@
 instance FromXML AutoScalingInstanceDetails where
         parseXML x
           = AutoScalingInstanceDetails' <$>
-              (x .@ "InstanceId") <*> (x .@ "AutoScalingGroupName")
+              (x .@? "LaunchConfigurationName") <*>
+                (x .@ "InstanceId")
+                <*> (x .@ "AutoScalingGroupName")
                 <*> (x .@ "AvailabilityZone")
                 <*> (x .@ "LifecycleState")
                 <*> (x .@ "HealthStatus")
-                <*> (x .@ "LaunchConfigurationName")
                 <*> (x .@ "ProtectedFromScaleIn")
 
 instance Hashable AutoScalingInstanceDetails
 
+instance NFData AutoScalingInstanceDetails
+
 -- | Describes a block device mapping.
 --
 -- /See:/ 'blockDeviceMapping' smart constructor.
@@ -610,6 +620,8 @@
 
 instance Hashable BlockDeviceMapping
 
+instance NFData BlockDeviceMapping
+
 instance ToQuery BlockDeviceMapping where
         toQuery BlockDeviceMapping'{..}
           = mconcat
@@ -716,6 +728,8 @@
 
 instance Hashable EBS
 
+instance NFData EBS
+
 instance ToQuery EBS where
         toQuery EBS'{..}
           = mconcat
@@ -780,6 +794,8 @@
 
 instance Hashable EnabledMetric
 
+instance NFData EnabledMetric
+
 -- | Describes a filter.
 --
 -- /See:/ 'filter'' smart constructor.
@@ -815,6 +831,8 @@
 
 instance Hashable Filter
 
+instance NFData Filter
+
 instance ToQuery Filter where
         toQuery Filter'{..}
           = mconcat
@@ -906,6 +924,8 @@
 
 instance Hashable Instance
 
+instance NFData Instance
+
 -- | Describes whether instance monitoring is enabled.
 --
 -- /See:/ 'instanceMonitoring' smart constructor.
@@ -935,6 +955,8 @@
 
 instance Hashable InstanceMonitoring
 
+instance NFData InstanceMonitoring
+
 instance ToQuery InstanceMonitoring where
         toQuery InstanceMonitoring'{..}
           = mconcat ["Enabled" =: _imEnabled]
@@ -1156,6 +1178,8 @@
 
 instance Hashable LaunchConfiguration
 
+instance NFData LaunchConfiguration
+
 -- | Describes a lifecycle hook, which tells Auto Scaling that you want to
 -- perform an action when an instance launches or terminates. When you have
 -- a lifecycle hook in place, the Auto Scaling group will either:
@@ -1292,6 +1316,8 @@
 
 instance Hashable LifecycleHook
 
+instance NFData LifecycleHook
+
 -- | Describes the state of a load balancer.
 --
 -- /See:/ 'loadBalancerState' smart constructor.
@@ -1345,6 +1371,8 @@
 
 instance Hashable LoadBalancerState
 
+instance NFData LoadBalancerState
+
 -- | Describes a metric.
 --
 -- /See:/ 'metricCollectionType' smart constructor.
@@ -1391,6 +1419,8 @@
 
 instance Hashable MetricCollectionType
 
+instance NFData MetricCollectionType
+
 -- | Describes a granularity of a metric.
 --
 -- /See:/ 'metricGranularityType' smart constructor.
@@ -1420,6 +1450,8 @@
 
 instance Hashable MetricGranularityType
 
+instance NFData MetricGranularityType
+
 -- | Describes a notification.
 --
 -- /See:/ 'notificationConfiguration' smart constructor.
@@ -1479,6 +1511,8 @@
 
 instance Hashable NotificationConfiguration
 
+instance NFData NotificationConfiguration
+
 -- | Describes a process type.
 --
 -- For more information, see
@@ -1529,6 +1563,8 @@
 
 instance Hashable ProcessType
 
+instance NFData ProcessType
+
 -- | Describes a scaling policy.
 --
 -- /See:/ 'scalingPolicy' smart constructor.
@@ -1683,6 +1719,8 @@
 
 instance Hashable ScalingPolicy
 
+instance NFData ScalingPolicy
+
 -- | /See:/ 'scalingProcessQuery' smart constructor.
 data ScalingProcessQuery = ScalingProcessQuery'
     { _spqScalingProcesses     :: !(Maybe [Text])
@@ -1732,6 +1770,8 @@
 
 instance Hashable ScalingProcessQuery
 
+instance NFData ScalingProcessQuery
+
 instance ToQuery ScalingProcessQuery where
         toQuery ScalingProcessQuery'{..}
           = mconcat
@@ -1855,6 +1895,8 @@
 
 instance Hashable ScheduledUpdateGroupAction
 
+instance NFData ScheduledUpdateGroupAction
+
 -- | Describes an adjustment based on the difference between the value of the
 -- aggregated CloudWatch metric and the breach threshold that you\'ve
 -- defined for the alarm.
@@ -1947,6 +1989,8 @@
 
 instance Hashable StepAdjustment
 
+instance NFData StepAdjustment
+
 instance ToQuery StepAdjustment where
         toQuery StepAdjustment'{..}
           = mconcat
@@ -1995,6 +2039,8 @@
 
 instance Hashable SuspendedProcess
 
+instance NFData SuspendedProcess
+
 -- | Describes a tag for an Auto Scaling group.
 --
 -- /See:/ 'tag' smart constructor.
@@ -2058,6 +2104,8 @@
 
 instance Hashable Tag
 
+instance NFData Tag
+
 instance ToQuery Tag where
         toQuery Tag'{..}
           = mconcat
@@ -2136,3 +2184,5 @@
                 <*> (x .@ "Value")
 
 instance Hashable TagDescription
+
+instance NFData TagDescription
diff --git a/gen/Network/AWS/AutoScaling/Types/Sum.hs b/gen/Network/AWS/AutoScaling/Types/Sum.hs
--- a/gen/Network/AWS/AutoScaling/Types/Sum.hs
+++ b/gen/Network/AWS/AutoScaling/Types/Sum.hs
@@ -70,6 +70,7 @@
         TerminatingWait -> "Terminating:Wait"
 
 instance Hashable     LifecycleState
+instance NFData       LifecycleState
 instance ToByteString LifecycleState
 instance ToQuery      LifecycleState
 instance ToHeader     LifecycleState
@@ -125,6 +126,7 @@
         WaitingForSpotInstanceRequestId -> "WaitingForSpotInstanceRequestId"
 
 instance Hashable     ScalingActivityStatusCode
+instance NFData       ScalingActivityStatusCode
 instance ToByteString ScalingActivityStatusCode
 instance ToQuery      ScalingActivityStatusCode
 instance ToHeader     ScalingActivityStatusCode
diff --git a/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs b/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs
--- a/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs
+++ b/gen/Network/AWS/AutoScaling/UpdateAutoScalingGroup.hs
@@ -237,6 +237,8 @@
 
 instance Hashable UpdateAutoScalingGroup
 
+instance NFData UpdateAutoScalingGroup
+
 instance ToHeaders UpdateAutoScalingGroup where
         toHeaders = const mempty
 
@@ -280,3 +282,5 @@
 updateAutoScalingGroupResponse
     :: UpdateAutoScalingGroupResponse
 updateAutoScalingGroupResponse = UpdateAutoScalingGroupResponse'
+
+instance NFData UpdateAutoScalingGroupResponse