30 lines
780 B
Haskell
30 lines
780 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 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]
|