From f77957a9d97f964f18a4896beb878669244fbcec Mon Sep 17 00:00:00 2001 From: Hans-Peter Deifel <hpd@hpdeifel.de> Date: Thu, 21 Mar 2019 19:25:15 +0100 Subject: [PATCH] bench: Add benchmark for hex parser --- bench/Copar/Parser/BenchLexer.hs | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/bench/Copar/Parser/BenchLexer.hs b/bench/Copar/Parser/BenchLexer.hs index 53c3ecc..bb891c7 100644 --- a/bench/Copar/Parser/BenchLexer.hs +++ b/bench/Copar/Parser/BenchLexer.hs @@ -16,6 +16,7 @@ benchmarks = bgroup "Copar.Parser.Lexer" [ benchColon , benchDecimal , benchFloat + , benchHex , benchName , benchWhitespace ] @@ -40,6 +41,12 @@ benchFloat = bgroup "float" , benchp @Double "signed" (L.signed L.float) "2.87182364" ] +benchHex :: Benchmark +benchHex = bgroup "hex" + [ benchp @Int "single" L.hex "0x1" + , benchp @Int "many" L.hex "0x123456789ABCDEF" + ] + benchName :: Benchmark benchName = bgroup "name" [ benchp "one letter" L.name "a" -- GitLab