Behavior.st
changeset 11953 58c0d5d790cc
parent 11578 30909b044a03
child 11958 c0059b845951
--- a/Behavior.st	Wed Sep 16 21:14:02 2009 +0200
+++ b/Behavior.st	Wed Sep 16 21:21:59 2009 +0200
@@ -989,18 +989,35 @@
 !Behavior methodsFor:'Compatibility-Dolphin'!
 
 allSubinstances
+    "Compatibility method - do not use in new code.
+     Same as allSubInstances; added for Dolphin compatibility"
+
     ^ self allSubInstances
 !
 
 fromString:aString
+    "reconstruct an instance of myself from the ascii-store string.
+     These bytes are typically the result from storing into a string/stream.
+     Same as readFrom:, for Dolphin compatibility."
+
     ^ self readFrom:aString
 !
 
 guid:aUUID
-    ^ self
+    "Compatibility method - do not use in new code.
+     An ignored dummy; for Dolphin compatibility."
+
+    "/ intentionally left blank - for now
 !
 
 lookupMethod:selector
+    "Compatibility method - do not use in new code.
+     Return the method for given selector aSelector or nil.
+     Only methods in the receiver - not in the superclass chain are returned.
+     For dolphin compatibility.
+     TODO: fixme if I am wrong, and dolphin does a full lookup here. If that is the case,
+     change to use lookupMethodFor:aSelector below."
+
     ^ self compiledMethodAt:selector
 ! !
 
@@ -1095,7 +1112,6 @@
 ! !
 
 
-
 !Behavior methodsFor:'accessing'!
 
 addSelector:newSelector withMethod:newMethod
@@ -4468,5 +4484,5 @@
 !Behavior class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.285 2009-02-17 10:07:27 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.286 2009-09-16 19:21:59 cg Exp $'
 ! !