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-cloudfront.cabal b/amazonka-cloudfront.cabal
--- a/amazonka-cloudfront.cabal
+++ b/amazonka-cloudfront.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-cloudfront
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon CloudFront SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -81,7 +81,7 @@
         , Network.AWS.CloudFront.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-cloudfront-test
@@ -101,9 +101,9 @@
         , Test.AWS.CloudFront.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-cloudfront == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-cloudfront == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/CloudFront/CreateCloudFrontOriginAccessIdentity.hs b/gen/Network/AWS/CloudFront/CreateCloudFrontOriginAccessIdentity.hs
--- a/gen/Network/AWS/CloudFront/CreateCloudFrontOriginAccessIdentity.hs
+++ b/gen/Network/AWS/CloudFront/CreateCloudFrontOriginAccessIdentity.hs
@@ -84,6 +84,8 @@
 instance Hashable
          CreateCloudFrontOriginAccessIdentity
 
+instance NFData CreateCloudFrontOriginAccessIdentity
+
 instance ToElement
          CreateCloudFrontOriginAccessIdentity where
         toElement
@@ -155,3 +157,6 @@
 -- | The response status code.
 ccfoairsResponseStatus :: Lens' CreateCloudFrontOriginAccessIdentityResponse Int
 ccfoairsResponseStatus = lens _ccfoairsResponseStatus (\ s a -> s{_ccfoairsResponseStatus = a});
+
+instance NFData
+         CreateCloudFrontOriginAccessIdentityResponse
diff --git a/gen/Network/AWS/CloudFront/CreateDistribution.hs b/gen/Network/AWS/CloudFront/CreateDistribution.hs
--- a/gen/Network/AWS/CloudFront/CreateDistribution.hs
+++ b/gen/Network/AWS/CloudFront/CreateDistribution.hs
@@ -82,6 +82,8 @@
 
 instance Hashable CreateDistribution
 
+instance NFData CreateDistribution
+
 instance ToElement CreateDistribution where
         toElement
           = mkElement
@@ -147,3 +149,5 @@
 -- | The response status code.
 cdrsResponseStatus :: Lens' CreateDistributionResponse Int
 cdrsResponseStatus = lens _cdrsResponseStatus (\ s a -> s{_cdrsResponseStatus = a});
+
+instance NFData CreateDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/CreateInvalidation.hs b/gen/Network/AWS/CloudFront/CreateInvalidation.hs
--- a/gen/Network/AWS/CloudFront/CreateInvalidation.hs
+++ b/gen/Network/AWS/CloudFront/CreateInvalidation.hs
@@ -90,6 +90,8 @@
 
 instance Hashable CreateInvalidation
 
+instance NFData CreateInvalidation
+
 instance ToElement CreateInvalidation where
         toElement
           = mkElement
@@ -149,3 +151,5 @@
 -- | The response status code.
 cirsResponseStatus :: Lens' CreateInvalidationResponse Int
 cirsResponseStatus = lens _cirsResponseStatus (\ s a -> s{_cirsResponseStatus = a});
+
+instance NFData CreateInvalidationResponse
diff --git a/gen/Network/AWS/CloudFront/CreateStreamingDistribution.hs b/gen/Network/AWS/CloudFront/CreateStreamingDistribution.hs
--- a/gen/Network/AWS/CloudFront/CreateStreamingDistribution.hs
+++ b/gen/Network/AWS/CloudFront/CreateStreamingDistribution.hs
@@ -82,6 +82,8 @@
 
 instance Hashable CreateStreamingDistribution
 
+instance NFData CreateStreamingDistribution
+
 instance ToElement CreateStreamingDistribution where
         toElement
           = mkElement
@@ -147,3 +149,5 @@
 -- | The response status code.
 csdrsResponseStatus :: Lens' CreateStreamingDistributionResponse Int
 csdrsResponseStatus = lens _csdrsResponseStatus (\ s a -> s{_csdrsResponseStatus = a});
+
+instance NFData CreateStreamingDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/DeleteCloudFrontOriginAccessIdentity.hs b/gen/Network/AWS/CloudFront/DeleteCloudFrontOriginAccessIdentity.hs
--- a/gen/Network/AWS/CloudFront/DeleteCloudFrontOriginAccessIdentity.hs
+++ b/gen/Network/AWS/CloudFront/DeleteCloudFrontOriginAccessIdentity.hs
@@ -85,6 +85,8 @@
 instance Hashable
          DeleteCloudFrontOriginAccessIdentity
 
