From c2cb64379ec24eadc43d8f4a48bf3b19b4e33624 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Mon, 30 Mar 2015 00:06:40 -0700
Subject: benchmark - removed kludge we needed before CommonMark writer.

---
 benchmark/benchmark-pandoc.hs | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

(limited to 'benchmark')

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)
-- 
cgit v1.2.3