diff options
| author | hallgren <hallgren@chalmers.se> | 2016-04-06 13:46:48 +0000 |
|---|---|---|
| committer | hallgren <hallgren@chalmers.se> | 2016-04-06 13:46:48 +0000 |
| commit | c8b7ebc163d6331b40d06090df00aff633028a81 (patch) | |
| tree | 705fc7dbe879272f1d7e17d20f5805f559e86248 /src | |
| parent | ad22a4d899c7bbff81b437f9f603e88686657cbc (diff) | |
Lexer.x: fix cyclic Functor instance
It looks like I introduced this cyclic definition in August 2014, but since
it isn't used, it hasn't been a problem...
Diffstat (limited to 'src')
| -rw-r--r-- | src/compiler/GF/Grammar/Lexer.x | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GF/Grammar/Lexer.x b/src/compiler/GF/Grammar/Lexer.x index c579b5609..c236b77fa 100644 --- a/src/compiler/GF/Grammar/Lexer.x +++ b/src/compiler/GF/Grammar/Lexer.x @@ -268,7 +268,7 @@ data ParseResult a newtype P a = P { unP :: AlexInput -> ParseResult a } instance Functor P where - fmap = (<$>) + fmap = liftA instance Applicative P where pure = return |