summaryrefslogtreecommitdiff
path: root/benchmark/benchmark-pandoc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2012-07-26 10:02:00 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2012-07-26 10:02:00 -0700
commit1de26d0857fab0e02f560bddf4c9d28a9fd1c876 (patch)
tree5f8c2f9aee20b46df08ea9da7fcdf11a477e046a /benchmark/benchmark-pandoc.hs
parent50f2641f631859c601094fd1c957aefe4628b89a (diff)
Added type signature.
Diffstat (limited to 'benchmark/benchmark-pandoc.hs')
-rw-r--r--benchmark/benchmark-pandoc.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/benchmark/benchmark-pandoc.hs b/benchmark/benchmark-pandoc.hs
index 653e12634..9e28dd30f 100644
--- a/benchmark/benchmark-pandoc.hs
+++ b/benchmark/benchmark-pandoc.hs
@@ -35,6 +35,7 @@ normalizeBench doc = [ bench "normalize - with" $ nf (encodeJSON . normalize) do
, bench "normalize - without" $ nf encodeJSON doc
]
+main :: IO ()
main = do
inp <- readDataFile (Just ".") "README"
let opts = def{ readerSmart = True }