src/extensions.st
branchjk_new_structure
changeset 1332 a2e2c13b0ff6
parent 1328 06e2e372ebb0
child 1336 5f651f3589d9
--- a/src/extensions.st	Sun Jan 01 14:47:13 2012 +0000
+++ b/src/extensions.st	Sun Jan 01 17:03:10 2012 +0000
@@ -240,6 +240,15 @@
 
     "Created: / 08-04-2011 / 16:12:45 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 ! !
+!Object methodsFor:'testing'!
+
+isJavaWrapperClass
+    "return true, if this is a java wrapper class, i.e, java.lang.Integer, java.lang.Boolean etc."
+
+    ^ false
+
+    "Created: / 01-01-2012 / 17:25:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
 !Object methodsFor:'autoboxing support'!
 
 javaBox: anObject