s/BenchmarkReportJSON.st
changeset 89 b37be3ddfeed
parent 88 7939ec1b572b
child 90 af50db15da25
--- a/s/BenchmarkReportJSON.st	Sat Jun 22 23:19:56 2013 +0100
+++ b/s/BenchmarkReportJSON.st	Sun Jun 23 00:58:30 2013 +0100
@@ -20,14 +20,16 @@
 !BenchmarkReportJSON methodsFor:'writing'!
 
 write
-    json writeDictionaryWith:[  
+    json writeDictionaryWith:[ 
+        json writeKey: 'timestamp' value: result timestamp printISO8601.
+        json writeElementSeparator.
         json writeKey: 'configuration' valueWith: [ self writeConfiguration ].
         json writeElementSeparator.
         json writeKey: 'outcomes' valueWith: [ self writeOutcomes ]
     ].
 
     "Created: / 12-06-2013 / 14:03:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-06-2013 / 23:11:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 23-06-2013 / 00:54:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 writeBenchmark: benchmark