diff --git a/amazonka-kms.cabal b/amazonka-kms.cabal
--- a/amazonka-kms.cabal
+++ b/amazonka-kms.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-kms
-version:               0.0.6
+version:               0.0.7
 synopsis:              Amazon Key Management Service SDK.
 homepage:              https://github.com/brendanhay/amazonka
 license:               OtherLicense
@@ -69,5 +69,5 @@
     other-modules:
 
     build-depends:
-          amazonka-core == 0.0.6.*
+          amazonka-core == 0.0.7.*
         , base          >= 4.7     && < 5
diff --git a/gen/Network/AWS/KMS/ListAliases.hs b/gen/Network/AWS/KMS/ListAliases.hs
--- a/gen/Network/AWS/KMS/ListAliases.hs
+++ b/gen/Network/AWS/KMS/ListAliases.hs
@@ -142,6 +142,6 @@
 
 instance FromJSON ListAliasesResponse where
     parseJSON = withObject "ListAliasesResponse" $ \o -> ListAliasesResponse
-        <$> o .:  "Aliases"
+        <$> o .:? "Aliases" .!= mempty
         <*> o .:? "NextMarker"
         <*> o .:? "Truncated"
diff --git a/gen/Network/AWS/KMS/ListGrants.hs b/gen/Network/AWS/KMS/ListGrants.hs
--- a/gen/Network/AWS/KMS/ListGrants.hs
+++ b/gen/Network/AWS/KMS/ListGrants.hs
@@ -155,6 +155,6 @@
 
 instance FromJSON ListGrantsResponse where
     parseJSON = withObject "ListGrantsResponse" $ \o -> ListGrantsResponse
-        <$> o .:  "Grants"
+        <$> o .:? "Grants" .!= mempty
         <*> o .:? "NextMarker"
         <*> o .:? "Truncated"
diff --git a/gen/Network/AWS/KMS/ListKeyPolicies.hs b/gen/Network/AWS/KMS/ListKeyPolicies.hs
--- a/gen/Network/AWS/KMS/ListKeyPolicies.hs
+++ b/gen/Network/AWS/KMS/ListKeyPolicies.hs
@@ -157,5 +157,5 @@
 instance FromJSON ListKeyPoliciesResponse where
     parseJSON = withObject "ListKeyPoliciesResponse" $ \o -> ListKeyPoliciesResponse
         <$> o .:? "NextMarker"
-        <*> o .:  "PolicyNames"
+        <*> o .:? "PolicyNames" .!= mempty
         <*> o .:? "Truncated"
diff --git a/gen/Network/AWS/KMS/ListKeys.hs b/gen/Network/AWS/KMS/ListKeys.hs
--- a/gen/Network/AWS/KMS/ListKeys.hs
+++ b/gen/Network/AWS/KMS/ListKeys.hs
@@ -142,6 +142,6 @@
 
 instance FromJSON ListKeysResponse where
     parseJSON = withObject "ListKeysResponse" $ \o -> ListKeysResponse
-        <$> o .:  "Keys"
+        <$> o .:? "Keys" .!= mempty
         <*> o .:? "NextMarker"
         <*> o .:? "Truncated"
diff --git a/gen/Network/AWS/KMS/Types.hs b/gen/Network/AWS/KMS/Types.hs
--- a/gen/Network/AWS/KMS/Types.hs
+++ b/gen/Network/AWS/KMS/Types.hs
@@ -281,8 +281,8 @@
 
 instance FromJSON GrantConstraints where
     parseJSON = withObject "GrantConstraints" $ \o -> GrantConstraints
-        <$> o .:  "EncryptionContextEquals"
-        <*> o .:  "EncryptionContextSubset"
+        <$> o .:? "EncryptionContextEquals" .!= mempty
+        <*> o .:? "EncryptionContextSubset" .!= mempty
 
 instance ToJSON GrantConstraints where
     toJSON GrantConstraints{..} = object
@@ -409,7 +409,7 @@
         <*> o .:? "GrantId"
         <*> o .:? "GranteePrincipal"
         <*> o .:? "IssuingAccount"
-        <*> o .:  "Operations"
+        <*> o .:? "Operations" .!= mempty
         <*> o .:? "RetiringPrincipal"
 
 instance ToJSON GrantListEntry where