--- a/JavaNativeMethod.st Tue Feb 26 12:48:06 2013 +0000
+++ b/JavaNativeMethod.st Tue Feb 26 16:57:03 2013 +0000
@@ -20,7 +20,7 @@
"
"{ Package: 'stx:libjava' }"
-JavaMethodWithHandler subclass:#JavaNativeMethod
+JavaMethodWithHandler variableSubclass:#JavaNativeMethod
instanceVariableNames:'nativeImplementation nCalls'
classVariableNames:'CacheNativeImplementation Verbose TrampolineSelectors'
poolDictionaries:''
@@ -53,7 +53,6 @@
"
! !
-
!JavaNativeMethod class methodsFor:'initialization'!
cacheNativeImplementation
@@ -120,7 +119,6 @@
"Modified: / 31-01-2013 / 14:40:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod class methodsFor:'instance creation'!
new
@@ -132,7 +130,6 @@
"Created: / 31-01-2013 / 13:26:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod class methodsFor:'cleanup'!
flushAllCachedNativeMethods
@@ -148,6 +145,12 @@
"Modified: / 24.12.1999 / 03:10:51 / cg"
! !
+!JavaNativeMethod class methodsFor:'others'!
+
+version_HG
+
+ ^ '$Changeset: <not expanded> $'
+! !
!JavaNativeMethod methodsFor:'accessing'!
@@ -199,7 +202,6 @@
"Created: / 17-12-2010 / 10:34:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod methodsFor:'private'!
compileNativeImplementation: sel dispatchingTo: oldSel
@@ -415,7 +417,6 @@
"Modified: / 12-02-2013 / 15:26:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod methodsFor:'private-compiler interface'!
numberOfArgs:aNumber
@@ -468,7 +469,6 @@
"Modified: / 12-02-2013 / 15:28:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod methodsFor:'private-trampolines'!
trampolineUncached
@@ -567,7 +567,6 @@
"Created: / 31-01-2013 / 12:56:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod methodsFor:'vm support'!
nativeMethodInvokation
@@ -627,7 +626,6 @@
"Modified: / 21-01-2013 / 17:35:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
-
!JavaNativeMethod class methodsFor:'documentation'!
version
@@ -638,11 +636,6 @@
^ '$Header: /cvs/stx/stx/libjava/JavaNativeMethod.st,v 1.14 2013-02-25 23:30:26 cg Exp $'
!
-version_HG
-
- ^ '§Changeset: <not expanded> §'
-!
-
version_SVN
^ '§Id§'