small style fixes

This commit is contained in:
Julien Dessaux 2023-03-19 14:49:16 +01:00
parent d7756f3724
commit 6bb7ccb654
Signed by: adyxax
GPG key ID: F92E51B86E07177E
3 changed files with 3 additions and 3 deletions

View file

@ -75,6 +75,6 @@ main = do
when (exampleOutput /= exampleExpectedOutput) (die $ "example failed: got " ++ show exampleOutput ++ " instead of " ++ show exampleExpectedOutput)
example2 <- parseInput "example2"
let exampleOutput2 = compute example2
when (exampleOutput2 /= exampleExpectedOutput2) (die $ "example2 failed: got " ++ show exampleOutput ++ " instead of " ++ show exampleExpectedOutput)
when (exampleOutput2 /= exampleExpectedOutput2) (die $ "example2 failed: got " ++ show exampleOutput2 ++ " instead of " ++ show exampleExpectedOutput2)
input <- parseInput "input"
print $ compute input