minor cosmetic corrections

This commit is contained in:
mrkkrp 2015-10-30 14:03:19 +06:00
parent 503a1db4be
commit e374a7cc6a

View File

@ -1,6 +1,6 @@
-- -*- Mode: Haskell; -*- -- -*- Mode: Haskell; -*-
-- --
-- Criterion benchmarks for Megaparsec, main module. -- Criterion benchmarks for Megaparsec.
-- --
-- Copyright © 2015 Megaparsec contributors -- Copyright © 2015 Megaparsec contributors
-- --
@ -78,11 +78,12 @@ import Data.ByteString.Lazy.Char8 (pack)
#endif #endif
-- benchSteps and benchSize control the benchmark test points -- benchSteps and benchSize control the benchmark test points
benchSteps :: Int benchSteps :: Int
#if BENCHMARK_STEPS #if BENCHMARK_STEPS
benchSteps = BENCHMARK_STEPS benchSteps = BENCHMARK_STEPS
#else #else
benchSteps = 5 benchSteps = 5
#endif #endif
benchSize :: Int benchSize :: Int
#if BENCHMARK_SIZE #if BENCHMARK_SIZE
@ -93,7 +94,6 @@ benchSize = 1000
-- End of configuration parameters -- End of configuration parameters
main :: IO () main :: IO ()
main = defaultMain benchmarks main = defaultMain benchmarks