gregorycollins

{-# LANGUAGE OverloadedStrings, MagicHash, UnboxedTuples, BangPatterns #-}

import           Control.Monad          (replicateM_)
import           Criterion.Main         (defaultMain, bench, whnfIO)
import qualified Data.ByteString        as S
import qualified Data.ByteString.Char8  as S8
import           Data.ByteString.Unsafe (unsafePackAddressLen, unsafeUseAsCStringLen)
import qualified Data.Char
import           Data.Char              (ord)
import qualified Data.Word8