Merge pull request #265 from input-output-hk/newhoggy/organise-eon-re…

…-exports Organise eon re-exports. Export `MaryEraOnwards`
IntersectMBO · Sep 23, 2023 · db67e88 · db67e88
2 parents fc48ece + 754c4ad
commit db67e88
Showing 1 changed file with 47 additions and 27 deletions.
diff --git a/cardano-api/src/Cardano/Api.hs b/cardano-api/src/Cardano/Api.hs
@@ -42,7 +42,10 @@ module Cardano.Api (
     asFeaturedInEra,
     asFeaturedInShelleyBasedEra,
 
-    -- * Features
+    -- * Eons
+
+    -- ** From Byron
+
     ByronEraOnly(..),
     AnyByronEraOnly(..),
     byronEraOnlyConstraints,
@@ -66,65 +69,81 @@ module Cardano.Api (
     byronToAlonzoEraConstraints,
     byronToAlonzoEraToCardanoEra,
 
-    ShelleyToBabbageEra(..),
-    AnyShelleyToBabbageEra(..),
-    shelleyToBabbageEraConstraints,
-    shelleyToBabbageEraToCardanoEra,
-    shelleyToBabbageEraToShelleyBasedEra,
+    -- ** From Shelley
 
     ShelleyToAllegraEra(..),
     AnyShelleyToAllegraEra(..),
     shelleyToAllegraEraConstraints,
     shelleyToAllegraEraToCardanoEra,
     shelleyToAllegraEraToShelleyBasedEra,
 
+    ShelleyToMaryEra(..),
+    AnyShelleyToMaryEra(..),
+    shelleyToMaryEraConstraints,
+    shelleyToMaryEraToCardanoEra,
+    shelleyToMaryEraToShelleyBasedEra,
+
     ShelleyToAlonzoEra(..),
     AnyShelleyToAlonzoEra(..),
     shelleyToAlonzoEraConstraints,
     shelleyToAlonzoEraToCardanoEra,
     shelleyToAlonzoEraToShelleyBasedEra,
 
-    ShelleyToMaryEra(..),
-    AnyShelleyToMaryEra(..),
-    shelleyToMaryEraConstraints,
-    shelleyToMaryEraToCardanoEra,
-    shelleyToMaryEraToShelleyBasedEra,
+    ShelleyToBabbageEra(..),
+    AnyShelleyToBabbageEra(..),
+    shelleyToBabbageEraConstraints,
+    shelleyToBabbageEraToCardanoEra,
+    shelleyToBabbageEraToShelleyBasedEra,
 
-    AlonzoEraOnwards(..),
-    AnyAlonzoEraOnwards(..),
-    alonzoEraOnwardsConstraints,
-    alonzoEraOnwardsToCardanoEra,
-    alonzoEraOnwardsToShelleyBasedEra,
+    ShelleyBasedEra(..),
+    IsShelleyBasedEra(..),
+    AnyShelleyBasedEra(..),
+    InAnyShelleyBasedEra(..),
+    CardanoEraStyle(..),
+    cardanoEraStyle,
+    shelleyBasedToCardanoEra,
+    shelleyBasedEraConstraints,
+    withShelleyBasedEraConstraintsForLedger,
+
+    -- ** From Allegra
+
+    -- ** From Mary
+    MaryEraOnwards(..),
+    AnyMaryEraOnwards(..),
+    maryEraOnwardsConstraints,
+    maryEraOnwardsToCardanoEra,
+    maryEraOnwardsToShelleyBasedEra,
+
+    -- ** From Alonzo
 
     AlonzoEraOnly(..),
     AnyAlonzoEraOnly(..),
     alonzoEraOnlyConstraints,
     alonzoEraOnlyToCardanoEra,
     alonzoEraOnlyToShelleyBasedEra,
 
+    AlonzoEraOnwards(..),
+    AnyAlonzoEraOnwards(..),
+    alonzoEraOnwardsConstraints,
+    alonzoEraOnwardsToCardanoEra,
+    alonzoEraOnwardsToShelleyBasedEra,
+
+    -- ** From Babbage
+
     BabbageEraOnwards(..),
     AnyBabbageEraOnwards(..),
     babbageEraOnwardsConstraints,
     babbageEraOnwardsToCardanoEra,
     babbageEraOnwardsToShelleyBasedEra,
 
+    -- ** From Conway
+
     ConwayEraOnwards(..),
     AnyConwayEraOnwards(..),
     conwayEraOnwardsConstraints,
     conwayEraOnwardsToCardanoEra,
     conwayEraOnwardsToShelleyBasedEra,
 
-    -- ** Shelley-based eras
-    ShelleyBasedEra(..),
-    IsShelleyBasedEra(..),
-    AnyShelleyBasedEra(..),
-    InAnyShelleyBasedEra(..),
-    CardanoEraStyle(..),
-    cardanoEraStyle,
-    shelleyBasedToCardanoEra,
-    shelleyBasedEraConstraints,
-    withShelleyBasedEraConstraintsForLedger,
-
     -- * Era case handling
 
     -- ** Case on CardanoEra
@@ -1027,6 +1046,7 @@ import           Cardano.Api.Eon.ByronToAllegraEra
 import           Cardano.Api.Eon.ByronToAlonzoEra
 import           Cardano.Api.Eon.ByronToMaryEra
 import           Cardano.Api.Eon.ConwayEraOnwards
+import           Cardano.Api.Eon.MaryEraOnwards
 import           Cardano.Api.Eon.ShelleyBasedEra
 import           Cardano.Api.Eon.ShelleyToAllegraEra
 import           Cardano.Api.Eon.ShelleyToAlonzoEra