@@ -13,8 +13,7 @@ readerBench doc (name, reader) =
1313 _ -> error $ "Could not find writer for " ++ name
1414 inp = writer def{ writerWrapText = True } doc
1515 -- we compute the length to force full evaluation
16− getLength (Pandoc (Meta a b c) d) =
17− length a + length b + length c + length d
16+ getLength (Pandoc (Meta _) d) = length d
1817 in bench (name ++ " reader") $ whnfIO $ getLength `fmap`
1918 (reader def{ readerSmart = True }) inp
2019