--- a/Behavior.st	Tue Apr 23 16:32:13 1996 +0200
+++ b/Behavior.st	Tue Apr 23 16:38:38 1996 +0200
@@ -575,11 +575,12 @@
 !Behavior class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ (self == Behavior class) or:[self == Behavior]
 
-    "Modified: 15.4.1996 / 17:14:39 / cg"
+    "Modified: 23.4.1996 / 15:55:52 / cg"
 ! !
 
 !Behavior methodsFor:'accessing'!
@@ -3187,5 +3188,5 @@
 !Behavior class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.70 1996-04-23 07:31:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.71 1996-04-23 14:36:26 cg Exp $'
 ! !