--- a/src/JavaRuntimeConstantPoolTests.st	Thu Apr 12 07:55:15 2012 +0000
+++ b/src/JavaRuntimeConstantPoolTests.st	Thu Apr 12 08:21:09 2012 +0000
@@ -80,15 +80,37 @@
 
 !JavaRuntimeConstantPoolTests methodsFor:'tests'!
 
-testConstantPoolCaching
+_testConstantPoolCaching
+"will be enabled when caching and invalidation is implemented"
     | newConstantPool |
-
     JavaConstantPool allConstantPools: OrderedCollection new.
     newConstantPool := self getPrettyBigConstantPool.
     self 
         assertTrue: (JavaConstantPool allConstantPools includes: newConstantPool).
 
-    "Created: / 13-05-2011 / 09:36:02 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+    "Created: / 12-04-2012 / 10:16:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+!
+
+_testInvalidateForClass
+"will be enabled when caching and invalidation is implemented"
+    | cp |
+    self cleanUpCPCache.
+    cp := self getPrettyBigConstantPool.
+    cp do: [:each | each isJavaRef ifTrue: [ each resolve ] ].
+    cp do: [:each | each isJavaRef ifTrue: [ self assertTrue: (each isResolved) ] ].
+    JavaConstantPool invalidateReferencesToClass: 'Ljava/lang/Runnable;'.
+    1 to: 13 do: [
+        :index | 
+        (cp at: index) isJavaRef ifTrue: [ self assertTrue: (cp at: index) isResolved ]
+    ].
+    14 to: 20 do: [
+        :index | 
+        (cp at: index) isJavaRef ifTrue: [
+            self assertTrue: (cp at: index) isResolved not
+        ]
+    ].
+
+    "Created: / 12-04-2012 / 10:16:47 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 !
 
 testInvalidateAll
@@ -105,31 +127,6 @@
 
     "Created: / 08-04-2011 / 17:03:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
     "Modified: / 13-05-2011 / 09:48:30 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-!
-
-testInvalidateForClass
-    | cp |
-
-    self cleanUpCPCache.
-    cp := self getPrettyBigConstantPool.
-
-    cp do: [:each | each isJavaRef ifTrue: [ each resolve ] ].
-    cp 
-        do: [:each | each isJavaRef ifTrue: [ self assertTrue: (each isResolved) ] ].
-    JavaConstantPool invalidateReferencesToClass: 'Ljava/lang/Runnable;'.
-    1 to: 13
-        do: 
-            [:index | 
-            (cp at: index) isJavaRef 
-                ifTrue: [ self assertTrue: (cp at: index) isResolved ] ].
-    14 to: 20
-        do: 
-            [:index | 
-            (cp at: index) isJavaRef 
-                ifTrue: [ self assertTrue: (cp at: index) isResolved not ] ].
-
-    "Created: / 08-04-2011 / 17:10:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-    "Modified: / 23-05-2011 / 15:29:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 ! !
 
 !JavaRuntimeConstantPoolTests class methodsFor:'documentation'!