--- a/Behavior.st	Mon Oct 28 15:21:23 1996 +0100
+++ b/Behavior.st	Mon Oct 28 15:22:56 1996 +0100
@@ -2789,6 +2789,18 @@
 %}
 !
 
+isBuiltInClass
+    "return true if this class is known by the run-time-system.
+     Here, false is returned as default.
+     Notice, this is instance protocol, which means that any class
+     other than those special ones) are non-builtIn by default."
+
+    ^ false
+
+    "Modified: 23.4.1996 / 15:55:52 / cg"
+    "Created: 28.10.1996 / 15:10:02 / cg"
+!
+
 isBytes
     "return true, if instances have indexed byte instance variables"
 
@@ -3297,5 +3309,5 @@
 !Behavior class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.87 1996-10-24 15:55:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.88 1996-10-28 14:22:56 cg Exp $'
 ! !