--- a/Method.st	Wed Aug 01 18:12:06 2018 +0200
+++ b/Method.st	Wed Aug 01 22:41:31 2018 +0200
@@ -1070,6 +1070,7 @@
     "Modified (format): / 18-11-2011 / 14:47:06 / cg"
 ! !
 
+
 !Method methodsFor:'accessing-visibility'!
 
 isIgnored
@@ -2708,19 +2709,6 @@
     "Modified (comment): / 25-09-2012 / 12:01:32 / cg"
 !
 
-isAbstract
-    "true if I send any of the subclassResponsibility messages"
-    
-    ^ self 
-        sendsAnySelector:#( 
-            #subclassResponsibility #subclassResponsibility: 
-            #implementedBySubclass  "/ ST/V code uses this
-            #shouldNotImplement    
-        ).
-
-    "Created: / 16-07-2017 / 11:25:54 / cg"
-!
-
 isDocumentationMethod
     "Return true, if this is a documentation only (only a comment) method
      (implies being a metaclass method)"
@@ -3210,7 +3198,9 @@
                 LastParseTreeCache isNil ifTrue:[
                     LastParseTreeCache := CacheDictionary new:500.
                 ].
-                LastParseTreeCache at:self put:(ParserCacheEntry new method:self parser:parser).
+                LastParseTreeCache 
+                    at:self 
+                    put:(ParserCacheEntry new method:self parser:parser).
             ].
         ].
         ^ parser perform:accessSelector
@@ -3226,6 +3216,7 @@
 
     "Modified: / 26-02-2017 / 12:05:50 / cg"
     "Modified: / 12-04-2018 / 08:51:07 / stefan"
+    "Modified (format): / 01-08-2018 / 22:24:59 / Claus Gittinger"
 !
 
 parseAnnotations
@@ -3833,6 +3824,7 @@
     "Created: / 23-07-2012 / 11:16:36 / cg"
 ! !
 
+
 !Method methodsFor:'source management'!
 
 revisionInfo