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-gamelift.cabal b/amazonka-gamelift.cabal
--- a/amazonka-gamelift.cabal
+++ b/amazonka-gamelift.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-gamelift
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon GameLift SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -160,7 +160,7 @@
         , Network.AWS.GameLift.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-gamelift-test
@@ -180,9 +180,9 @@
         , Test.AWS.GameLift.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-gamelift == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-gamelift == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/GameLift/CreateAlias.hs b/gen/Network/AWS/GameLift/CreateAlias.hs
--- a/gen/Network/AWS/GameLift/CreateAlias.hs
+++ b/gen/Network/AWS/GameLift/CreateAlias.hs
@@ -109,6 +109,8 @@
 
 instance Hashable CreateAlias
 
+instance NFData CreateAlias
+
 instance ToHeaders CreateAlias where
         toHeaders
           = const
@@ -163,3 +165,5 @@
 -- | The response status code.
 carsResponseStatus :: Lens' CreateAliasResponse Int
 carsResponseStatus = lens _carsResponseStatus (\ s a -> s{_carsResponseStatus = a});
+
+instance NFData CreateAliasResponse
diff --git a/gen/Network/AWS/GameLift/CreateBuild.hs b/gen/Network/AWS/GameLift/CreateBuild.hs
--- a/gen/Network/AWS/GameLift/CreateBuild.hs
+++ b/gen/Network/AWS/GameLift/CreateBuild.hs
@@ -118,6 +118,8 @@
 
 instance Hashable CreateBuild
 
+instance NFData CreateBuild
+
 instance ToHeaders CreateBuild where
         toHeaders
           = const
@@ -192,3 +194,5 @@
 -- | The response status code.
 cbrsResponseStatus :: Lens' CreateBuildResponse Int
 cbrsResponseStatus = lens _cbrsResponseStatus (\ s a -> s{_cbrsResponseStatus = a});
+
+instance NFData CreateBuildResponse
diff --git a/gen/Network/AWS/GameLift/CreateFleet.hs b/gen/Network/AWS/GameLift/CreateFleet.hs
--- a/gen/Network/AWS/GameLift/CreateFleet.hs
+++ b/gen/Network/AWS/GameLift/CreateFleet.hs
@@ -214,6 +214,8 @@
 
 instance Hashable CreateFleet
 
+instance NFData CreateFleet
+
 instance ToHeaders CreateFleet where
         toHeaders
           = const
@@ -277,3 +279,5 @@
 -- | The response status code.
 cfrsResponseStatus :: Lens' CreateFleetResponse Int
 cfrsResponseStatus = lens _cfrsResponseStatus (\ s a -> s{_cfrsResponseStatus = a});
+
+instance NFData CreateFleetResponse
diff --git a/gen/Network/AWS/GameLift/CreateGameSession.hs b/gen/Network/AWS/GameLift/CreateGameSession.hs
--- a/gen/Network/AWS/GameLift/CreateGameSession.hs
+++ b/gen/Network/AWS/GameLift/CreateGameSession.hs
@@ -130,6 +130,8 @@
 
 instance Hashable CreateGameSession
 
+instance NFData CreateGameSession
+
 instance ToHeaders CreateGameSession where
         toHeaders
           = const
@@ -188,3 +190,5 @@
 -- | The response status code.
 cgsrsResponseStatus :: Lens' CreateGameSessionResponse Int
 cgsrsResponseStatus = lens _cgsrsResponseStatus (\ s a -> s{_cgsrsResponseStatus = a});
+
+instance NFData CreateGameSessionResponse
diff --git a/gen/Network/AWS/GameLift/CreatePlayerSession.hs b/gen/Network/AWS/GameLift/CreatePlayerSession.hs
--- a/gen/Network/AWS/GameLift/CreatePlayerSession.hs
+++ b/gen/Network/AWS/GameLift/CreatePlayerSession.hs
@@ -96,6 +96,8 @@
 
 instance Hashable CreatePlayerSession
 
+instance NFData CreatePlayerSession
+
 instance ToHeaders CreatePlayerSession where
         toHeaders
           = const
@@ -149,3 +151,5 @@
 -- | The response status code.
 cpsrsResponseStatus :: Lens' CreatePlayerSessionResponse Int
 cpsrsResponseStatus = lens _cpsrsResponseStatus (\ s a -> s{_cpsrsResponseStatus = a});
+
+instance NFData CreatePlayerSessionResponse
diff --git a/gen/Network/AWS/GameLift/CreatePlayerSessions.hs b/gen/Network/AWS/GameLift/CreatePlayerSessions.hs
--- a/gen/Network/AWS/GameLift/CreatePlayerSessions.hs
+++ b/gen/Network/AWS/GameLift/CreatePlayerSessions.hs
@@ -98,6 +98,8 @@
 
 instance Hashable CreatePlayerSessions
 
