Signed-off-by: Tomek Grabiec <tgrab...@gmail.com>
---
 vm/jato.c |    9 +++++++--
 1 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/vm/jato.c b/vm/jato.c
index 6b4bcdd..129a261 100644
--- a/vm/jato.c
+++ b/vm/jato.c
@@ -467,8 +467,13 @@ throw:
 static struct vm_object *
 native_vmclass_getclassloader(struct vm_object *object)
 {
-       NOT_IMPLEMENTED;
-       return NULL;
+       struct vm_class *vmc;
+
+       vmc = to_vmclass(object);
+       if (!vmc)
+               return NULL;
+
+       return vmc->classloader;
 }
 
 static struct vm_object *
-- 
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

Reply via email to