2019-01-04 17:43:53 +00:00
|
|
|
{- git-annex benchmark data types.
|
|
|
|
-
|
|
|
|
- Copyright 2019 Joey Hess <id@joeyh.name>
|
|
|
|
-
|
2019-03-13 19:48:14 +00:00
|
|
|
- Licensed under the GNU AGPL version 3 or higher.
|
2019-01-04 17:43:53 +00:00
|
|
|
-}
|
|
|
|
|
2019-10-29 19:16:15 +00:00
|
|
|
{-# LANGUAGE CPP #-}
|
|
|
|
|
2019-01-04 17:43:53 +00:00
|
|
|
module Types.Benchmark where
|
|
|
|
|
|
|
|
import Annex
|
|
|
|
import Types.Command
|
2019-10-29 19:16:15 +00:00
|
|
|
#ifdef WITH_BENCHMARK
|
|
|
|
import Criterion.Main.Options (Mode)
|
|
|
|
#endif
|
2019-01-04 17:43:53 +00:00
|
|
|
|
|
|
|
type BenchmarkGenerator = [String] -> Annex (IO ())
|
|
|
|
|
|
|
|
type MkBenchmarkGenerator = [Command] -> BenchmarkGenerator
|
2019-10-29 19:16:15 +00:00
|
|
|
|
|
|
|
#ifdef WITH_BENCHMARK
|
|
|
|
type CriterionMode = Mode
|
|
|
|
#else
|
|
|
|
type CriterionMode = ()
|
|
|
|
#endif
|