Mercurial Mercurial > hg > stx-goodies-regression / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: RegressionTests::TimeAndDateTest
authorClaus Gittinger <cg@exept.de>
Mon, 10 Nov 2014 19:03:52 +0100
changeset 1233 c72fec37a673
parent 1232 01e685de57e3
child 1234 920a33e66069
class: RegressionTests::TimeAndDateTest added: #test_15_misc
RegressionTests__TimeAndDateTest.st file | annotate | diff | comparison | revisions 
--- a/RegressionTests__TimeAndDateTest.st	Mon Nov 10 18:07:48 2014 +0100
+++ b/RegressionTests__TimeAndDateTest.st	Mon Nov 10 19:03:52 2014 +0100
@@ -688,6 +688,19 @@
     "
      self new test_14_arithmetic         
     "
+!
+
+test_15_misc
+    #( 1700  1800  1900  2100  2200 ) do:[:y |
+        self assert:(Date leapYear:y) not
+    ].
+    #( 1600  2000 2400 ) do:[:y |
+        self assert:(Date leapYear:y) 
+    ].
+
+    "
+     self new test_15_misc         
+    "
 ! !
 
 !TimeAndDateTest class methodsFor:'documentation'!
hg/stx-goodies-regression