tracks/haskell/exercises/triangle/test/Tests.hs in trackler-2.0.6.28 vs tracks/haskell/exercises/triangle/test/Tests.hs in trackler-2.0.6.29
- old
+ new
@@ -23,11 +23,12 @@
test (description, (a, b, c), expected) = it description assertion
where
assertion = triangleType a b c `shouldBe` expected
- -- Test cases adapted from `exercism/x-common/triangle.json` on 2016-08-03.
+ -- Test cases created from old version of `x-common` tests on 2017-01-31,
+ -- diverging from `exercism/x-common/triangle`.
cases = [ ( "equilateral triangle has all sides equal"
, (2, 2, 2)
, Equilateral
)
@@ -51,9 +52,13 @@
, (4, 7, 4)
, Isosceles
)
, ( "scalene triangle has no equal sides"
, (3, 4, 5)
+ , Scalene
+ )
+ , ( "2a == b+c looks like equilateral, but isn't always"
+ , (5, 4, 6)
, Scalene
)
, ( "larger scalene triangle"
, (10, 11, 12)
, Scalene