JavaShort.st
branchdevelopment
changeset 2965 bac7022ca26a
parent 2841 6fa1bcf9c997
parent 2601 3d4b433fb25c
child 3324 a58245c0e83a
--- a/JavaShort.st	Wed Dec 18 00:02:10 2013 +0100
+++ b/JavaShort.st	Wed Dec 18 12:03:32 2013 +0100
@@ -69,9 +69,10 @@
 !
 
 javaWrapperClass
-    ^(Java classForName: 'java.lang.Short')
+    ^(JavaVM classForName: 'java.lang.Short' definedBy: nil)
 
     "Created: / 24-02-2012 / 19:42:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 18-05-2013 / 10:58:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !JavaShort class methodsFor:'autoboxing support'!
@@ -79,11 +80,12 @@
 javaBox: anObject 
     | wrapper |
 
-    wrapper := (JavaVM classForName: 'java.lang.Short') new.
+    wrapper := (JavaVM classForName: 'java.lang.Short' definedBy: nil) new.
     wrapper perform: #'<init>(S)V' with: anObject.
     ^ wrapper
 
     "Created: / 16-08-2011 / 09:58:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 18-05-2013 / 10:58:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 javaUnbox:anObject