+instance NFData CreatePlayerSessions
+
 instance ToHeaders CreatePlayerSessions where
         toHeaders
           = const
@@ -151,3 +153,5 @@
 -- | The response status code.
 crsResponseStatus :: Lens' CreatePlayerSessionsResponse Int
 crsResponseStatus = lens _crsResponseStatus (\ s a -> s{_crsResponseStatus = a});
+
+instance NFData CreatePlayerSessionsResponse
diff --git a/gen/Network/AWS/GameLift/DeleteAlias.hs b/gen/Network/AWS/GameLift/DeleteAlias.hs
--- a/gen/Network/AWS/GameLift/DeleteAlias.hs
+++ b/gen/Network/AWS/GameLift/DeleteAlias.hs
@@ -74,6 +74,8 @@
 
 instance Hashable DeleteAlias
 
+instance NFData DeleteAlias
+
 instance ToHeaders DeleteAlias where
         toHeaders
           = const
@@ -103,3 +105,5 @@
 deleteAliasResponse
     :: DeleteAliasResponse
 deleteAliasResponse = DeleteAliasResponse'
+
+instance NFData DeleteAliasResponse
diff --git a/gen/Network/AWS/GameLift/DeleteBuild.hs b/gen/Network/AWS/GameLift/DeleteBuild.hs
--- a/gen/Network/AWS/GameLift/DeleteBuild.hs
+++ b/gen/Network/AWS/GameLift/DeleteBuild.hs
@@ -75,6 +75,8 @@
 
 instance Hashable DeleteBuild
 
+instance NFData DeleteBuild
+
 instance ToHeaders DeleteBuild where
         toHeaders
           = const
@@ -104,3 +106,5 @@
 deleteBuildResponse
     :: DeleteBuildResponse
 deleteBuildResponse = DeleteBuildResponse'
+
+instance NFData DeleteBuildResponse
diff --git a/gen/Network/AWS/GameLift/DeleteFleet.hs b/gen/Network/AWS/GameLift/DeleteFleet.hs
--- a/gen/Network/AWS/GameLift/DeleteFleet.hs
+++ b/gen/Network/AWS/GameLift/DeleteFleet.hs
@@ -74,6 +74,8 @@
 
 instance Hashable DeleteFleet
 
+instance NFData DeleteFleet
+
 instance ToHeaders DeleteFleet where
         toHeaders
           = const
@@ -103,3 +105,5 @@
 deleteFleetResponse
     :: DeleteFleetResponse
 deleteFleetResponse = DeleteFleetResponse'
+
+instance NFData DeleteFleetResponse
diff --git a/gen/Network/AWS/GameLift/DeleteScalingPolicy.hs b/gen/Network/AWS/GameLift/DeleteScalingPolicy.hs
--- a/gen/Network/AWS/GameLift/DeleteScalingPolicy.hs
+++ b/gen/Network/AWS/GameLift/DeleteScalingPolicy.hs
@@ -85,6 +85,8 @@
 
 instance Hashable DeleteScalingPolicy
 
+instance NFData DeleteScalingPolicy
+
 instance ToHeaders DeleteScalingPolicy where
         toHeaders
           = const
@@ -117,3 +119,5 @@
 deleteScalingPolicyResponse
     :: DeleteScalingPolicyResponse
 deleteScalingPolicyResponse = DeleteScalingPolicyResponse'
+
+instance NFData DeleteScalingPolicyResponse
diff --git a/gen/Network/AWS/GameLift/DescribeAlias.hs b/gen/Network/AWS/GameLift/DescribeAlias.hs
--- a/gen/Network/AWS/GameLift/DescribeAlias.hs
+++ b/gen/Network/AWS/GameLift/DescribeAlias.hs
@@ -79,6 +79,8 @@
 
 instance Hashable DescribeAlias
 
+instance NFData DescribeAlias
+
 instance ToHeaders DescribeAlias where
         toHeaders
           = const
@@ -129,3 +131,5 @@
 -- | The response status code.
 darsResponseStatus :: Lens' DescribeAliasResponse Int
 darsResponseStatus = lens _darsResponseStatus (\ s a -> s{_darsResponseStatus = a});
+
+instance NFData DescribeAliasResponse
diff --git a/gen/Network/AWS/GameLift/DescribeBuild.hs b/gen/Network/AWS/GameLift/DescribeBuild.hs
--- a/gen/Network/AWS/GameLift/DescribeBuild.hs
+++ b/gen/Network/AWS/GameLift/DescribeBuild.hs
@@ -79,6 +79,8 @@
 
 instance Hashable DescribeBuild
 
+instance NFData DescribeBuild
+
 instance ToHeaders DescribeBuild where
         toHeaders
           = const
@@ -129,3 +131,5 @@
 -- | The response status code.
 dbrsResponseStatus :: Lens' DescribeBuildResponse Int
 dbrsResponseStatus = lens _dbrsResponseStatus (\ s a -> s{_dbrsResponseStatus = a});
