Signed-off-by: Tomek Grabiec <tgrab...@gmail.com>
---
vm/jato.c | 11 +++++++++++
1 files changed, 11 insertions(+), 0 deletions(-)
diff --git a/vm/jato.c b/vm/jato.c
index 6b6bbf6..304cb1a 100644
--- a/vm/jato.c
+++ b/vm/jato.c
@@ -728,6 +728,16 @@ native_vmclassloader_loadclass(struct vm_object *name,
jboolean resolve)
return vmc->object;
}
+static jboolean
+native_vmclass_isinterface(struct vm_object *clazz)
+{
+ struct vm_class *class = to_vmclass(clazz);
+ if (!class)
+ return false;
+
+ return vm_class_is_interface(class);
+}
+
static struct vm_native natives[] = {
DEFINE_NATIVE("gnu/classpath/VMStackWalker", "getClassContext",
&native_vmstackwalker_getclasscontext),
DEFINE_NATIVE("gnu/classpath/VMSystemProperties", "preInit",
&native_vmsystemproperties_preinit),
@@ -743,6 +753,7 @@ static struct vm_native natives[] = {
DEFINE_NATIVE("java/lang/VMClass", "isAnonymousClass",
&native_vmclass_is_anonymous_class),
DEFINE_NATIVE("java/lang/VMClass", "isArray", &native_vmclass_isarray),
DEFINE_NATIVE("java/lang/VMClass", "isInstance",
&native_vmclass_isinstance),
+ DEFINE_NATIVE("java/lang/VMClass", "isInterface",
&native_vmclass_isinterface),
DEFINE_NATIVE("java/lang/VMClass", "isPrimitive",
&native_vmclass_isprimitive),
DEFINE_NATIVE("java/lang/VMClass", "getModifiers",
&native_vmclass_getmodifiers),
DEFINE_NATIVE("java/lang/VMClass", "getComponentType",
&native_vmclass_getcomponenttype),
--
1.6.0.6
------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Jatovm-devel mailing list
Jatovm-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/jatovm-devel
