diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2015-03-30 00:06:40 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2015-03-30 00:06:40 -0700 |
| commit | c2cb64379ec24eadc43d8f4a48bf3b19b4e33624 (patch) | |
| tree | bc727c594b0d7915e838a8e66caeb33d99783c74 /benchmark | |
| parent | ccb828894b6c9aae056a6861c20c4d6807035d9f (diff) | |
benchmark - removed kludge we needed before CommonMark writer.
Diffstat (limited to 'benchmark')
| -rw-r--r-- | benchmark/benchmark-pandoc.hs | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/benchmark/benchmark-pandoc.hs b/benchmark/benchmark-pandoc.hs index 5c0dab460..3fc70331f 100644 --- a/benchmark/benchmark-pandoc.hs +++ b/benchmark/benchmark-pandoc.hs @@ -34,12 +34,7 @@ readerBench doc (name, reader) = let inp = writer def{ writerWrapText = True} doc in return $ bench (name ++ " reader") $ nfIO $ (fmap handleError <$> reader def{ readerSmart = True }) inp - _ | name == "commonmark" -> - let inp = writeMarkdown def{ writerWrapText = True} doc - in return $ bench (name ++ " reader") $ nfIO $ - (fmap handleError <$> reader def{ readerSmart = True }) inp - | otherwise -> trace ("\nCould not find writer for " ++ name ++ - "\n") Nothing + _ -> trace ("\nCould not find writer for " ++ name ++ "\n") Nothing writerBench :: Pandoc -> (String, WriterOptions -> Pandoc -> String) |