Shorten test name for cleaner CLI output

This commit is contained in:
George Thomas 2025-12-05 13:49:04 +00:00
parent e6bf315716
commit 7ba96ee3e5

View File

@ -47,7 +47,7 @@ puzzle =
goldenVsString (show n) (path <> "frames/" <> show n) $
encodeUtf8 . maybe "frame list too short!" drawGrid . Seq.lookup n <$> frames
)
<> [ testCase "nothing accessible in last frame" do
<> [ testCase "end" do
Just g <- Seq.lookup nFrames <$> frames
assertBool "accessible tile found" $ noneAccessible g
]