--- a/CodeGeneratorTool.st	Thu Sep 13 14:35:21 2018 +0200
+++ b/CodeGeneratorTool.st	Thu Sep 13 14:35:32 2018 +0200
@@ -119,6 +119,14 @@
     ^ self new createIsAbstractMethodIn:aClass
 !
 
+createIsObsoleteMethodIn:aClass
+    "create a #isABstract query method (I'm tired of typing)"
+
+    ^ self new createIsObsoleteMethodIn:aClass
+
+    "Created: / 13-09-2018 / 14:34:06 / Claus Gittinger"
+!
+
 createParametrizedInstanceCreationMethodsNamed:selector in:aClass
     "create a #selector instance creation method (I'm tired of typing)"
 
@@ -1155,6 +1163,14 @@
     self subclassResponsibility
 !
 
+createIsObsoleteMethodIn:aClass
+    "create a #isObsolete query method (I'm tired of typing)"
+
+    self subclassResponsibility
+
+    "Created: / 13-09-2018 / 14:33:59 / Claus Gittinger"
+!
+
 createParametrizedInstanceCreationMethodsNamed:selector in:aClass
     "create a #selector instance creation method (I'm tired of typing)"