ClassDefinitionChange.st
changeset 4444 956cc4bf175d
parent 4334 a261f228181a
child 4483 7de46789b10d
--- a/ClassDefinitionChange.st	Sat Jun 08 17:31:43 2019 +0200
+++ b/ClassDefinitionChange.st	Sat Jun 22 16:05:20 2019 +0200
@@ -313,7 +313,10 @@
 !
 
 superClassName
-    "returns nil, if no superclass"
+    "returns nil, if no superclass.
+     Notice, that squeak returns the string 'nil' in this case;
+     so this might change in the future;
+     in the meantime, senders should be written to accept both nil and 'nil'"
 
     |nm|
 
@@ -324,6 +327,8 @@
         ^ nm copyReplaceAll:$. withAll:'::'.
     ].
     ^ nm
+
+    "Modified (comment): / 22-06-2019 / 16:05:02 / Claus Gittinger"
 !
 
 superClassName:aString