1
1
mirror of https://github.com/thma/WhyHaskellMatters.git synced 2024-11-22 03:26:24 +03:00

fix test case

This commit is contained in:
Mahler, Thomas 2020-04-06 09:24:53 +02:00
parent 7376324e2c
commit a9190efcaa

View File

@ -15,7 +15,6 @@ spec =
it "can handle user defined controll structures" $
cond [(False, viciousCircle),
(True, 3),
(True, 5),
(False, viciousCircle)] `shouldBe` [3,5]
(False, viciousCircle)] `shouldBe` 3
it "can build trees" $
show (Node (Leaf 1) (Node (Leaf 2) (Leaf 3))) `shouldBe` "Node (Leaf 1) (Node (Leaf 2) (Leaf 3))"