+
+instance NFData DescribeBuildResponse
diff --git a/gen/Network/AWS/GameLift/DescribeEC2InstanceLimits.hs b/gen/Network/AWS/GameLift/DescribeEC2InstanceLimits.hs
--- a/gen/Network/AWS/GameLift/DescribeEC2InstanceLimits.hs
+++ b/gen/Network/AWS/GameLift/DescribeEC2InstanceLimits.hs
@@ -90,6 +90,8 @@
 
 instance Hashable DescribeEC2InstanceLimits
 
+instance NFData DescribeEC2InstanceLimits
+
 instance ToHeaders DescribeEC2InstanceLimits where
         toHeaders
           = const
@@ -143,3 +145,5 @@
 -- | The response status code.
 deilrsResponseStatus :: Lens' DescribeEC2InstanceLimitsResponse Int
 deilrsResponseStatus = lens _deilrsResponseStatus (\ s a -> s{_deilrsResponseStatus = a});
+
+instance NFData DescribeEC2InstanceLimitsResponse
diff --git a/gen/Network/AWS/GameLift/DescribeFleetAttributes.hs b/gen/Network/AWS/GameLift/DescribeFleetAttributes.hs
--- a/gen/Network/AWS/GameLift/DescribeFleetAttributes.hs
+++ b/gen/Network/AWS/GameLift/DescribeFleetAttributes.hs
@@ -116,6 +116,8 @@
 
 instance Hashable DescribeFleetAttributes
 
+instance NFData DescribeFleetAttributes
+
 instance ToHeaders DescribeFleetAttributes where
         toHeaders
           = const
@@ -185,3 +187,5 @@
 -- | The response status code.
 dfarsResponseStatus :: Lens' DescribeFleetAttributesResponse Int
 dfarsResponseStatus = lens _dfarsResponseStatus (\ s a -> s{_dfarsResponseStatus = a});
+
+instance NFData DescribeFleetAttributesResponse
diff --git a/gen/Network/AWS/GameLift/DescribeFleetCapacity.hs b/gen/Network/AWS/GameLift/DescribeFleetCapacity.hs
--- a/gen/Network/AWS/GameLift/DescribeFleetCapacity.hs
+++ b/gen/Network/AWS/GameLift/DescribeFleetCapacity.hs
@@ -117,6 +117,8 @@
 
 instance Hashable DescribeFleetCapacity
 
+instance NFData DescribeFleetCapacity
+
 instance ToHeaders DescribeFleetCapacity where
         toHeaders
           = const
@@ -187,3 +189,5 @@
 -- | The response status code.
 dfcrsResponseStatus :: Lens' DescribeFleetCapacityResponse Int
 dfcrsResponseStatus = lens _dfcrsResponseStatus (\ s a -> s{_dfcrsResponseStatus = a});
+
+instance NFData DescribeFleetCapacityResponse
diff --git a/gen/Network/AWS/GameLift/DescribeFleetEvents.hs b/gen/Network/AWS/GameLift/DescribeFleetEvents.hs
--- a/gen/Network/AWS/GameLift/DescribeFleetEvents.hs
+++ b/gen/Network/AWS/GameLift/DescribeFleetEvents.hs
@@ -128,6 +128,8 @@
 
 instance Hashable DescribeFleetEvents
 
+instance NFData DescribeFleetEvents
+
 instance ToHeaders DescribeFleetEvents where
         toHeaders
           = const
@@ -199,3 +201,5 @@
 -- | The response status code.
 dfersResponseStatus :: Lens' DescribeFleetEventsResponse Int
 dfersResponseStatus = lens _dfersResponseStatus (\ s a -> s{_dfersResponseStatus = a});
+
+instance NFData DescribeFleetEventsResponse
diff --git a/gen/Network/AWS/GameLift/DescribeFleetPortSettings.hs b/gen/Network/AWS/GameLift/DescribeFleetPortSettings.hs
--- a/gen/Network/AWS/GameLift/DescribeFleetPortSettings.hs
+++ b/gen/Network/AWS/GameLift/DescribeFleetPortSettings.hs
@@ -83,6 +83,8 @@
 
 instance Hashable DescribeFleetPortSettings
 
+instance NFData DescribeFleetPortSettings
+
 instance ToHeaders DescribeFleetPortSettings where
         toHeaders
           = const
@@ -134,3 +136,5 @@
 -- | The response status code.
 dfpsrsResponseStatus :: Lens' DescribeFleetPortSettingsResponse Int
 dfpsrsResponseStatus = lens _dfpsrsResponseStatus (\ s a -> s{_dfpsrsResponseStatus = a});
