Point.st
changeset 1264 8d916aa63bce
parent 1245 c8afea3d5af0
child 1290 15ba3221b89b
--- a/Point.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Point.st	Tue Apr 23 16:04:52 1996 +0200
@@ -136,9 +136,12 @@
 !Point 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 == Point
+
+    "Modified: 23.4.1996 / 16:00:18 / cg"
 ! !
 
 !Point methodsFor:'accessing'!
@@ -855,6 +858,6 @@
 !Point class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.33 1996-04-22 11:02:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.34 1996-04-23 14:03:16 cg Exp $'
 ! !
 Point initialize!