RegressionTests__JavaScriptTests.st
changeset 2058 673fc94be6b6
parent 2057 8d9ddf675f25
child 2059 d74b11130b97
equal deleted inserted replaced
2057:8d9ddf675f25 2058:673fc94be6b6
   734     d := JavaScriptParser evaluate:'new Date(100000000000)'.
   734     d := JavaScriptParser evaluate:'new Date(100000000000)'.
   735     self assert:(d year = 1973).
   735     self assert:(d year = 1973).
   736     self assert:(d month = 3).
   736     self assert:(d month = 3).
   737     self assert:(d day = 3).
   737     self assert:(d day = 3).
   738 
   738 
       
   739     d := JavaScriptParser evaluate:'new Date(86400000)'.
       
   740     self assert:(d year = 1970).
       
   741     self assert:(d month = 1).
       
   742     self assert:(d day = 2).
       
   743     self assert:(d hour = 1).
       
   744     self assert:(d minute = 0).
       
   745     self assert:(d second = 0).
       
   746 
   739     "
   747     "
   740      self run:#testDate01
   748      self run:#testDate01
   741      self new testDate01
   749      self new testDate01
   742     "
   750     "
   743 
   751