summaryrefslogtreecommitdiff
path: root/bench/mark.hs
blob: 82518230ac287d80ddf81f1eb41f9dac1739c8f3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
-- mark.hs: openpgp-asciiarmor benchmark suite
-- Copyright © 2018  Clint Adams
-- This software is released under the terms of the ISC license.
-- (See the LICENSE file).

{-# LANGUAGE FlexibleContexts, OverloadedStrings #-}

import Criterion.Main

import Data.Digest.CRC24

main :: IO ()
main = defaultMain [
  bgroup "crc" [ bench "crc24"  $ whnf crc24 "test"
               ]
                   ]