module Main (main) where import Test.Hspec import Day1 import Day2 main :: IO () main = do day1in <- readFile "test/1.testcase" day2in <- readFile "test/2.testcase" hspec $ do describe "Day1" $ do it "solves part 1" $ do Day1.part1 day1in `shouldBe` "11" it "solves part 2" $ do Day1.part2 day1in `shouldBe` "31" describe "Day 2" $ do it "solves part 1" $ do Day2.part1 day2in `shouldBe` "2" it "solves part 2" $ do Day2.part2 day2in `shouldBe` "4"