+
+instance NFData DescribeFleetPortSettingsResponse
diff --git a/gen/Network/AWS/GameLift/DescribeFleetUtilization.hs b/gen/Network/AWS/GameLift/DescribeFleetUtilization.hs
--- a/gen/Network/AWS/GameLift/DescribeFleetUtilization.hs
+++ b/gen/Network/AWS/GameLift/DescribeFleetUtilization.hs
@@ -116,6 +116,8 @@
 
 instance Hashable DescribeFleetUtilization
 
+instance NFData DescribeFleetUtilization
+
 instance ToHeaders DescribeFleetUtilization where
         toHeaders
           = const
@@ -185,3 +187,5 @@
 -- | The response status code.
 dfursResponseStatus :: Lens' DescribeFleetUtilizationResponse Int
 dfursResponseStatus = lens _dfursResponseStatus (\ s a -> s{_dfursResponseStatus = a});
+
+instance NFData DescribeFleetUtilizationResponse
diff --git a/gen/Network/AWS/GameLift/DescribeGameSessionDetails.hs b/gen/Network/AWS/GameLift/DescribeGameSessionDetails.hs
--- a/gen/Network/AWS/GameLift/DescribeGameSessionDetails.hs
+++ b/gen/Network/AWS/GameLift/DescribeGameSessionDetails.hs
@@ -143,6 +143,8 @@
 
 instance Hashable DescribeGameSessionDetails
 
+instance NFData DescribeGameSessionDetails
+
 instance ToHeaders DescribeGameSessionDetails where
         toHeaders
           = const
@@ -217,3 +219,5 @@
 -- | The response status code.
 dgsdrsResponseStatus :: Lens' DescribeGameSessionDetailsResponse Int
 dgsdrsResponseStatus = lens _dgsdrsResponseStatus (\ s a -> s{_dgsdrsResponseStatus = a});
+
+instance NFData DescribeGameSessionDetailsResponse
diff --git a/gen/Network/AWS/GameLift/DescribeGameSessions.hs b/gen/Network/AWS/GameLift/DescribeGameSessions.hs
--- a/gen/Network/AWS/GameLift/DescribeGameSessions.hs
+++ b/gen/Network/AWS/GameLift/DescribeGameSessions.hs
@@ -143,6 +143,8 @@
 
 instance Hashable DescribeGameSessions
 
+instance NFData DescribeGameSessions
+
 instance ToHeaders DescribeGameSessions where
         toHeaders
           = const
@@ -215,3 +217,5 @@
 -- | The response status code.
 dgsrsResponseStatus :: Lens' DescribeGameSessionsResponse Int
 dgsrsResponseStatus = lens _dgsrsResponseStatus (\ s a -> s{_dgsrsResponseStatus = a});
+
+instance NFData DescribeGameSessionsResponse
diff --git a/gen/Network/AWS/GameLift/DescribePlayerSessions.hs b/gen/Network/AWS/GameLift/DescribePlayerSessions.hs
--- a/gen/Network/AWS/GameLift/DescribePlayerSessions.hs
+++ b/gen/Network/AWS/GameLift/DescribePlayerSessions.hs
@@ -153,6 +153,8 @@
 
 instance Hashable DescribePlayerSessions
 
+instance NFData DescribePlayerSessions
+
 instance ToHeaders DescribePlayerSessions where
         toHeaders
           = const
@@ -226,3 +228,5 @@
 -- | The response status code.
 dpsrsResponseStatus :: Lens' DescribePlayerSessionsResponse Int
 dpsrsResponseStatus = lens _dpsrsResponseStatus (\ s a -> s{_dpsrsResponseStatus = a});
+
+instance NFData DescribePlayerSessionsResponse
diff --git a/gen/Network/AWS/GameLift/DescribeScalingPolicies.hs b/gen/Network/AWS/GameLift/DescribeScalingPolicies.hs
--- a/gen/Network/AWS/GameLift/DescribeScalingPolicies.hs
+++ b/gen/Network/AWS/GameLift/DescribeScalingPolicies.hs
@@ -130,6 +130,8 @@
 
 instance Hashable DescribeScalingPolicies
 
+instance NFData DescribeScalingPolicies
+
 instance ToHeaders DescribeScalingPolicies where
         toHeaders
           = const
@@ -200,3 +202,5 @@
 -- | The response status code.
 dsprsResponseStatus :: Lens' DescribeScalingPoliciesResponse Int
 dsprsResponseStatus = lens _dsprsResponseStatus (\ s a -> s{_dsprsResponseStatus = a});
+
+instance NFData DescribeScalingPoliciesResponse
diff --git a/gen/Network/AWS/GameLift/GetGameSessionLogURL.hs b/gen/Network/AWS/GameLift/GetGameSessionLogURL.hs
--- a/gen/Network/AWS/GameLift/GetGameSessionLogURL.hs
+++ b/gen/Network/AWS/GameLift/GetGameSessionLogURL.hs
@@ -87,6 +87,8 @@
 
 instance Hashable GetGameSessionLogURL
 
