--- a/JavaClass.st Thu Sep 12 23:44:37 2013 +0200
+++ b/JavaClass.st Thu Sep 12 23:47:35 2013 +0200
@@ -2276,6 +2276,12 @@
"Created: / 5.11.1998 / 23:04:50 / cg"
!
+canCacheReferences
+ ^ self versions isNil or: [ self versions isEmpty ].
+
+ "Created: / 10-09-2013 / 00:07:40 / Marcel Hlopko <marcel.hlopko@fit.cvut.cz>"
+!
+
canHaveExtensions
^false
@@ -2863,7 +2869,7 @@
"
(self versions isNil and: [ aJavaClass versions isNil ]) ifTrue: [
-|versions|
+ |versions|
versions := WeakArray with: self with: aJavaClass.
versions addDependent: JavaClass::JavaClassVersionDiedHandler new.
self versions: versions.
@@ -2883,6 +2889,7 @@
self error: 'merge of two classes both of which have multiple versions not supported'.
"Created: / 14-04-2013 / 13:44:03 / Marcel Hlopko <marcel.hlopko@fit.cvut.cz>"
+ "Modified (format): / 09-09-2013 / 23:27:18 / Marcel Hlopko <marcel.hlopko@fit.cvut.cz>"
! !
!JavaClass::JavaClassVersionDiedHandler class methodsFor:'documentation'!