tracks/haskell/exercises/robot-name/test/Tests.hs in trackler-2.1.0.11 vs tracks/haskell/exercises/robot-name/test/Tests.hs in trackler-2.1.0.12
- old
+ new
@@ -1,9 +1,9 @@
{-# OPTIONS_GHC -fno-warn-type-defaults #-}
import Data.Ix (inRange)
-import Test.Hspec (Spec, describe, it, shouldBe, shouldNotBe, shouldSatisfy)
+import Test.Hspec (Spec, it, shouldBe, shouldNotBe, shouldSatisfy)
import Test.Hspec.Runner (configFastFail, defaultConfig, hspecWith)
import Robot (mkRobot, resetName, robotName)
main :: IO ()
@@ -14,10 +14,10 @@
generator. The chances of this kind of failure are very small. A
real "robot generator" would use a proper serial number system and
would likely not be in the business of resetting the name.
-}
specs :: Spec
-specs = describe "robot-name" $ do
+specs = do
let a = ('A', 'Z')
let d = ('0', '9')
let matchesPattern s = length s == 5
&& and (zipWith inRange [a, a, d, d, d] s)