--- a/JavaNativeMethod.st	Wed Feb 06 08:38:30 2013 -0800
+++ b/JavaNativeMethod.st	Wed Feb 06 21:52:03 2013 +0100
@@ -261,7 +261,7 @@
             kw := sel keywords.            
             s nextPutAll: kw first.
             s nextPutAll: ' this '.
-            2 to: kw size - 1 do:[:i|
+            2 to: kw size  do:[:i|
                 s nextPutAll: (kw at: i); space; nextPut:$a; nextPutAll: (i - 1) printString; space.
             ].            
 
@@ -272,10 +272,12 @@
             (self nativeMethodTemplate bindWith:header with: 'nativeContext' with:('^ JavaVM unimplementedNativeMethodSignal raise'))
         classified:         
             'native - ', ((javaClass javaPackage upTo:$$) replaceAll:$/ with:$.))
-        package: JavaVM package
+        package: JavaVM package.
+
+    self assert: (JavaVM natives respondsTo: sel).
 
     "Created: / 01-05-2011 / 00:08:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 31-01-2013 / 15:09:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-02-2013 / 21:48:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 installTrampoline: trampoline