--- a/JavaNativeMethod.st	Fri Dec 24 02:17:13 1999 +0000
+++ b/JavaNativeMethod.st	Fri Dec 24 02:17:59 1999 +0000
@@ -12,6 +12,21 @@
     self flags:(self flags bitOr:Behavior flagJavaMethod).
 ! !
 
+!JavaNativeMethod class methodsFor:'cleanup'!
+
+flushAllCachedNativeMethods
+    self allInstancesDo:[:aNativeMethod |
+        aNativeMethod nativeImplementation:nil
+    ].
+
+    "
+     self flushAllCachedNativeMethods
+    "
+
+    "Created: / 24.12.1999 / 03:10:38 / cg"
+    "Modified: / 24.12.1999 / 03:10:51 / cg"
+! !
+
 !JavaNativeMethod methodsFor:'accessing'!
 
 nativeImplementation
@@ -61,6 +76,6 @@
 !JavaNativeMethod class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaNativeMethod.st,v 1.3 1999/12/23 17:46:10 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaNativeMethod.st,v 1.4 1999/12/24 02:16:37 cg Exp $'
 ! !
 JavaNativeMethod initialize!