+instance NFData GetGameSessionLogURL
+
 instance ToHeaders GetGameSessionLogURL where
         toHeaders
           = const
@@ -139,3 +141,5 @@
 -- | The response status code.
 ggslursResponseStatus :: Lens' GetGameSessionLogURLResponse Int
 ggslursResponseStatus = lens _ggslursResponseStatus (\ s a -> s{_ggslursResponseStatus = a});
+
+instance NFData GetGameSessionLogURLResponse
diff --git a/gen/Network/AWS/GameLift/ListAliases.hs b/gen/Network/AWS/GameLift/ListAliases.hs
--- a/gen/Network/AWS/GameLift/ListAliases.hs
+++ b/gen/Network/AWS/GameLift/ListAliases.hs
@@ -122,6 +122,8 @@
 
 instance Hashable ListAliases
 
+instance NFData ListAliases
+
 instance ToHeaders ListAliases where
         toHeaders
           = const
@@ -191,3 +193,5 @@
 -- | The response status code.
 larsResponseStatus :: Lens' ListAliasesResponse Int
 larsResponseStatus = lens _larsResponseStatus (\ s a -> s{_larsResponseStatus = a});
+
+instance NFData ListAliasesResponse
diff --git a/gen/Network/AWS/GameLift/ListBuilds.hs b/gen/Network/AWS/GameLift/ListBuilds.hs
--- a/gen/Network/AWS/GameLift/ListBuilds.hs
+++ b/gen/Network/AWS/GameLift/ListBuilds.hs
@@ -114,6 +114,8 @@
 
 instance Hashable ListBuilds
 
+instance NFData ListBuilds
+
 instance ToHeaders ListBuilds where
         toHeaders
           = const
@@ -182,3 +184,5 @@
 -- | The response status code.
 lbrsResponseStatus :: Lens' ListBuildsResponse Int
 lbrsResponseStatus = lens _lbrsResponseStatus (\ s a -> s{_lbrsResponseStatus = a});
+
+instance NFData ListBuildsResponse
diff --git a/gen/Network/AWS/GameLift/ListFleets.hs b/gen/Network/AWS/GameLift/ListFleets.hs
--- a/gen/Network/AWS/GameLift/ListFleets.hs
+++ b/gen/Network/AWS/GameLift/ListFleets.hs
@@ -105,6 +105,8 @@
 
 instance Hashable ListFleets
 
+instance NFData ListFleets
+
 instance ToHeaders ListFleets where
         toHeaders
           = const
@@ -176,3 +178,5 @@
 -- | The response status code.
 lfrsResponseStatus :: Lens' ListFleetsResponse Int
 lfrsResponseStatus = lens _lfrsResponseStatus (\ s a -> s{_lfrsResponseStatus = a});
+
+instance NFData ListFleetsResponse
diff --git a/gen/Network/AWS/GameLift/PutScalingPolicy.hs b/gen/Network/AWS/GameLift/PutScalingPolicy.hs
--- a/gen/Network/AWS/GameLift/PutScalingPolicy.hs
+++ b/gen/Network/AWS/GameLift/PutScalingPolicy.hs
@@ -203,6 +203,8 @@
 
 instance Hashable PutScalingPolicy
 
+instance NFData PutScalingPolicy
+
 instance ToHeaders PutScalingPolicy where
         toHeaders
           = const
@@ -266,3 +268,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/GameLift/RequestUploadCredentials.hs b/gen/Network/AWS/GameLift/RequestUploadCredentials.hs
--- a/gen/Network/AWS/GameLift/RequestUploadCredentials.hs
+++ b/gen/Network/AWS/GameLift/RequestUploadCredentials.hs
@@ -93,6 +93,8 @@
 
 instance Hashable RequestUploadCredentials
 
+instance NFData RequestUploadCredentials
+
 instance ToHeaders RequestUploadCredentials where
         toHeaders
           = const
@@ -155,3 +157,5 @@
 -- | The response status code.
 rucrsResponseStatus :: Lens' RequestUploadCredentialsResponse Int
 rucrsResponseStatus = lens _rucrsResponseStatus (\ s a -> s{_rucrsResponseStatus = a});
+
+instance NFData RequestUploadCredentialsResponse
diff --git a/gen/Network/AWS/GameLift/ResolveAlias.hs b/gen/Network/AWS/GameLift/ResolveAlias.hs
--- a/gen/Network/AWS/GameLift/ResolveAlias.hs
+++ b/gen/Network/AWS/GameLift/ResolveAlias.hs
@@ -77,6 +77,8 @@
 
 instance Hashable ResolveAlias
 
+instance NFData ResolveAlias
+
 instance ToHeaders ResolveAlias where
         toHeaders
           = const
@@ -127,3 +129,5 @@
 -- | The response status code.
 rarsResponseStatus :: Lens' ResolveAliasResponse Int
 rarsResponseStatus = lens _rarsResponseStatus (\ s a -> s{_rarsResponseStatus = a});