+instance NFData DeleteCloudFrontOriginAccessIdentity
+
 instance ToHeaders
          DeleteCloudFrontOriginAccessIdentity where
         toHeaders DeleteCloudFrontOriginAccessIdentity'{..}
@@ -112,3 +114,6 @@
     :: DeleteCloudFrontOriginAccessIdentityResponse
 deleteCloudFrontOriginAccessIdentityResponse =
     DeleteCloudFrontOriginAccessIdentityResponse'
+
+instance NFData
+         DeleteCloudFrontOriginAccessIdentityResponse
diff --git a/gen/Network/AWS/CloudFront/DeleteDistribution.hs b/gen/Network/AWS/CloudFront/DeleteDistribution.hs
--- a/gen/Network/AWS/CloudFront/DeleteDistribution.hs
+++ b/gen/Network/AWS/CloudFront/DeleteDistribution.hs
@@ -81,6 +81,8 @@
 
 instance Hashable DeleteDistribution
 
+instance NFData DeleteDistribution
+
 instance ToHeaders DeleteDistribution where
         toHeaders DeleteDistribution'{..}
           = mconcat ["If-Match" =# _ddIfMatch]
@@ -102,3 +104,5 @@
 deleteDistributionResponse
     :: DeleteDistributionResponse
 deleteDistributionResponse = DeleteDistributionResponse'
+
+instance NFData DeleteDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/DeleteStreamingDistribution.hs b/gen/Network/AWS/CloudFront/DeleteStreamingDistribution.hs
--- a/gen/Network/AWS/CloudFront/DeleteStreamingDistribution.hs
+++ b/gen/Network/AWS/CloudFront/DeleteStreamingDistribution.hs
@@ -82,6 +82,8 @@
 
 instance Hashable DeleteStreamingDistribution
 
+instance NFData DeleteStreamingDistribution
+
 instance ToHeaders DeleteStreamingDistribution where
         toHeaders DeleteStreamingDistribution'{..}
           = mconcat ["If-Match" =# _dsdIfMatch]
@@ -104,3 +106,5 @@
 deleteStreamingDistributionResponse
     :: DeleteStreamingDistributionResponse
 deleteStreamingDistributionResponse = DeleteStreamingDistributionResponse'
+
+instance NFData DeleteStreamingDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentity.hs b/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentity.hs
--- a/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentity.hs
+++ b/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentity.hs
@@ -81,6 +81,8 @@
 
 instance Hashable GetCloudFrontOriginAccessIdentity
 
+instance NFData GetCloudFrontOriginAccessIdentity
+
 instance ToHeaders GetCloudFrontOriginAccessIdentity
          where
         toHeaders = const mempty
@@ -136,3 +138,6 @@
 -- | The response status code.
 gcfoairsResponseStatus :: Lens' GetCloudFrontOriginAccessIdentityResponse Int
 gcfoairsResponseStatus = lens _gcfoairsResponseStatus (\ s a -> s{_gcfoairsResponseStatus = a});
+
+instance NFData
+         GetCloudFrontOriginAccessIdentityResponse
diff --git a/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentityConfig.hs b/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentityConfig.hs
--- a/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentityConfig.hs
+++ b/gen/Network/AWS/CloudFront/GetCloudFrontOriginAccessIdentityConfig.hs
@@ -82,6 +82,9 @@
 instance Hashable
          GetCloudFrontOriginAccessIdentityConfig
 
+instance NFData
+         GetCloudFrontOriginAccessIdentityConfig
+
 instance ToHeaders
          GetCloudFrontOriginAccessIdentityConfig where
         toHeaders = const mempty
@@ -136,3 +139,6 @@
 -- | The response status code.
 gcfoaicrsResponseStatus :: Lens' GetCloudFrontOriginAccessIdentityConfigResponse Int
 gcfoaicrsResponseStatus = lens _gcfoaicrsResponseStatus (\ s a -> s{_gcfoaicrsResponseStatus = a});
+
+instance NFData
+         GetCloudFrontOriginAccessIdentityConfigResponse
diff --git a/gen/Network/AWS/CloudFront/GetDistribution.hs b/gen/Network/AWS/CloudFront/GetDistribution.hs
--- a/gen/Network/AWS/CloudFront/GetDistribution.hs
+++ b/gen/Network/AWS/CloudFront/GetDistribution.hs
@@ -79,6 +79,8 @@
 
 instance Hashable GetDistribution
 
+instance NFData GetDistribution
+
 instance ToHeaders GetDistribution where
         toHeaders = const mempty
 
@@ -129,3 +131,5 @@
 -- | The response status code.
 gdrsResponseStatus :: Lens' GetDistributionResponse Int
 gdrsResponseStatus = lens _gdrsResponseStatus (\ s a -> s{_gdrsResponseStatus = a});
+
+instance NFData GetDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/GetDistributionConfig.hs b/gen/Network/AWS/CloudFront/GetDistributionConfig.hs
--- a/gen/Network/AWS/CloudFront/GetDistributionConfig.hs
+++ b/gen/Network/AWS/CloudFront/GetDistributionConfig.hs
@@ -80,6 +80,8 @@
 
 instance Hashable GetDistributionConfig
 
+instance NFData GetDistributionConfig
+
 instance ToHeaders GetDistributionConfig where
         toHeaders = const mempty
 
@@ -130,3 +132,5 @@
 -- | The response status code.
 gdcrsResponseStatus :: Lens' GetDistributionConfigResponse Int
 gdcrsResponseStatus = lens _gdcrsResponseStatus (\ s a -> s{_gdcrsResponseStatus = a});
+
+instance NFData GetDistributionConfigResponse
diff --git a/gen/Network/AWS/CloudFront/GetInvalidation.hs b/gen/Network/AWS/CloudFront/GetInvalidation.hs
--- a/gen/Network/AWS/CloudFront/GetInvalidation.hs
+++ b/gen/Network/AWS/CloudFront/GetInvalidation.hs
@@ -87,6 +87,8 @@
 
 instance Hashable GetInvalidation
 
+instance NFData GetInvalidation
+
 instance ToHeaders GetInvalidation where
         toHeaders = const mempty
 
@@ -130,3 +132,5 @@
 -- | The response status code.
 girsResponseStatus :: Lens' GetInvalidationResponse Int
 girsResponseStatus = lens _girsResponseStatus (\ s a -> s{_girsResponseStatus = a});
+
+instance NFData GetInvalidationResponse
diff --git a/gen/Network/AWS/CloudFront/GetStreamingDistribution.hs b/gen/Network/AWS/CloudFront/GetStreamingDistribution.hs
--- a/gen/Network/AWS/CloudFront/GetStreamingDistribution.hs
+++ b/gen/Network/AWS/CloudFront/GetStreamingDistribution.hs
@@ -80,6 +80,8 @@
 
 instance Hashable GetStreamingDistribution
 
+instance NFData GetStreamingDistribution
+
 instance ToHeaders GetStreamingDistribution where
         toHeaders = const mempty
 
@@ -131,3 +133,5 @@
 -- | The response status code.
 gsdrsResponseStatus :: Lens' GetStreamingDistributionResponse Int
 gsdrsResponseStatus = lens _gsdrsResponseStatus (\ s a -> s{_gsdrsResponseStatus = a});
+
+instance NFData GetStreamingDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/GetStreamingDistributionConfig.hs b/gen/Network/AWS/CloudFront/GetStreamingDistributionConfig.hs
--- a/gen/Network/AWS/CloudFront/GetStreamingDistributionConfig.hs
+++ b/gen/Network/AWS/CloudFront/GetStreamingDistributionConfig.hs
@@ -81,6 +81,8 @@
 
 instance Hashable GetStreamingDistributionConfig
 
+instance NFData GetStreamingDistributionConfig
+
 instance ToHeaders GetStreamingDistributionConfig
          where
         toHeaders = const mempty
@@ -133,3 +135,6 @@
 -- | The response status code.
 gsdcrsResponseStatus :: Lens' GetStreamingDistributionConfigResponse Int
 gsdcrsResponseStatus = lens _gsdcrsResponseStatus (\ s a -> s{_gsdcrsResponseStatus = a});
+
+instance NFData
+         GetStreamingDistributionConfigResponse
diff --git a/gen/Network/AWS/CloudFront/ListCloudFrontOriginAccessIdentities.hs b/gen/Network/AWS/CloudFront/ListCloudFrontOriginAccessIdentities.hs
--- a/gen/Network/AWS/CloudFront/ListCloudFrontOriginAccessIdentities.hs
+++ b/gen/Network/AWS/CloudFront/ListCloudFrontOriginAccessIdentities.hs
@@ -116,6 +116,8 @@
 instance Hashable
          ListCloudFrontOriginAccessIdentities
 
+instance NFData ListCloudFrontOriginAccessIdentities
+
 instance ToHeaders
          ListCloudFrontOriginAccessIdentities where
         toHeaders = const mempty
@@ -165,3 +167,6 @@
 -- | The CloudFrontOriginAccessIdentityList type.
 lcfoairsCloudFrontOriginAccessIdentityList :: Lens' ListCloudFrontOriginAccessIdentitiesResponse CloudFrontOriginAccessIdentityList
 lcfoairsCloudFrontOriginAccessIdentityList = lens _lcfoairsCloudFrontOriginAccessIdentityList (\ s a -> s{_lcfoairsCloudFrontOriginAccessIdentityList = a});
+
+instance NFData
+         ListCloudFrontOriginAccessIdentitiesResponse
diff --git a/gen/Network/AWS/CloudFront/ListDistributions.hs b/gen/Network/AWS/CloudFront/ListDistributions.hs
--- a/gen/Network/AWS/CloudFront/ListDistributions.hs
+++ b/gen/Network/AWS/CloudFront/ListDistributions.hs
@@ -105,6 +105,8 @@
 
 instance Hashable ListDistributions
 
+instance NFData ListDistributions
+
 instance ToHeaders ListDistributions where
         toHeaders = const mempty
 
@@ -148,3 +150,5 @@
 -- | The DistributionList type.
 ldrsDistributionList :: Lens' ListDistributionsResponse DistributionList
 ldrsDistributionList = lens _ldrsDistributionList (\ s a -> s{_ldrsDistributionList = a});
+
+instance NFData ListDistributionsResponse
diff --git a/gen/Network/AWS/CloudFront/ListDistributionsByWebACLId.hs b/gen/Network/AWS/CloudFront/ListDistributionsByWebACLId.hs
--- a/gen/Network/AWS/CloudFront/ListDistributionsByWebACLId.hs
+++ b/gen/Network/AWS/CloudFront/ListDistributionsByWebACLId.hs
@@ -105,6 +105,8 @@
 
 instance Hashable ListDistributionsByWebACLId
 
+instance NFData ListDistributionsByWebACLId
+
 instance ToHeaders ListDistributionsByWebACLId where
         toHeaders = const mempty
 
@@ -152,3 +154,5 @@
 -- | The response status code.
 ldbwairsResponseStatus :: Lens' ListDistributionsByWebACLIdResponse Int
 ldbwairsResponseStatus = lens _ldbwairsResponseStatus (\ s a -> s{_ldbwairsResponseStatus = a});
+
+instance NFData ListDistributionsByWebACLIdResponse
diff --git a/gen/Network/AWS/CloudFront/ListInvalidations.hs b/gen/Network/AWS/CloudFront/ListInvalidations.hs
--- a/gen/Network/AWS/CloudFront/ListInvalidations.hs
+++ b/gen/Network/AWS/CloudFront/ListInvalidations.hs
@@ -117,6 +117,8 @@
 
 instance Hashable ListInvalidations
 
+instance NFData ListInvalidations
+
 instance ToHeaders ListInvalidations where
         toHeaders = const mempty
 
@@ -163,3 +165,5 @@
 -- | Information about invalidation batches.
 lirsInvalidationList :: Lens' ListInvalidationsResponse InvalidationList
 lirsInvalidationList = lens _lirsInvalidationList (\ s a -> s{_lirsInvalidationList = a});
+
+instance NFData ListInvalidationsResponse
diff --git a/gen/Network/AWS/CloudFront/ListStreamingDistributions.hs b/gen/Network/AWS/CloudFront/ListStreamingDistributions.hs
--- a/gen/Network/AWS/CloudFront/ListStreamingDistributions.hs
+++ b/gen/Network/AWS/CloudFront/ListStreamingDistributions.hs
@@ -112,6 +112,8 @@
 
 instance Hashable ListStreamingDistributions
 
+instance NFData ListStreamingDistributions
+
 instance ToHeaders ListStreamingDistributions where
         toHeaders = const mempty
 
@@ -155,3 +157,5 @@
 -- | The StreamingDistributionList type.
 lsdrsStreamingDistributionList :: Lens' ListStreamingDistributionsResponse StreamingDistributionList
 lsdrsStreamingDistributionList = lens _lsdrsStreamingDistributionList (\ s a -> s{_lsdrsStreamingDistributionList = a});
+
+instance NFData ListStreamingDistributionsResponse
diff --git a/gen/Network/AWS/CloudFront/Types.hs b/gen/Network/AWS/CloudFront/Types.hs
--- a/gen/Network/AWS/CloudFront/Types.hs
+++ b/gen/Network/AWS/CloudFront/Types.hs
@@ -512,6 +512,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/CloudFront/Types/Product.hs b/gen/Network/AWS/CloudFront/Types/Product.hs
--- a/gen/Network/AWS/CloudFront/Types/Product.hs
+++ b/gen/Network/AWS/CloudFront/Types/Product.hs
@@ -81,6 +81,8 @@
 
 instance Hashable ActiveTrustedSigners
 
+instance NFData ActiveTrustedSigners
+
 -- | A complex type that contains information about CNAMEs (alternate domain
 -- names), if any, for this distribution.
 --
@@ -124,6 +126,8 @@
 
 instance Hashable Aliases
 
+instance NFData Aliases
+
 instance ToXML Aliases where
         toXML Aliases'{..}
           = mconcat
@@ -190,6 +194,8 @@
 
 instance Hashable AllowedMethods
 
+instance NFData AllowedMethods
+
 instance ToXML AllowedMethods where
         toXML AllowedMethods'{..}
           = mconcat
@@ -398,6 +404,8 @@
 
 instance Hashable CacheBehavior
 
+instance NFData CacheBehavior
+
 instance ToXML CacheBehavior where
         toXML CacheBehavior'{..}
           = mconcat
@@ -454,6 +462,8 @@
 
 instance Hashable CacheBehaviors
 
+instance NFData CacheBehaviors
+
 instance ToXML CacheBehaviors where
         toXML CacheBehaviors'{..}
           = mconcat
@@ -511,6 +521,8 @@
 
 instance Hashable CachedMethods
 
+instance NFData CachedMethods
+
 instance ToXML CachedMethods where
         toXML CachedMethods'{..}
           = mconcat
@@ -569,6 +581,8 @@
 
 instance Hashable CloudFrontOriginAccessIdentity
 
+instance NFData CloudFrontOriginAccessIdentity
+
 -- | Origin access identity configuration.
 --
 -- /See:/ 'cloudFrontOriginAccessIdentityConfig' smart constructor.
@@ -622,6 +636,8 @@
 instance Hashable
          CloudFrontOriginAccessIdentityConfig
 
+instance NFData CloudFrontOriginAccessIdentityConfig
+
 instance ToXML CloudFrontOriginAccessIdentityConfig
          where
         toXML CloudFrontOriginAccessIdentityConfig'{..}
@@ -720,6 +736,8 @@
 
 instance Hashable CloudFrontOriginAccessIdentityList
 
+instance NFData CloudFrontOriginAccessIdentityList
+
 -- | Summary of the information about a CloudFront origin access identity.
 --
 -- /See:/ 'cloudFrontOriginAccessIdentitySummary' smart constructor.
@@ -775,6 +793,8 @@
 instance Hashable
          CloudFrontOriginAccessIdentitySummary
 
+instance NFData CloudFrontOriginAccessIdentitySummary
+
 -- | A complex type that specifies the whitelisted cookies, if any, that you
 -- want CloudFront to forward to your origin that is associated with this
 -- cache behavior.
@@ -819,6 +839,8 @@
 
 instance Hashable CookieNames
 
+instance NFData CookieNames
+
 instance ToXML CookieNames where
         toXML CookieNames'{..}
           = mconcat
@@ -870,6 +892,8 @@
 
 instance Hashable CookiePreference
 
+instance NFData CookiePreference
+
 instance ToXML CookiePreference where
         toXML CookiePreference'{..}
           = mconcat
@@ -956,6 +980,8 @@
 
 instance Hashable CustomErrorResponse
 
+instance NFData CustomErrorResponse
+
 instance ToXML CustomErrorResponse where
         toXML CustomErrorResponse'{..}
           = mconcat
@@ -1006,6 +1032,8 @@
 
 instance Hashable CustomErrorResponses
 
+instance NFData CustomErrorResponses
+
 instance ToXML CustomErrorResponses where
         toXML CustomErrorResponses'{..}
           = mconcat
@@ -1055,6 +1083,8 @@
 
 instance Hashable CustomHeaders
 
+instance NFData CustomHeaders
+
 instance ToXML CustomHeaders where
         toXML CustomHeaders'{..}
           = mconcat
@@ -1122,6 +1152,8 @@
 
 instance Hashable CustomOriginConfig
 
+instance NFData CustomOriginConfig
+
 instance ToXML CustomOriginConfig where
         toXML CustomOriginConfig'{..}
           = mconcat
@@ -1302,6 +1334,8 @@
 
 instance Hashable DefaultCacheBehavior
 
+instance NFData DefaultCacheBehavior
+
 instance ToXML DefaultCacheBehavior where
         toXML DefaultCacheBehavior'{..}
           = mconcat
@@ -1416,6 +1450,8 @@
 
 instance Hashable Distribution
 
+instance NFData Distribution
+
 -- | A distribution Configuration.
 --
 -- /See:/ 'distributionConfig' smart constructor.
@@ -1595,6 +1631,8 @@
 
 instance Hashable DistributionConfig
 
+instance NFData DistributionConfig
+
 instance ToXML DistributionConfig where
         toXML DistributionConfig'{..}
           = mconcat
@@ -1699,6 +1737,8 @@
 
 instance Hashable DistributionList
 
+instance NFData DistributionList
+
 -- | A summary of the information for an Amazon CloudFront distribution.
 --
 -- /See:/ 'distributionSummary' smart constructor.
@@ -1878,6 +1918,8 @@
 
 instance Hashable DistributionSummary
 
+instance NFData DistributionSummary
+
 -- | A complex type that specifies how CloudFront handles query strings,
 -- cookies and headers.
 --
@@ -1931,6 +1973,8 @@
 
 instance Hashable ForwardedValues
 
+instance NFData ForwardedValues
+
 instance ToXML ForwardedValues where
         toXML ForwardedValues'{..}
           = mconcat
@@ -2011,6 +2055,8 @@
 
 instance Hashable GeoRestriction
 
+instance NFData GeoRestriction
+
 instance ToXML GeoRestriction where
         toXML GeoRestriction'{..}
           = mconcat
@@ -2076,6 +2122,8 @@
 
 instance Hashable Headers
 
+instance NFData Headers
+
 instance ToXML Headers where
         toXML Headers'{..}
           = mconcat
@@ -2144,6 +2192,8 @@
 
 instance Hashable Invalidation
 
+instance NFData Invalidation
+
 -- | An invalidation batch.
 --
 -- /See:/ 'invalidationBatch' smart constructor.
@@ -2199,6 +2249,8 @@
 
 instance Hashable InvalidationBatch
 
+instance NFData InvalidationBatch
+
 instance ToXML InvalidationBatch where
         toXML InvalidationBatch'{..}
           = mconcat
@@ -2292,6 +2344,8 @@
 
 instance Hashable InvalidationList
 
+instance NFData InvalidationList
+
 -- | Summary of an invalidation request.
 --
 -- /See:/ 'invalidationSummary' smart constructor.
@@ -2342,6 +2396,8 @@
 
 instance Hashable InvalidationSummary
 
+instance NFData InvalidationSummary
+
 -- | A complex type that lists the active CloudFront key pairs, if any, that
 -- are associated with AwsAccountNumber.
 --
@@ -2385,6 +2441,8 @@
 
 instance Hashable KeyPairIds
 
+instance NFData KeyPairIds
+
 -- | A complex type that controls whether access logs are written for the
 -- distribution.
 --
@@ -2461,6 +2519,8 @@
 
 instance Hashable LoggingConfig
 
+instance NFData LoggingConfig
+
 instance ToXML LoggingConfig where
         toXML LoggingConfig'{..}
           = mconcat
@@ -2562,6 +2622,8 @@
 
 instance Hashable Origin
 
+instance NFData Origin
+
 instance ToXML Origin where
         toXML Origin'{..}
           = mconcat
@@ -2611,6 +2673,8 @@
 
 instance Hashable OriginCustomHeader
 
+instance NFData OriginCustomHeader
+
 instance ToXML OriginCustomHeader where
         toXML OriginCustomHeader'{..}
           = mconcat
@@ -2662,6 +2726,8 @@
 
 instance Hashable OriginSSLProtocols
 
+instance NFData OriginSSLProtocols
+
 instance ToXML OriginSSLProtocols where
         toXML OriginSSLProtocols'{..}
           = mconcat
@@ -2710,6 +2776,8 @@
 
 instance Hashable Origins
 
+instance NFData Origins
+
 instance ToXML Origins where
         toXML Origins'{..}
           = mconcat
@@ -2759,6 +2827,8 @@
 
 instance Hashable Paths
 
+instance NFData Paths
+
 instance ToXML Paths where
         toXML Paths'{..}
           = mconcat
@@ -2796,6 +2866,8 @@
 
 instance Hashable Restrictions
 
+instance NFData Restrictions
+
 instance ToXML Restrictions where
         toXML Restrictions'{..}
           = mconcat ["GeoRestriction" @= _rGeoRestriction]
@@ -2841,6 +2913,8 @@
 
 instance Hashable S3Origin
 
+instance NFData S3Origin
+
 instance ToXML S3Origin where
         toXML S3Origin'{..}
           = mconcat
@@ -2890,6 +2964,8 @@
 
 instance Hashable S3OriginConfig
 
+instance NFData S3OriginConfig
+
 instance ToXML S3OriginConfig where
         toXML S3OriginConfig'{..}
           = mconcat
@@ -2939,6 +3015,8 @@
 
 instance Hashable Signer
 
+instance NFData Signer
+
 -- | A streaming distribution.
 --
 -- /See:/ 'streamingDistribution' smart constructor.
@@ -3030,6 +3108,8 @@
 
 instance Hashable StreamingDistribution
 
+instance NFData StreamingDistribution
+
 -- | The configuration for the streaming distribution.
 --
 -- /See:/ 'streamingDistributionConfig' smart constructor.
@@ -3153,6 +3233,8 @@
 
 instance Hashable StreamingDistributionConfig
 
+instance NFData StreamingDistributionConfig
+
 instance ToXML StreamingDistributionConfig where
         toXML StreamingDistributionConfig'{..}
           = mconcat
@@ -3251,6 +3333,8 @@
 
 instance Hashable StreamingDistributionList
 
+instance NFData StreamingDistributionList
+
 -- | A summary of the information for an Amazon CloudFront streaming
 -- distribution.
 --
@@ -3389,6 +3473,8 @@
 
 instance Hashable StreamingDistributionSummary
 
+instance NFData StreamingDistributionSummary
+
 -- | A complex type that controls whether access logs are written for this
 -- streaming distribution.
 --
@@ -3450,6 +3536,8 @@
 
 instance Hashable StreamingLoggingConfig
 
+instance NFData StreamingLoggingConfig
+
 instance ToXML StreamingLoggingConfig where
         toXML StreamingLoggingConfig'{..}
           = mconcat
@@ -3520,6 +3608,8 @@
 
 instance Hashable TrustedSigners
 
+instance NFData TrustedSigners
+
 instance ToXML TrustedSigners where
         toXML TrustedSigners'{..}
           = mconcat
@@ -3645,6 +3735,8 @@
                 <*> (x .@? "CloudFrontDefaultCertificate")
 
 instance Hashable ViewerCertificate
+
+instance NFData ViewerCertificate
 
 instance ToXML ViewerCertificate where
         toXML ViewerCertificate'{..}
diff --git a/gen/Network/AWS/CloudFront/Types/Sum.hs b/gen/Network/AWS/CloudFront/Types/Sum.hs
--- a/gen/Network/AWS/CloudFront/Types/Sum.hs
+++ b/gen/Network/AWS/CloudFront/Types/Sum.hs
@@ -40,6 +40,7 @@
         IAM -> "iam"
 
 instance Hashable     CertificateSource
+instance NFData       CertificateSource
 instance ToByteString CertificateSource
 instance ToQuery      CertificateSource
 instance ToHeader     CertificateSource
@@ -71,6 +72,7 @@
         Whitelist -> "whitelist"
 
 instance Hashable     GeoRestrictionType
+instance NFData       GeoRestrictionType
 instance ToByteString GeoRestrictionType
 instance ToQuery      GeoRestrictionType
 instance ToHeader     GeoRestrictionType
@@ -102,6 +104,7 @@
         ISWhitelist -> "whitelist"
 
 instance Hashable     ItemSelection
+instance NFData       ItemSelection
 instance ToByteString ItemSelection
 instance ToQuery      ItemSelection
 instance ToHeader     ItemSelection
@@ -145,6 +148,7 @@
         Put -> "PUT"
 
 instance Hashable     Method
+instance NFData       Method
 instance ToByteString Method
 instance ToQuery      Method
 instance ToHeader     Method
@@ -173,6 +177,7 @@
         MPVTLSV1 -> "TLSv1"
 
 instance Hashable     MinimumProtocolVersion
+instance NFData       MinimumProtocolVersion
 instance ToByteString MinimumProtocolVersion
 instance ToQuery      MinimumProtocolVersion
 instance ToHeader     MinimumProtocolVersion
@@ -204,6 +209,7 @@
         MatchViewer -> "match-viewer"
 
 instance Hashable     OriginProtocolPolicy
+instance NFData       OriginProtocolPolicy
 instance ToByteString OriginProtocolPolicy
 instance ToQuery      OriginProtocolPolicy
 instance ToHeader     OriginProtocolPolicy
@@ -235,6 +241,7 @@
         PriceClassAll -> "PriceClass_All"
 
 instance Hashable     PriceClass
+instance NFData       PriceClass
 instance ToByteString PriceClass
 instance ToQuery      PriceClass
 instance ToHeader     PriceClass
@@ -269,6 +276,7 @@
         TLSV1_2 -> "TLSv1.2"
 
 instance Hashable     SSLProtocol
+instance NFData       SSLProtocol
 instance ToByteString SSLProtocol
 instance ToQuery      SSLProtocol
 instance ToHeader     SSLProtocol
@@ -297,6 +305,7 @@
         VIP -> "vip"
 
 instance Hashable     SSLSupportMethod
+instance NFData       SSLSupportMethod
 instance ToByteString SSLSupportMethod
 instance ToQuery      SSLSupportMethod
 instance ToHeader     SSLSupportMethod
@@ -328,6 +337,7 @@
         VPPRedirectToHTTPS -> "redirect-to-https"
 
 instance Hashable     ViewerProtocolPolicy
+instance NFData       ViewerProtocolPolicy
 instance ToByteString ViewerProtocolPolicy
 instance ToQuery      ViewerProtocolPolicy
 instance ToHeader     ViewerProtocolPolicy
diff --git a/gen/Network/AWS/CloudFront/UpdateCloudFrontOriginAccessIdentity.hs b/gen/Network/AWS/CloudFront/UpdateCloudFrontOriginAccessIdentity.hs
--- a/gen/Network/AWS/CloudFront/UpdateCloudFrontOriginAccessIdentity.hs
+++ b/gen/Network/AWS/CloudFront/UpdateCloudFrontOriginAccessIdentity.hs
@@ -102,6 +102,8 @@
 instance Hashable
          UpdateCloudFrontOriginAccessIdentity
 
+instance NFData UpdateCloudFrontOriginAccessIdentity
+
 instance ToElement
          UpdateCloudFrontOriginAccessIdentity where
         toElement
@@ -165,3 +167,6 @@
 -- | The response status code.
 ucfoairsResponseStatus :: Lens' UpdateCloudFrontOriginAccessIdentityResponse Int
 ucfoairsResponseStatus = lens _ucfoairsResponseStatus (\ s a -> s{_ucfoairsResponseStatus = a});
+
+instance NFData
+         UpdateCloudFrontOriginAccessIdentityResponse
diff --git a/gen/Network/AWS/CloudFront/UpdateDistribution.hs b/gen/Network/AWS/CloudFront/UpdateDistribution.hs
--- a/gen/Network/AWS/CloudFront/UpdateDistribution.hs
+++ b/gen/Network/AWS/CloudFront/UpdateDistribution.hs
@@ -100,6 +100,8 @@
 
 instance Hashable UpdateDistribution
 
+instance NFData UpdateDistribution
+
 instance ToElement UpdateDistribution where
         toElement
           = mkElement
@@ -158,3 +160,5 @@
 -- | The response status code.
 udrsResponseStatus :: Lens' UpdateDistributionResponse Int
 udrsResponseStatus = lens _udrsResponseStatus (\ s a -> s{_udrsResponseStatus = a});
+
+instance NFData UpdateDistributionResponse
diff --git a/gen/Network/AWS/CloudFront/UpdateStreamingDistribution.hs b/gen/Network/AWS/CloudFront/UpdateStreamingDistribution.hs
--- a/gen/Network/AWS/CloudFront/UpdateStreamingDistribution.hs
+++ b/gen/Network/AWS/CloudFront/UpdateStreamingDistribution.hs
@@ -100,6 +100,8 @@
 
 instance Hashable UpdateStreamingDistribution
 
+instance NFData UpdateStreamingDistribution
+
 instance ToElement UpdateStreamingDistribution where
         toElement
           = mkElement
@@ -159,3 +161,5 @@
 -- | The response status code.
 usdrsResponseStatus :: Lens' UpdateStreamingDistributionResponse Int
 usdrsResponseStatus = lens _usdrsResponseStatus (\ s a -> s{_usdrsResponseStatus = a});
+
+instance NFData UpdateStreamingDistributionResponse