Add derived Eq and Show instances for generated data types

gen/Stratosphere/Tag.hs

@@ -8,6 +8,7 @@ import Stratosphere.ResourceProperties
 import Stratosphere.Value
 data Tag
   = Tag {key :: (Value Prelude.Text), value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkTag :: Value Prelude.Text -> Value Prelude.Text -> Tag
 mkTag key value = Tag {key = key, value = value}
 instance ToResourceProperties Tag where

generator/src/Stratosphere/Generator/Declaration.hs

@@ -129,7 +129,7 @@ genRecord Record{..} = runGen $ do
         recordName
         []
         [GHC.recordCon recordName fields]
-        []
+        [GHC.derivingStock [GHC.var "Prelude.Eq", GHC.var "Prelude.Show"]]
       where
         genField :: Raw.PropertyName -> Raw.Property -> Generator (GHC.OccNameStr, GHC.Field)
         genField propertyName Raw.Property{..} =

services/accessanalyzer/gen/Stratosphere/AccessAnalyzer/Analyzer.hs

@@ -13,6 +13,7 @@ data Analyzer
               archiveRules :: (Prelude.Maybe [ArchiveRuleProperty]),
               tags :: (Prelude.Maybe [Tag]),
               type' :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkAnalyzer :: Value Prelude.Text -> Analyzer
 mkAnalyzer type'
   = Analyzer

services/accessanalyzer/gen/Stratosphere/AccessAnalyzer/Analyzer/ArchiveRuleProperty.hs

@@ -10,6 +10,7 @@ import Stratosphere.Value
 data ArchiveRuleProperty
   = ArchiveRuleProperty {filter :: [FilterProperty],
                          ruleName :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkArchiveRuleProperty ::
   [FilterProperty] -> Value Prelude.Text -> ArchiveRuleProperty
 mkArchiveRuleProperty filter ruleName

services/accessanalyzer/gen/Stratosphere/AccessAnalyzer/Analyzer/FilterProperty.hs

@@ -12,6 +12,7 @@ data FilterProperty
                     exists :: (Prelude.Maybe (Value Prelude.Bool)),
                     neq :: (Prelude.Maybe (ValueList Prelude.Text)),
                     property :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkFilterProperty :: Value Prelude.Text -> FilterProperty
 mkFilterProperty property
   = FilterProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate.hs

@@ -16,6 +16,7 @@ data Certificate
                  templateArn :: (Prelude.Maybe (Value Prelude.Text)),
                  validity :: ValidityProperty,
                  validityNotBefore :: (Prelude.Maybe ValidityProperty)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCertificate ::
   Value Prelude.Text
   -> Value Prelude.Text

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/ApiPassthroughProperty.hs

@@ -11,6 +11,7 @@ import Stratosphere.ResourceProperties
 data ApiPassthroughProperty
   = ApiPassthroughProperty {extensions :: (Prelude.Maybe ExtensionsProperty),
                             subject :: (Prelude.Maybe SubjectProperty)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkApiPassthroughProperty :: ApiPassthroughProperty
 mkApiPassthroughProperty
   = ApiPassthroughProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/CustomAttributeProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data CustomAttributeProperty
   = CustomAttributeProperty {objectIdentifier :: (Value Prelude.Text),
                              value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCustomAttributeProperty ::
   Value Prelude.Text -> Value Prelude.Text -> CustomAttributeProperty
 mkCustomAttributeProperty objectIdentifier value

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/CustomExtensionProperty.hs

@@ -10,6 +10,7 @@ data CustomExtensionProperty
   = CustomExtensionProperty {critical :: (Prelude.Maybe (Value Prelude.Bool)),
                              objectIdentifier :: (Value Prelude.Text),
                              value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCustomExtensionProperty ::
   Value Prelude.Text -> Value Prelude.Text -> CustomExtensionProperty
 mkCustomExtensionProperty objectIdentifier value

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/EdiPartyNameProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data EdiPartyNameProperty
   = EdiPartyNameProperty {nameAssigner :: (Value Prelude.Text),
                           partyName :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkEdiPartyNameProperty ::
   Value Prelude.Text -> Value Prelude.Text -> EdiPartyNameProperty
 mkEdiPartyNameProperty nameAssigner partyName

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/ExtendedKeyUsageProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data ExtendedKeyUsageProperty
   = ExtendedKeyUsageProperty {extendedKeyUsageObjectIdentifier :: (Prelude.Maybe (Value Prelude.Text)),
                               extendedKeyUsageType :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkExtendedKeyUsageProperty :: ExtendedKeyUsageProperty
 mkExtendedKeyUsageProperty
   = ExtendedKeyUsageProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/ExtensionsProperty.hs

@@ -16,6 +16,7 @@ data ExtensionsProperty
                         extendedKeyUsage :: (Prelude.Maybe [ExtendedKeyUsageProperty]),
                         keyUsage :: (Prelude.Maybe KeyUsageProperty),
                         subjectAlternativeNames :: (Prelude.Maybe [GeneralNameProperty])}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkExtensionsProperty :: ExtensionsProperty
 mkExtensionsProperty
   = ExtensionsProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/GeneralNameProperty.hs

@@ -18,6 +18,7 @@ data GeneralNameProperty
                          registeredId :: (Prelude.Maybe (Value Prelude.Text)),
                          rfc822Name :: (Prelude.Maybe (Value Prelude.Text)),
                          uniformResourceIdentifier :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkGeneralNameProperty :: GeneralNameProperty
 mkGeneralNameProperty
   = GeneralNameProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/KeyUsageProperty.hs

@@ -16,6 +16,7 @@ data KeyUsageProperty
                       keyCertSign :: (Prelude.Maybe (Value Prelude.Bool)),
                       keyEncipherment :: (Prelude.Maybe (Value Prelude.Bool)),
                       nonRepudiation :: (Prelude.Maybe (Value Prelude.Bool))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkKeyUsageProperty :: KeyUsageProperty
 mkKeyUsageProperty
   = KeyUsageProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/OtherNameProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data OtherNameProperty
   = OtherNameProperty {typeId :: (Value Prelude.Text),
                        value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkOtherNameProperty ::
   Value Prelude.Text -> Value Prelude.Text -> OtherNameProperty
 mkOtherNameProperty typeId value

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/PolicyInformationProperty.hs

@@ -11,6 +11,7 @@ import Stratosphere.Value
 data PolicyInformationProperty
   = PolicyInformationProperty {certPolicyId :: (Value Prelude.Text),
                                policyQualifiers :: (Prelude.Maybe [PolicyQualifierInfoProperty])}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkPolicyInformationProperty ::
   Value Prelude.Text -> PolicyInformationProperty
 mkPolicyInformationProperty certPolicyId

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/PolicyQualifierInfoProperty.hs

@@ -11,6 +11,7 @@ import Stratosphere.Value
 data PolicyQualifierInfoProperty
   = PolicyQualifierInfoProperty {policyQualifierId :: (Value Prelude.Text),
                                  qualifier :: QualifierProperty}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkPolicyQualifierInfoProperty ::
   Value Prelude.Text
   -> QualifierProperty -> PolicyQualifierInfoProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/QualifierProperty.hs

@@ -8,6 +8,7 @@ import Stratosphere.ResourceProperties
 import Stratosphere.Value
 data QualifierProperty
   = QualifierProperty {cpsUri :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkQualifierProperty :: Value Prelude.Text -> QualifierProperty
 mkQualifierProperty cpsUri = QualifierProperty {cpsUri = cpsUri}
 instance ToResourceProperties QualifierProperty where

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/SubjectProperty.hs

@@ -23,6 +23,7 @@ data SubjectProperty
                      state :: (Prelude.Maybe (Value Prelude.Text)),
                      surname :: (Prelude.Maybe (Value Prelude.Text)),
                      title :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkSubjectProperty :: SubjectProperty
 mkSubjectProperty
   = SubjectProperty

services/acmpca/gen/Stratosphere/ACMPCA/Certificate/ValidityProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data ValidityProperty
   = ValidityProperty {type' :: (Value Prelude.Text),
                       value :: (Value Prelude.Double)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkValidityProperty ::
   Value Prelude.Text -> Value Prelude.Double -> ValidityProperty
 mkValidityProperty type' value

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority.hs

@@ -20,6 +20,7 @@ data CertificateAuthority
                           tags :: (Prelude.Maybe [Tag]),
                           type' :: (Value Prelude.Text),
                           usageMode :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCertificateAuthority ::
   Value Prelude.Text
   -> Value Prelude.Text

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/AccessDescriptionProperty.hs

@@ -11,6 +11,7 @@ import Stratosphere.ResourceProperties
 data AccessDescriptionProperty
   = AccessDescriptionProperty {accessLocation :: GeneralNameProperty,
                                accessMethod :: AccessMethodProperty}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkAccessDescriptionProperty ::
   GeneralNameProperty
   -> AccessMethodProperty -> AccessDescriptionProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/AccessMethodProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data AccessMethodProperty
   = AccessMethodProperty {accessMethodType :: (Prelude.Maybe (Value Prelude.Text)),
                           customObjectIdentifier :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkAccessMethodProperty :: AccessMethodProperty
 mkAccessMethodProperty
   = AccessMethodProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/CrlConfigurationProperty.hs

@@ -12,6 +12,7 @@ data CrlConfigurationProperty
                               expirationInDays :: (Prelude.Maybe (Value Prelude.Integer)),
                               s3BucketName :: (Prelude.Maybe (Value Prelude.Text)),
                               s3ObjectAcl :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCrlConfigurationProperty :: CrlConfigurationProperty
 mkCrlConfigurationProperty
   = CrlConfigurationProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/CsrExtensionsProperty.hs

@@ -10,6 +10,7 @@ import Stratosphere.ResourceProperties
 data CsrExtensionsProperty
   = CsrExtensionsProperty {keyUsage :: (Prelude.Maybe KeyUsageProperty),
                            subjectInformationAccess :: (Prelude.Maybe [AccessDescriptionProperty])}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCsrExtensionsProperty :: CsrExtensionsProperty
 mkCsrExtensionsProperty
   = CsrExtensionsProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/CustomAttributeProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data CustomAttributeProperty
   = CustomAttributeProperty {objectIdentifier :: (Value Prelude.Text),
                              value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCustomAttributeProperty ::
   Value Prelude.Text -> Value Prelude.Text -> CustomAttributeProperty
 mkCustomAttributeProperty objectIdentifier value

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/EdiPartyNameProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data EdiPartyNameProperty
   = EdiPartyNameProperty {nameAssigner :: (Value Prelude.Text),
                           partyName :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkEdiPartyNameProperty ::
   Value Prelude.Text -> Value Prelude.Text -> EdiPartyNameProperty
 mkEdiPartyNameProperty nameAssigner partyName

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/GeneralNameProperty.hs

@@ -18,6 +18,7 @@ data GeneralNameProperty
                          registeredId :: (Prelude.Maybe (Value Prelude.Text)),
                          rfc822Name :: (Prelude.Maybe (Value Prelude.Text)),
                          uniformResourceIdentifier :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkGeneralNameProperty :: GeneralNameProperty
 mkGeneralNameProperty
   = GeneralNameProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/KeyUsageProperty.hs

@@ -16,6 +16,7 @@ data KeyUsageProperty
                       keyCertSign :: (Prelude.Maybe (Value Prelude.Bool)),
                       keyEncipherment :: (Prelude.Maybe (Value Prelude.Bool)),
                       nonRepudiation :: (Prelude.Maybe (Value Prelude.Bool))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkKeyUsageProperty :: KeyUsageProperty
 mkKeyUsageProperty
   = KeyUsageProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/OcspConfigurationProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data OcspConfigurationProperty
   = OcspConfigurationProperty {enabled :: (Prelude.Maybe (Value Prelude.Bool)),
                                ocspCustomCname :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkOcspConfigurationProperty :: OcspConfigurationProperty
 mkOcspConfigurationProperty
   = OcspConfigurationProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/OtherNameProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data OtherNameProperty
   = OtherNameProperty {typeId :: (Value Prelude.Text),
                        value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkOtherNameProperty ::
   Value Prelude.Text -> Value Prelude.Text -> OtherNameProperty
 mkOtherNameProperty typeId value

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/RevocationConfigurationProperty.hs

@@ -11,6 +11,7 @@ import Stratosphere.ResourceProperties
 data RevocationConfigurationProperty
   = RevocationConfigurationProperty {crlConfiguration :: (Prelude.Maybe CrlConfigurationProperty),
                                      ocspConfiguration :: (Prelude.Maybe OcspConfigurationProperty)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkRevocationConfigurationProperty ::
   RevocationConfigurationProperty
 mkRevocationConfigurationProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthority/SubjectProperty.hs

@@ -23,6 +23,7 @@ data SubjectProperty
                      state :: (Prelude.Maybe (Value Prelude.Text)),
                      surname :: (Prelude.Maybe (Value Prelude.Text)),
                      title :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkSubjectProperty :: SubjectProperty
 mkSubjectProperty
   = SubjectProperty

services/acmpca/gen/Stratosphere/ACMPCA/CertificateAuthorityActivation.hs

@@ -12,6 +12,7 @@ data CertificateAuthorityActivation
                                     certificateAuthorityArn :: (Value Prelude.Text),
                                     certificateChain :: (Prelude.Maybe (Value Prelude.Text)),
                                     status :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkCertificateAuthorityActivation ::
   Value Prelude.Text
   -> Value Prelude.Text -> CertificateAuthorityActivation

services/acmpca/gen/Stratosphere/ACMPCA/Permission.hs

@@ -11,6 +11,7 @@ data Permission
                 certificateAuthorityArn :: (Value Prelude.Text),
                 principal :: (Value Prelude.Text),
                 sourceAccount :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkPermission ::
   ValueList Prelude.Text
   -> Value Prelude.Text -> Value Prelude.Text -> Permission

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker.hs

@@ -32,6 +32,7 @@ data Broker
             subnetIds :: (Prelude.Maybe (ValueList Prelude.Text)),
             tags :: (Prelude.Maybe [TagsEntryProperty]),
             users :: [UserProperty]}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkBroker ::
   Value Prelude.Bool
   -> Value Prelude.Text

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/ConfigurationIdProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data ConfigurationIdProperty
   = ConfigurationIdProperty {id :: (Value Prelude.Text),
                              revision :: (Value Prelude.Integer)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkConfigurationIdProperty ::
   Value Prelude.Text
   -> Value Prelude.Integer -> ConfigurationIdProperty

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/EncryptionOptionsProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data EncryptionOptionsProperty
   = EncryptionOptionsProperty {kmsKeyId :: (Prelude.Maybe (Value Prelude.Text)),
                                useAwsOwnedKey :: (Value Prelude.Bool)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkEncryptionOptionsProperty ::
   Value Prelude.Bool -> EncryptionOptionsProperty
 mkEncryptionOptionsProperty useAwsOwnedKey

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/LdapServerMetadataProperty.hs

@@ -18,6 +18,7 @@ data LdapServerMetadataProperty
                                 userRoleName :: (Prelude.Maybe (Value Prelude.Text)),
                                 userSearchMatching :: (Value Prelude.Text),
                                 userSearchSubtree :: (Prelude.Maybe (Value Prelude.Bool))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkLdapServerMetadataProperty ::
   ValueList Prelude.Text
   -> Value Prelude.Text

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/LogListProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data LogListProperty
   = LogListProperty {audit :: (Prelude.Maybe (Value Prelude.Bool)),
                      general :: (Prelude.Maybe (Value Prelude.Bool))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkLogListProperty :: LogListProperty
 mkLogListProperty
   = LogListProperty

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/MaintenanceWindowProperty.hs

@@ -10,6 +10,7 @@ data MaintenanceWindowProperty
   = MaintenanceWindowProperty {dayOfWeek :: (Value Prelude.Text),
                                timeOfDay :: (Value Prelude.Text),
                                timeZone :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkMaintenanceWindowProperty ::
   Value Prelude.Text
   -> Value Prelude.Text

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/TagsEntryProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data TagsEntryProperty
   = TagsEntryProperty {key :: (Value Prelude.Text),
                        value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkTagsEntryProperty ::
   Value Prelude.Text -> Value Prelude.Text -> TagsEntryProperty
 mkTagsEntryProperty key value

services/amazonmq/gen/Stratosphere/AmazonMQ/Broker/UserProperty.hs

@@ -11,6 +11,7 @@ data UserProperty
                   groups :: (Prelude.Maybe (ValueList Prelude.Text)),
                   password :: (Value Prelude.Text),
                   username :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkUserProperty ::
   Value Prelude.Text -> Value Prelude.Text -> UserProperty
 mkUserProperty password username

services/amazonmq/gen/Stratosphere/AmazonMQ/Configuration.hs

@@ -15,6 +15,7 @@ data Configuration
                    engineVersion :: (Value Prelude.Text),
                    name :: (Value Prelude.Text),
                    tags :: (Prelude.Maybe [TagsEntryProperty])}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkConfiguration ::
   Value Prelude.Text
   -> Value Prelude.Text

services/amazonmq/gen/Stratosphere/AmazonMQ/Configuration/TagsEntryProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data TagsEntryProperty
   = TagsEntryProperty {key :: (Value Prelude.Text),
                        value :: (Value Prelude.Text)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkTagsEntryProperty ::
   Value Prelude.Text -> Value Prelude.Text -> TagsEntryProperty
 mkTagsEntryProperty key value

services/amazonmq/gen/Stratosphere/AmazonMQ/ConfigurationAssociation.hs

@@ -11,6 +11,7 @@ import Stratosphere.Value
 data ConfigurationAssociation
   = ConfigurationAssociation {broker :: (Value Prelude.Text),
                               configuration :: ConfigurationIdProperty}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkConfigurationAssociation ::
   Value Prelude.Text
   -> ConfigurationIdProperty -> ConfigurationAssociation

services/amazonmq/gen/Stratosphere/AmazonMQ/ConfigurationAssociation/ConfigurationIdProperty.hs

@@ -9,6 +9,7 @@ import Stratosphere.Value
 data ConfigurationIdProperty
   = ConfigurationIdProperty {id :: (Value Prelude.Text),
                              revision :: (Value Prelude.Integer)}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkConfigurationIdProperty ::
   Value Prelude.Text
   -> Value Prelude.Integer -> ConfigurationIdProperty

services/amplify/gen/Stratosphere/Amplify/App.hs

@@ -27,6 +27,7 @@ data App
          platform :: (Prelude.Maybe (Value Prelude.Text)),
          repository :: (Prelude.Maybe (Value Prelude.Text)),
          tags :: (Prelude.Maybe [Tag])}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkApp :: Value Prelude.Text -> App
 mkApp name
   = App

services/amplify/gen/Stratosphere/Amplify/App/AutoBranchCreationConfigProperty.hs

@@ -21,6 +21,7 @@ data AutoBranchCreationConfigProperty
                                       framework :: (Prelude.Maybe (Value Prelude.Text)),
                                       pullRequestEnvironmentName :: (Prelude.Maybe (Value Prelude.Text)),
                                       stage :: (Prelude.Maybe (Value Prelude.Text))}
+  deriving stock (Prelude.Eq, Prelude.Show)
 mkAutoBranchCreationConfigProperty ::
   AutoBranchCreationConfigProperty
 mkAutoBranchCreationConfigProperty