tracks/haskell/exercises/meetup/test/Tests.hs in trackler-2.1.0.9 vs tracks/haskell/exercises/meetup/test/Tests.hs in trackler-2.1.0.10
- old
+ new
@@ -19,11 +19,9 @@
where
assertion = returnedDay `shouldBe` expectedDay
returnedDay = meetupDay week dayofweek year month
expectedDay = fromGregorian year month dayofmonth
--- Test cases adapted from `exercism/x-common/meetup.json` on 2016-07-26.
-
data Case = Case { description :: String
, year :: Integer
, month :: Int
, week :: Schedule
, dayofweek :: Weekday