--- a/Parser.st	Tue Nov 21 13:15:08 2017 +0100
+++ b/Parser.st	Tue Nov 21 13:15:33 2017 +0100
@@ -1290,7 +1290,7 @@
 !
 
 methodCommentsFromSource:aString
-    "return all of the methods comments.
+    "return all of the method's comments.
      Returns an empty collection if there is no comment."
 
     |comments parser|
@@ -1306,6 +1306,8 @@
      Parser methodCommentsFromSource:(Method compiledMethodAt:#comment) source
      Parser methodCommentsFromSource:(Object class compiledMethodAt:#infoPrinting:) source
     "
+
+    "Modified (comment): / 21-11-2017 / 13:07:31 / cg"
 ! !
 
 !Parser class methodsFor:'parsing'!
@@ -2293,7 +2295,7 @@
 !
 
 parseSelector:aStringOrStream
-    "parse a method's source for the methods selector.
+    "parse a method's source for its selector.
      Return the selector"
 
     self initializeFor:aStringOrStream.
@@ -2310,7 +2312,8 @@
 '
     "
 
-    "Modified: 17.10.1997 / 12:35:46 / cg"
+    "Modified: / 17-10-1997 / 12:35:46 / cg"
+    "Modified (comment): / 21-11-2017 / 13:07:22 / cg"
 ! !
 
 !Parser methodsFor:'Compatibility-Squeak'!
@@ -2352,9 +2355,11 @@
 !
 
 endOfSelectorPosition
-    "return the sourcePosition of the last character of the methods selector spec"
+    "return the sourcePosition of the last character of the method's selector spec"
 
     ^ endOfSelectorPosition
+
+    "Modified (comment): / 21-11-2017 / 13:07:08 / cg"
 !
 
 errorFlag