diff options
author | Clint Adams <clint@debian.org> | 2018-03-28 21:28:55 -0400 |
---|---|---|
committer | Clint Adams <clint@debian.org> | 2018-03-28 21:28:55 -0400 |
commit | d2606ed73301db7ab353a49d54d8fa2330000dcb (patch) | |
tree | 915a26acb73243af7914b7c0075540dcf356a61d /bench | |
parent | 48db4d9b2692d3d1b964234256f7b0f95781252f (diff) |
Add benchmark
Diffstat (limited to 'bench')
-rw-r--r-- | bench/mark.hs | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/bench/mark.hs b/bench/mark.hs new file mode 100644 index 0000000..8251823 --- /dev/null +++ b/bench/mark.hs | |||
@@ -0,0 +1,16 @@ | |||
1 | -- mark.hs: openpgp-asciiarmor benchmark suite | ||
2 | -- Copyright © 2018 Clint Adams | ||
3 | -- This software is released under the terms of the ISC license. | ||
4 | -- (See the LICENSE file). | ||
5 | |||
6 | {-# LANGUAGE FlexibleContexts, OverloadedStrings #-} | ||
7 | |||
8 | import Criterion.Main | ||
9 | |||
10 | import Data.Digest.CRC24 | ||
11 | |||
12 | main :: IO () | ||
13 | main = defaultMain [ | ||
14 | bgroup "crc" [ bench "crc24" $ whnf crc24 "test" | ||
15 | ] | ||
16 | ] | ||