From 3bdd9dc0229d18ecbd5340424d9d01a4f6882ed4 Mon Sep 17 00:00:00 2001 From: Krasimir Angelov Date: Tue, 16 Aug 2022 20:06:51 +0200 Subject: [PATCH] add missing MonadFail constraint for newer GHC --- src/compiler/GF/Command/Commands.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/compiler/GF/Command/Commands.hs b/src/compiler/GF/Command/Commands.hs index 85a9af955..47c71f586 100644 --- a/src/compiler/GF/Command/Commands.hs +++ b/src/compiler/GF/Command/Commands.hs @@ -43,7 +43,7 @@ instance (Monad m,HasPGF m,Fail.MonadFail m) => TypeCheckArg m where (inferExpr pgf e) Nothing -> fail "Import a grammar before using this command" -pgfCommands :: HasPGF m => Map.Map String (CommandInfo m) +pgfCommands :: (HasPGF m, MonadFail m) => Map.Map String (CommandInfo m) pgfCommands = Map.fromList [ ("aw", emptyCommandInfo { longname = "align_words",