ExternalAddress.st
changeset 3552 686923fc2096
parent 3487 565a1a49fbf9
child 3957 925e247ae8df
--- a/ExternalAddress.st	Thu Jun 11 16:57:50 1998 +0200
+++ b/ExternalAddress.st	Thu Jun 11 17:13:29 1998 +0200
@@ -103,9 +103,9 @@
     "return true if this class is known by the run-time-system.
      Here, true is returned."
 
-    ^ true
+    ^ self == ExternalAddress
 
-    "Modified: 23.4.1996 / 15:57:53 / cg"
+    "Modified: / 11.6.1998 / 17:12:40 / cg"
 ! !
 
 !ExternalAddress methodsFor:'accessing'!
@@ -193,5 +193,5 @@
 !ExternalAddress class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.12 1998-05-26 15:11:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.13 1998-06-11 15:13:29 cg Exp $'
 ! !