--- a/InlineObject.st	Wed May 09 18:57:35 2018 +0200
+++ b/InlineObject.st	Wed May 09 19:38:23 2018 +0200
@@ -72,6 +72,11 @@
         age: 25.
     }
 
+    #{
+        date:  Date today.
+        time:  Time now.
+    }
+
     All inlineObjects will be instances of an anonymous subclass of me,
     and provide getter protocol for their fields (e.g. firstName, lastName and age in the above example.
     InlineObjects are immutable (no setters).
@@ -929,5 +934,9 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !