--- a/RegressionTests__JavaScriptTests.st	Fri Dec 14 19:45:46 2018 +0100
+++ b/RegressionTests__JavaScriptTests.st	Fri Dec 14 19:47:58 2018 +0100
@@ -736,6 +736,14 @@
     self assert:(d month = 3).
     self assert:(d day = 3).
 
+    d := JavaScriptParser evaluate:'new Date(86400000)'.
+    self assert:(d year = 1970).
+    self assert:(d month = 1).
+    self assert:(d day = 2).
+    self assert:(d hour = 1).
+    self assert:(d minute = 0).
+    self assert:(d second = 0).
+
     "
      self run:#testDate01
      self new testDate01