--- a/ObjectMemory.st	Fri Aug 28 12:38:51 2009 +0100
+++ b/ObjectMemory.st	Sat Oct 24 16:48:19 2009 +0100
@@ -5161,6 +5161,10 @@
     ^ id
 !
 
+isSingleMethod
+    ^ type == #classObject and:[ libraryName isNil ]    
+!
+
 libraryName
     "return the name of this library. Typically, this is the libraries
      filename without a suffix (such as 'libbasic')"
@@ -5241,7 +5245,12 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Id: ObjectMemory.st 10448 2009-06-14 16:10:51Z vranyj1 $'
+    ^ '$Id: ObjectMemory.st 10473 2009-10-24 15:48:19Z vranyj1 $'
+!
+
+version_CVS
+    ^ '§Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.242 2009/10/14 06:13:29 cg Exp §'
 ! !
 
 ObjectMemory initialize!
+