Signed-off-by: Tomek Grabiec <tgrab...@gmail.com>
---
vm/jato.c | 15 ++++++++++++++-
1 files changed, 14 insertions(+), 1 deletions(-)
diff --git a/vm/jato.c b/vm/jato.c
index e4b5098..865deda 100644
--- a/vm/jato.c
+++ b/vm/jato.c
@@ -67,11 +67,24 @@ char *exe_name;
static struct vm_object *__vm_native native_vmstackwalker_getclasscontext(void)
{
+ struct stack_trace_elem st_elem;
+ struct compilation_unit *cu;
+ struct vm_class *class;
struct vm_object *res;
- NOT_IMPLEMENTED;
+ if (init_stack_trace_elem(&st_elem))
+ return NULL;
+
+ cu = jit_lookup_cu(st_elem.addr);
+ if (!cu) {
+ NOT_IMPLEMENTED;
+ return NULL;
+ }
+
+ class = cu->method->class;
res = vm_object_alloc_array(vm_java_lang_Class, 1);
+ array_set_field_ptr(res, 0, class->object);
return res;
}
--
1.6.0.6
------------------------------------------------------------------------------
_______________________________________________
Jatovm-devel mailing list
Jatovm-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/jatovm-devel
