From 930e4c71c01562dc6ff03af87486acc2de81cc9b Mon Sep 17 00:00:00 2001 From: Carson McDonald Date: Mon, 25 Mar 2013 00:23:22 -0400 Subject: Make mrb_top_self return a real instance. --- src/state.c | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) (limited to 'src/state.c') diff --git a/src/state.c b/src/state.c index 7b5bd1002..1278249b1 100644 --- a/src/state.c +++ b/src/state.c @@ -7,6 +7,7 @@ #include "mruby.h" #include "mruby/irep.h" #include "mruby/variable.h" +#include "mruby/class.h" #include #include @@ -160,8 +161,11 @@ mrb_add_irep(mrb_state *mrb) mrb_value mrb_top_self(mrb_state *mrb) { - mrb_value v; - - MRB_SET_VALUE(v, MRB_TT_MAIN, value.i, 0); - return v; + if(mrb->top_self == NULL) + { + mrb->top_self = (mrb_value *)mrb_calloc(mrb, 1, sizeof(mrb_value)); + *(mrb->top_self) = mrb_class_new_instance(mrb, 0, NULL, mrb->object_class); + mrb->top_self->tt = MRB_TT_MAIN; + } + return *(mrb->top_self); } -- cgit v1.2.3