diff --git a/exercises/leap/package.yaml b/exercises/leap/package.yaml index a99794dfc..5364801aa 100644 --- a/exercises/leap/package.yaml +++ b/exercises/leap/package.yaml @@ -1,5 +1,5 @@ name: leap -version: 1.5.1.9 +version: 1.6.0.10 dependencies: - base diff --git a/exercises/leap/test/Tests.hs b/exercises/leap/test/Tests.hs index 471df2226..fb0a245e2 100644 --- a/exercises/leap/test/Tests.hs +++ b/exercises/leap/test/Tests.hs @@ -37,14 +37,26 @@ cases = [ Case { description = "year not divisible by 4 in common year" , input = 1996 , expected = True } + , Case { description = "year divisible by 4 and 5 is still a leap year" + , input = 1960 + , expected = True + } , Case { description = "year divisible by 100, not divisible by 400 in common year" , input = 2100 , expected = False } + , Case { description = "year divisible by 100 but not by 3 is still not a leap year" + , input = 1900 + , expected = False + } , Case { description = "year divisible by 400 in leap year" , input = 2000 , expected = True } + , Case { description = "year divisible by 400 but not by 125 is still a leap year" + , input = 2400 + , expected = True + } , Case { description = "year divisible by 200, not divisible by 400 in common year" , input = 1800 , expected = False