Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Sort configIds and benchmark names in manifest output

  • Loading branch information...
commit 20670dd63925b9001d9ca5cdd5e3b9c45f86470d 1 parent 288a8f4
@dmpots authored
Showing with 4 additions and 2 deletions.
  1. +4 −2 tools/fibon-run/Fibon/Run/Manifest.hs
View
6 tools/fibon-run/Fibon/Run/Manifest.hs
@@ -5,6 +5,7 @@ module Fibon.Run.Manifest (
)
where
+import Data.Function
import Data.List
import Fibon.Benchmarks
import Fibon.Run.Config
@@ -12,10 +13,11 @@ import Fibon.Run.Config.Default as Default
import Fibon.Run.Config.Local as Local
configManifest :: [RunConfig]
-configManifest = Default.config : Local.configs
+configManifest = order $ Default.config : Local.configs
+ where order = sortBy (compare `on` configId)
groupManifest :: [FibonGroup]
groupManifest = (nub . sort . map benchGroup) benchmarkManifest
benchmarkManifest :: [FibonBenchmark]
-benchmarkManifest = allBenchmarks
+benchmarkManifest = sort allBenchmarks
Please sign in to comment.
Something went wrong with that request. Please try again.