Expose constructor for TimeInterpreter

Will be needed in order to evaluate Plutus scripts and assign execution units to redeemers. I originally wanted to expose only record accessors, but this isn't working for the 'interpreter' field because of the existential; eras would escape their scope. Hence the full constructor being exposed. Alternatively, we could expose the 'EpochInfo' from this module instead to keep the module's API somewhat sane.
cardano-foundation · Oct 14, 2021 · fadb598 · fadb598
1 parent dd6c6f3
commit fadb598
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/core/src/Cardano/Wallet/Primitive/Slotting.hs b/lib/core/src/Cardano/Wallet/Primitive/Slotting.hs
@@ -42,7 +42,7 @@ module Cardano.Wallet.Primitive.Slotting
     , getCurrentTimeRelativeFromStart
 
       -- ** Running queries
-    , TimeInterpreter
+    , TimeInterpreter (..)
     , mkSingleEraInterpreter
     , mkTimeInterpreter
     , PastHorizonException (..)