28 lines
691 B
Haskell
28 lines
691 B
Haskell
module AoCSpec.Y2024Spec (spec) where
|
|
|
|
import AoC
|
|
import Test.Hspec
|
|
|
|
spec :: Spec
|
|
spec = do
|
|
describe "Day 1" do
|
|
it "calculates correctly" do
|
|
runAoC Y2024 D01 `shouldReturn` Right [2580760, 25358365]
|
|
|
|
describe "Day 2" do
|
|
it "calculates correctly" do
|
|
runAoC Y2024 D02 `shouldReturn` Right [332, 398]
|
|
|
|
describe "Day 3" do
|
|
it "calculates correctly" do
|
|
runAoC Y2024 D03 `shouldReturn` Right [185797128, 89798695]
|
|
|
|
{-
|
|
describe "Day 4" do
|
|
it "calculates correctly" do
|
|
runAoC Y2023 D04 `shouldReturn` Right [24542, 8736438]
|
|
|
|
describe "Day 5" do
|
|
it "calculates the example correctly" do
|
|
runAoCExample Y2023 D05 `shouldReturn` Right [35]
|
|
-}
|