diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-02-20 15:25:47 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-02-20 15:25:47 +0100 |
| commit | 3c427fc17d53a564305aadde015dd2f048d9ff71 (patch) | |
| tree | 26f2b883e1168fe8bf35f396e8c125a15ef7f341 /src | |
| parent | 3ccf3fad2c123ebb32904942ff3e552c2402d63b (diff) | |
| download | pandoc-3c427fc17d53a564305aadde015dd2f048d9ff71.tar.gz | |
Refined constraint for HasQuoteContext instance.
in hopes that this will help the ghc 7.8.4 build...
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Parsing.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs index 400d07f2a..488b75e18 100644 --- a/src/Text/Pandoc/Parsing.hs +++ b/src/Text/Pandoc/Parsing.hs @@ -960,7 +960,7 @@ class HasQuoteContext st m where getQuoteContext :: (Stream s m t) => ParsecT s st m QuoteContext withQuoteContext :: QuoteContext -> ParsecT s st m a -> ParsecT s st m a -instance Monad m => HasQuoteContext ParserState m where +instance PandocMonad m => HasQuoteContext ParserState m where getQuoteContext = stateQuoteContext <$> getState withQuoteContext context parser = do oldState <- getState |