+
+instance NFData ResolveAliasResponse
diff --git a/gen/Network/AWS/GameLift/Types.hs b/gen/Network/AWS/GameLift/Types.hs
--- a/gen/Network/AWS/GameLift/Types.hs
+++ b/gen/Network/AWS/GameLift/Types.hs
@@ -262,6 +262,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/GameLift/Types/Product.hs b/gen/Network/AWS/GameLift/Types/Product.hs
--- a/gen/Network/AWS/GameLift/Types/Product.hs
+++ b/gen/Network/AWS/GameLift/Types/Product.hs
@@ -73,6 +73,8 @@
 
 instance Hashable AWSCredentials
 
+instance NFData AWSCredentials
+
 -- | Properties describing a fleet alias.
 --
 -- /See:/ 'alias' smart constructor.
@@ -153,6 +155,8 @@
 
 instance Hashable Alias
 
+instance NFData Alias
+
 -- | Properties describing a game build.
 --
 -- /See:/ 'build' smart constructor.
@@ -243,6 +247,8 @@
 
 instance Hashable Build
 
+instance NFData Build
+
 -- | Current status of fleet capacity. The number of active instances should
 -- match or be in the process of matching the number of desired instances.
 -- Pending and terminating counts are non-zero only if fleet capacity is
@@ -334,6 +340,8 @@
 
 instance Hashable EC2InstanceCounts
 
+instance NFData EC2InstanceCounts
+
 -- | Maximum number of instances allowed based on the Amazon Elastic Compute
 -- Cloud (Amazon EC2) instance type. Instance limits can be retrieved by
 -- calling < DescribeEC2InstanceLimits>.
@@ -391,6 +399,8 @@
 
 instance Hashable EC2InstanceLimit
 
+instance NFData EC2InstanceLimit
+
 -- | Log entry describing an event involving an Amazon GameLift resource
 -- (such as a fleet).
 --
@@ -460,6 +470,8 @@
 
 instance Hashable Event
 
+instance NFData Event
+
 -- | General properties describing a fleet.
 --
 -- /See:/ 'fleetAttributes' smart constructor.
@@ -609,6 +621,8 @@
 
 instance Hashable FleetAttributes
 
+instance NFData FleetAttributes
+
 -- | Information about the fleet\'s capacity. Fleet capacity is measured in
 -- EC2 instances. By default, new fleets have a capacity of one instance,
 -- but can be updated as needed. The maximum number of instances for a
@@ -665,6 +679,8 @@
 
 instance Hashable FleetCapacity
 
+instance NFData FleetCapacity
+
 -- | Current status of fleet utilization, including the number of game and
 -- player sessions being hosted.
 --
@@ -728,6 +744,8 @@
 
 instance Hashable FleetUtilization
 
+instance NFData FleetUtilization
+
 -- | Set of key-value pairs containing information your game server requires
 -- to set up sessions. This object allows you to pass in any set of data
 -- needed for your game. For more information, see the
@@ -772,6 +790,8 @@
 
 instance Hashable GameProperty
 
+instance NFData GameProperty
+
 instance ToJSON GameProperty where
         toJSON GameProperty'{..}
           = object
@@ -904,6 +924,8 @@
 
 instance Hashable GameSession
 
+instance NFData GameSession
+
 -- | A game session\'s properties and the protection policy currently in
 -- force.
 --
@@ -950,6 +972,8 @@
 
 instance Hashable GameSessionDetail
 
+instance NFData GameSessionDetail
+
 -- | IP addresses and port settings used to limit access by incoming traffic
 -- (players) to a fleet. Permissions specify a range of IP addresses and
 -- port settings that must be used to gain access to a game server on a
@@ -1019,6 +1043,8 @@
 
 instance Hashable IPPermission
 
+instance NFData IPPermission
+
 instance ToJSON IPPermission where
         toJSON IPPermission'{..}
           = object
@@ -1137,6 +1163,8 @@
 
 instance Hashable PlayerSession
 
+instance NFData PlayerSession
+
 -- | Routing configuration for a fleet alias.
 --
 -- /See:/ 'routingStrategy' smart constructor.
@@ -1193,6 +1221,8 @@
 
 instance Hashable RoutingStrategy
 
+instance NFData RoutingStrategy
+
 instance ToJSON RoutingStrategy where
         toJSON RoutingStrategy'{..}
           = object
@@ -1254,6 +1284,8 @@
 
 instance Hashable S3Location
 
+instance NFData S3Location
+
 instance ToJSON S3Location where
         toJSON S3Location'{..}
           = object
@@ -1407,3 +1439,5 @@
                      <*> (x .:? "FleetId"))
 
 instance Hashable ScalingPolicy
