From 4e02199e7ed4fbf900112bd37a5de419b73286cc Mon Sep 17 00:00:00 2001 From: joshvera Date: Wed, 21 Feb 2018 18:14:46 -0500 Subject: [PATCH] Add Fail instance to Import --- src/Data/Syntax/Declaration.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Data/Syntax/Declaration.hs b/src/Data/Syntax/Declaration.hs index 9f28357de..081ac4962 100644 --- a/src/Data/Syntax/Declaration.hs +++ b/src/Data/Syntax/Declaration.hs @@ -328,6 +328,7 @@ instance ( Monad m instance MonadFail m => Eval t Type.Type m Import instance (MonadFail m) => E2.Eval t v m Import +instance Member Fail es => E3.Evaluatable es t v Import -- | An imported symbol data ImportSymbol a = ImportSymbol { importSymbolName :: !a, importSymbolAlias :: !a }