diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2011-01-22 16:04:32 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2011-01-22 16:04:32 -0800 |
| commit | a74010a051e4cd3fee7ebfb4a632d52bb32de61d (patch) | |
| tree | 016cf415e4bbf57fdb5de1fa4fc95b054436a35b /src/Text/Pandoc | |
| parent | a6d7d88b0fb3e2ca739b173f8fdac9e1f91cb14f (diff) | |
| download | pandoc-a74010a051e4cd3fee7ebfb4a632d52bb32de61d.tar.gz | |
Markdown reader: slight speedup by moving whitespace parser.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Markdown.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs index 30106e1ba..0334cf8f4 100644 --- a/src/Text/Pandoc/Readers/Markdown.hs +++ b/src/Text/Pandoc/Readers/Markdown.hs @@ -895,8 +895,8 @@ inline :: GenParser Char ParserState Inline inline = choice inlineParsers <?> "inline" inlineParsers :: [GenParser Char ParserState Inline] -inlineParsers = [ str - , whitespace +inlineParsers = [ whitespace + , str , endline , code , (fourOrMore '*' <|> fourOrMore '_') |