+
+instance NFData ScalingPolicy
diff --git a/gen/Network/AWS/GameLift/Types/Sum.hs b/gen/Network/AWS/GameLift/Types/Sum.hs
--- a/gen/Network/AWS/GameLift/Types/Sum.hs
+++ b/gen/Network/AWS/GameLift/Types/Sum.hs
@@ -40,6 +40,7 @@
         Ready -> "READY"
 
 instance Hashable     BuildStatus
+instance NFData       BuildStatus
 instance ToByteString BuildStatus
 instance ToQuery      BuildStatus
 instance ToHeader     BuildStatus
@@ -74,6 +75,7 @@
         LessThanThreshold -> "LessThanThreshold"
 
 instance Hashable     ComparisonOperatorType
+instance NFData       ComparisonOperatorType
 instance ToByteString ComparisonOperatorType
 instance ToQuery      ComparisonOperatorType
 instance ToHeader     ComparisonOperatorType
@@ -180,6 +182,7 @@
         T2_Small -> "t2.small"
 
 instance Hashable     EC2InstanceType
+instance NFData       EC2InstanceType
 instance ToByteString EC2InstanceType
 instance ToQuery      EC2InstanceType
 instance ToHeader     EC2InstanceType
@@ -256,6 +259,7 @@
         GenericEvent -> "GENERIC_EVENT"
 
 instance Hashable     EventCode
+instance NFData       EventCode
 instance ToByteString EventCode
 instance ToQuery      EventCode
 instance ToHeader     EventCode
@@ -302,6 +306,7 @@
         FSValidating -> "VALIDATING"
 
 instance Hashable     FleetStatus
+instance NFData       FleetStatus
 instance ToByteString FleetStatus
 instance ToQuery      FleetStatus
 instance ToHeader     FleetStatus
@@ -333,6 +338,7 @@
         GSSTerminating -> "TERMINATING"
 
 instance Hashable     GameSessionStatus
+instance NFData       GameSessionStatus
 instance ToByteString GameSessionStatus
 instance ToQuery      GameSessionStatus
 instance ToHeader     GameSessionStatus
@@ -358,6 +364,7 @@
         Udp -> "UDP"
 
 instance Hashable     IPProtocol
+instance NFData       IPProtocol
 instance ToByteString IPProtocol
 instance ToQuery      IPProtocol
 instance ToHeader     IPProtocol
@@ -398,6 +405,7 @@
         IdleInstances -> "IdleInstances"
 
 instance Hashable     MetricName
+instance NFData       MetricName
 instance ToByteString MetricName
 instance ToQuery      MetricName
 instance ToHeader     MetricName
@@ -426,6 +434,7 @@
         DenyAll -> "DENY_ALL"
 
 instance Hashable     PlayerSessionCreationPolicy
+instance NFData       PlayerSessionCreationPolicy
 instance ToByteString PlayerSessionCreationPolicy
 instance ToQuery      PlayerSessionCreationPolicy
 instance ToHeader     PlayerSessionCreationPolicy
@@ -460,6 +469,7 @@
         PSSTimedout -> "TIMEDOUT"
 
 instance Hashable     PlayerSessionStatus
+instance NFData       PlayerSessionStatus
 instance ToByteString PlayerSessionStatus
 instance ToQuery      PlayerSessionStatus
 instance ToHeader     PlayerSessionStatus
@@ -485,6 +495,7 @@
         NoProtection -> "NoProtection"
 
 instance Hashable     ProtectionPolicy
+instance NFData       ProtectionPolicy
 instance ToByteString ProtectionPolicy
 instance ToQuery      ProtectionPolicy
 instance ToHeader     ProtectionPolicy
@@ -513,6 +524,7 @@
         Terminal -> "TERMINAL"
 
 instance Hashable     RoutingStrategyType
+instance NFData       RoutingStrategyType
 instance ToByteString RoutingStrategyType
 instance ToQuery      RoutingStrategyType
 instance ToHeader     RoutingStrategyType
@@ -544,6 +556,7 @@
         PercentChangeInCapacity -> "PercentChangeInCapacity"
 
 instance Hashable     ScalingAdjustmentType
+instance NFData       ScalingAdjustmentType
 instance ToByteString ScalingAdjustmentType
 instance ToQuery      ScalingAdjustmentType
 instance ToHeader     ScalingAdjustmentType
@@ -587,6 +600,7 @@
         Updating -> "UPDATING"
 
 instance Hashable     ScalingStatusType
+instance NFData       ScalingStatusType
 instance ToByteString ScalingStatusType
 instance ToQuery      ScalingStatusType
 instance ToHeader     ScalingStatusType
diff --git a/gen/Network/AWS/GameLift/UpdateAlias.hs b/gen/Network/AWS/GameLift/UpdateAlias.hs
--- a/gen/Network/AWS/GameLift/UpdateAlias.hs
+++ b/gen/Network/AWS/GameLift/UpdateAlias.hs
@@ -109,6 +109,8 @@
 
 instance Hashable UpdateAlias
 
