GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-14 21:52:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

Fix syntax error problem for older versions of GHC

Browse Source
This commit is contained in:
Andreas Källberg
2020-10-08 17:41:44 +02:00
parent 670a58e7e7
commit f2e4b89a22
1 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/compiler/GF/Grammar/Lexer.x
View File

@@ -285,6 +285,10 @@ instance Monad P where
POk s a -> unP (k a) s POk s a -> unP (k a) s
PFailed posn err -> PFailed posn err PFailed posn err -> PFailed posn err
#if !(MIN_VERSION_base(4,13,0))
-- Monad(fail) will be removed in GHC 8.8+
fail = Fail.fail
#endif
instance Fail.MonadFail P where instance Fail.MonadFail P where
fail msg = P $ \(_,AI posn _ _) -> PFailed posn msg fail msg = P $ \(_,AI posn _ _) -> PFailed posn msg