--- a/CodeGeneratorTool.st	Mon Oct 15 22:17:01 2012 +0200
+++ b/CodeGeneratorTool.st	Mon Oct 15 22:17:19 2012 +0200
@@ -273,6 +273,13 @@
     ^ self new createExamplesMethodFor:aClass
 !
 
+createFalseReturnMethodFor:aSelector category:cat in:aClass
+    "add a ^ false method;
+     but only if not already present."
+
+    ^ self new createFalseReturnMethodFor:aSelector category:cat in:aClass
+!
+
 createImageSpecMethodFor:anImage comment:comment in:aClass selector:sel
     ^ self new createImageSpecMethodFor:anImage comment:comment in:aClass selector:sel
 !
@@ -1391,6 +1398,13 @@
     self subclassResponsibility
 !
 
+createFalseReturnMethodFor:aSelector category:cat in:aClass
+    "add a ^false method;
+     but only if not already present."
+
+    self subclassResponsibility
+!
+
 createImageSpecMethodFor:anImage comment:comment in:aClass selector:sel
     self subclassResponsibility
 !
@@ -1688,9 +1702,9 @@
 !CodeGeneratorTool class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.99 2012-08-21 10:26:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.100 2012-10-15 20:17:19 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.99 2012-08-21 10:26:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/CodeGeneratorTool.st,v 1.100 2012-10-15 20:17:19 cg Exp $'
 ! !