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 Y2024 D04 `shouldReturn` Right [2567, 2029]

  describe "Day 5" do
    it "calculates correctly" do
      runAoC Y2024 D05 `shouldReturn` Right [5452, 4598]

  describe "Day 6" do
    it "calculates correctly" do
      runAoC Y2024 D05 `shouldReturn` Right [5453, 0]