Add Era module to Mary testlib

Author: Lucsanszky

eras/mary/impl/CHANGELOG.md

@@ -8,6 +8,10 @@
 * Expose constructor `MkMaryTxBody`
 * Add default implementation for `mintValueTxBodyF`
 
+### `testlib`
+
+* Added `Era` module with `MaryEraTest` class
+
 ## 1.8.0.0
 
 * Add `DecCBOR` instance for `MaryTxBody`

eras/mary/impl/cardano-ledger-mary.cabal

@@ -100,6 +100,7 @@ library testlib
     Test.Cardano.Ledger.Mary.Binary.Annotator
     Test.Cardano.Ledger.Mary.Binary.Cddl
     Test.Cardano.Ledger.Mary.CDDL
+    Test.Cardano.Ledger.Mary.Era
     Test.Cardano.Ledger.Mary.Imp
     Test.Cardano.Ledger.Mary.Imp.UtxoSpec
     Test.Cardano.Ledger.Mary.ImpTest

eras/mary/impl/testlib/Test/Cardano/Ledger/Mary/Era.hs

@@ -0,0 +1,27 @@
+{-# LANGUAGE UndecidableSuperClasses #-}
+{-# OPTIONS_GHC -Wno-orphans #-}
+
+module Test.Cardano.Ledger.Mary.Era (
+  module Test.Cardano.Ledger.Allegra.Era,
+  MaryEraTest,
+) where
+
+import Cardano.Ledger.Mary
+import Cardano.Ledger.Mary.Core
+import Test.Cardano.Ledger.Allegra.Era
+import Test.Cardano.Ledger.Mary.Arbitrary ()
+import Test.Cardano.Ledger.Mary.TreeDiff ()
+
+class
+  ( AllegraEraTest era
+  , MaryEraTxBody era
+  ) =>
+  MaryEraTest era
+
+instance EraTest MaryEra
+
+instance ShelleyEraTest MaryEra
+
+instance AllegraEraTest MaryEra
+
+instance MaryEraTest MaryEra