diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2023-12-10 09:53:40 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2023-12-10 09:53:40 -0800 |
| commit | 61314a02dffa96a31361f33dda96b95ed603c131 (patch) | |
| tree | 7e71402d19ce11de2e6509eabd65eedbaef5cd72 /benchmark | |
| parent | 3be253fb90deb8ca746156a3b281e5983fc6e8cf (diff) | |
Benchmark: use standalone documents for reader tests.
Otherwise typst reader test fails.
Note: this means that we are now parsing longer documents,
so bench results on readers won't be comparable to before.
Diffstat (limited to 'benchmark')
| -rw-r--r-- | benchmark/benchmark-pandoc.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/benchmark/benchmark-pandoc.hs b/benchmark/benchmark-pandoc.hs index ff2a334ba..590db542d 100644 --- a/benchmark/benchmark-pandoc.hs +++ b/benchmark/benchmark-pandoc.hs @@ -39,14 +39,15 @@ readerBench doc name = either (const Nothing) Just $ runPure $ do (rdr, rexts) <- getReader $ FlavoredFormat name mempty (wtr, wexts) <- getWriter $ FlavoredFormat name mempty + tmpl <- Just <$> compileDefaultTemplate name case (rdr, wtr) of (TextReader r, TextWriter w) -> do inp <- w def{ writerWrapText = WrapAuto - , writerExtensions = wexts } doc + , writerExtensions = wexts + , writerTemplate = tmpl } doc return $ bench (T.unpack name) $ nf (either (error . show) id . runPure . r def) inp (ByteStringReader r, ByteStringWriter w) -> do - tmpl <- Just <$> compileDefaultTemplate name inp <- w def{ writerWrapText = WrapAuto , writerExtensions = wexts , writerTemplate = tmpl } doc |
