From 139883beedb6e1d36fcde1e65cf02172006560df Mon Sep 17 00:00:00 2001 From: KtorZ Date: Mon, 11 Oct 2021 15:21:41 +0200 Subject: [PATCH] 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. --- lib/core/src/Cardano/Wallet/Primitive/Slotting.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/core/src/Cardano/Wallet/Primitive/Slotting.hs b/lib/core/src/Cardano/Wallet/Primitive/Slotting.hs index 0c90e335434..80c07fb5f8f 100644 --- 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 (..)