genvalidity-case-insensitive-0.0.0.1: bench/Main.hs

{-# LANGUAGE TypeApplications #-}

module Main where

import Criterion.Main
import Data.CaseInsensitive (CI)
import Data.GenValidity.CaseInsensitive ()
import Data.GenValidity.Criterion

main :: IO ()
main =
  defaultMain
    [ genValidBench @(CI String),
      shrinkValidBench @(CI String)
    ]