tracks/haskell/exercises/zipper/test/Tests.hs in trackler-2.1.0.9 vs tracks/haskell/exercises/zipper/test/Tests.hs in trackler-2.1.0.10

- old
+ new

@@ -19,12 +19,9 @@ main = hspecWith defaultConfig {configFastFail = True} specs specs :: Spec specs = describe "zipper" $ do - -- As of 2016-09-27, there was no reference file - -- for the test cases in `exercism/x-common`. - let leaf v = node v Nothing Nothing node v l r = Just (BT v l r :: BinTree Int) t1 = BT 1 (node 2 Nothing $ leaf 3) $ leaf 4 t2 = BT 1 (node 5 Nothing $ leaf 3) $ leaf 4 t3 = BT 1 (node 2 (leaf 5) $ leaf 3) $ leaf 4