--- a/Parser.st	Tue Jun 25 11:19:26 2019 +0200
+++ b/Parser.st	Tue Jun 25 11:19:34 2019 +0200
@@ -601,14 +601,16 @@
 !
 
 allowReservedWordsAsSelectors
-    "return true, if self, super, thisContext, nil, true and false are to be allowed
+    "if true, 'self', 'super', 'thisContext', 'nil', 'true' and 'false' are allowed
      as unary message selectors."
 
     ^ ParserFlags allowReservedWordsAsSelectors
+
+    "Modified (format): / 25-06-2019 / 11:17:09 / Claus Gittinger"
 !
 
 allowReservedWordsAsSelectors:aBoolean
-    "enable/disable, if self, super, thisContext, nil, true and false are to be allowed
+    "enable/disable, if 'self', 'super', 'thisContext', 'nil', 'true' and 'false' are to be allowed
      as unary message selectors."
 
     ParserFlags allowReservedWordsAsSelectors:aBoolean.
@@ -618,6 +620,8 @@
      self allowReservedWordsAsSelectors:true
      self allowReservedWordsAsSelectors:false
     "
+
+    "Modified (comment): / 25-06-2019 / 11:17:52 / Claus Gittinger"
 !
 
 arraysAreImmutable
@@ -5559,6 +5563,7 @@
     selector := aParser selector.
 ! !
 
+
 !Parser methodsFor:'obsolete'!
 
 correctByDeleting