Attempt to set up benchmark

2023-08-30 13:30:36 +02:00
parent 5796db3249
commit 69dbc4e001
3 changed files with 38 additions and 7 deletions
--- a/src/Days/D05.hs
+++ b/src/Days/D05.hs
@@ -71,4 +71,7 @@ part2 :: Intermediate -> Vector Char
 part2 = uncurry ((fmap head .) . foldl (move CM9001))

 day :: Day
-day = parsecDay parser (definitive . part1, definitive . part2)
+day = parsecDay parser (definitive . part1, definitive . part2)
+
+fast :: Day
+fast = day
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -30,5 +30,5 @@ days =
    , [D02.day]
    , [D03.day]
    , [D04.day]
-    , [D05.day]
+    , [D05.day, D05.fast]
    ]