Commits

tibbe committed f7a6b5c

More scan benchmarks

  • Participants
  • Parent commits 2d7a605

Comments (0)

Files changed (1)

File benchmarks/Benchmarks.hs

      , bench "isAlpha_iso8859_15" $ nf (ABL.parse (AC.takeWhile AC.isAlpha_iso8859_15)) bl
      ]
    , bench "word32LE" $ nf (AB.parse word32LE) b
-   , bench "scan" $ nf (AB.parse quotedString) b
+   , bgroup "scan" [
+       bench "short" $ nf (AB.parse quotedString) (BC.pack "abcdefghijk\"")
+     , bench "long" $ nf (AB.parse quotedString) b
+     ]
    ]
 
 -- Benchmarks bind and (potential) bounds-check merging.