packages feed

genvalidity-path-1.0.0.0: bench/Main.hs

{-# LANGUAGE TypeApplications #-}

module Main where

import Criterion.Main
import Data.GenValidity.Criterion
import Data.GenValidity.Path ()
import Path

main :: IO ()
main =
  defaultMain
    [ genValidBench @(Path Abs File),
      genValidBench @(Path Rel File),
      genValidBench @(Path Abs Dir),
      genValidBench @(Path Rel Dir)
    ]