--- a/JavaRuntimeConstantPoolTests.st Sat Nov 17 20:41:00 2012 +0000
+++ b/JavaRuntimeConstantPoolTests.st Sat Nov 17 20:43:46 2012 +0000
@@ -91,6 +91,17 @@
"Created: / 12-04-2012 / 10:16:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
!
+_testInvalidateAll
+ | cp |
+ cp := self getPrettyBigConstantPool.
+ cp do: [:each | each isJavaRef ifTrue: [ each resolve ] ].
+ cp do: [:each | each isJavaRef ifTrue: [ self assertTrue: (each isResolved) ] ].
+ cp invalidateAll.
+ cp do: [:each | each isJavaRef ifTrue: [ self assertTrue: (each isResolved not) ] ].
+
+ "Created: / 17-11-2012 / 21:44:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+!
+
_testInvalidateForClass
"will be enabled when caching and invalidation is implemented"
| cp |