+instance NFData UpdateAlias
+
 instance ToHeaders UpdateAlias where
         toHeaders
           = const
@@ -164,3 +166,5 @@
 -- | The response status code.
 uarsResponseStatus :: Lens' UpdateAliasResponse Int
 uarsResponseStatus = lens _uarsResponseStatus (\ s a -> s{_uarsResponseStatus = a});
+
+instance NFData UpdateAliasResponse
diff --git a/gen/Network/AWS/GameLift/UpdateBuild.hs b/gen/Network/AWS/GameLift/UpdateBuild.hs
--- a/gen/Network/AWS/GameLift/UpdateBuild.hs
+++ b/gen/Network/AWS/GameLift/UpdateBuild.hs
@@ -100,6 +100,8 @@
 
 instance Hashable UpdateBuild
 
+instance NFData UpdateBuild
+
 instance ToHeaders UpdateBuild where
         toHeaders
           = const
@@ -154,3 +156,5 @@
 -- | The response status code.
 ubrsResponseStatus :: Lens' UpdateBuildResponse Int
 ubrsResponseStatus = lens _ubrsResponseStatus (\ s a -> s{_ubrsResponseStatus = a});
+
+instance NFData UpdateBuildResponse
diff --git a/gen/Network/AWS/GameLift/UpdateFleetAttributes.hs b/gen/Network/AWS/GameLift/UpdateFleetAttributes.hs
--- a/gen/Network/AWS/GameLift/UpdateFleetAttributes.hs
+++ b/gen/Network/AWS/GameLift/UpdateFleetAttributes.hs
@@ -117,6 +117,8 @@
 
 instance Hashable UpdateFleetAttributes
 
+instance NFData UpdateFleetAttributes
+
 instance ToHeaders UpdateFleetAttributes where
         toHeaders
           = const
@@ -173,3 +175,5 @@
 -- | The response status code.
 ufarsResponseStatus :: Lens' UpdateFleetAttributesResponse Int
 ufarsResponseStatus = lens _ufarsResponseStatus (\ s a -> s{_ufarsResponseStatus = a});
+
+instance NFData UpdateFleetAttributesResponse
diff --git a/gen/Network/AWS/GameLift/UpdateFleetCapacity.hs b/gen/Network/AWS/GameLift/UpdateFleetCapacity.hs
--- a/gen/Network/AWS/GameLift/UpdateFleetCapacity.hs
+++ b/gen/Network/AWS/GameLift/UpdateFleetCapacity.hs
@@ -122,6 +122,8 @@
 
 instance Hashable UpdateFleetCapacity
 
+instance NFData UpdateFleetCapacity
+
 instance ToHeaders UpdateFleetCapacity where
         toHeaders
           = const
@@ -177,3 +179,5 @@
 -- | The response status code.
 ufcrsResponseStatus :: Lens' UpdateFleetCapacityResponse Int
 ufcrsResponseStatus = lens _ufcrsResponseStatus (\ s a -> s{_ufcrsResponseStatus = a});
+
+instance NFData UpdateFleetCapacityResponse
diff --git a/gen/Network/AWS/GameLift/UpdateFleetPortSettings.hs b/gen/Network/AWS/GameLift/UpdateFleetPortSettings.hs
--- a/gen/Network/AWS/GameLift/UpdateFleetPortSettings.hs
+++ b/gen/Network/AWS/GameLift/UpdateFleetPortSettings.hs
@@ -101,6 +101,8 @@
 
 instance Hashable UpdateFleetPortSettings
 
+instance NFData UpdateFleetPortSettings
+
 instance ToHeaders UpdateFleetPortSettings where
         toHeaders
           = const
@@ -157,3 +159,5 @@
 -- | The response status code.
 ufpsrsResponseStatus :: Lens' UpdateFleetPortSettingsResponse Int
 ufpsrsResponseStatus = lens _ufpsrsResponseStatus (\ s a -> s{_ufpsrsResponseStatus = a});
+
+instance NFData UpdateFleetPortSettingsResponse
diff --git a/gen/Network/AWS/GameLift/UpdateGameSession.hs b/gen/Network/AWS/GameLift/UpdateGameSession.hs
--- a/gen/Network/AWS/GameLift/UpdateGameSession.hs
+++ b/gen/Network/AWS/GameLift/UpdateGameSession.hs
@@ -127,6 +127,8 @@
 
 instance Hashable UpdateGameSession
 
+instance NFData UpdateGameSession
+
 instance ToHeaders UpdateGameSession where
         toHeaders
           = const
@@ -185,3 +187,5 @@
 -- | The response status code.
 ugsrsResponseStatus :: Lens' UpdateGameSessionResponse Int
 ugsrsResponseStatus = lens _ugsrsResponseStatus (\ s a -> s{_ugsrsResponseStatus = a});
+
+instance NFData UpdateGameSessionResponse