tracks/haskell/exercises/series/test/Tests.hs in trackler-2.1.0.11 vs tracks/haskell/exercises/series/test/Tests.hs in trackler-2.1.0.12
- old
+ new
@@ -1,19 +1,19 @@
{-# OPTIONS_GHC -fno-warn-type-defaults #-}
{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE OverloadedStrings #-}
import GHC.Exts (toList)
-import Test.Hspec (Spec, describe, it, shouldBe)
+import Test.Hspec (Spec, it, shouldBe)
import Test.Hspec.Runner (configFastFail, defaultConfig, hspecWith)
import Series (slices)
main :: IO ()
main = hspecWith defaultConfig {configFastFail = True} specs
specs :: Spec
-specs = describe "series" $ do
+specs = do
let x `shouldHaveSlices` yss = (map toList . toList) x `shouldBe` yss
it "slices of one" $ do
slices 1 "" `shouldHaveSlices` []