root/ext/-test-/debug/inspector.c

/* */

DEFINITIONS

1. callback
2. debug_inspector
3. Init_inspector

#include "ruby/ruby.h"
#include "ruby/debug.h"

static VALUE
callback(const rb_debug_inspector_t *dbg_context, void *data)
{
    VALUE locs = rb_debug_inspector_backtrace_locations(dbg_context);
    long i, len = RARRAY_LEN(locs);
    VALUE binds = rb_ary_new();
    for (i = 0; i < len; ++i) {
        VALUE entry = rb_ary_new();
        rb_ary_push(binds, entry);
        rb_ary_push(entry, rb_debug_inspector_frame_self_get(dbg_context, i));
        rb_ary_push(entry, rb_debug_inspector_frame_binding_get(dbg_context, i));
        rb_ary_push(entry, rb_debug_inspector_frame_class_get(dbg_context, i));
        rb_ary_push(entry, rb_debug_inspector_frame_iseq_get(dbg_context, i));
        rb_ary_push(entry, rb_ary_entry(locs, i));
    }
    return binds;
}

static VALUE
debug_inspector(VALUE self)
{
    return rb_debug_inspector_open(callback, NULL);
}

void
Init_inspector(VALUE klass)
{
    rb_define_module_function(klass, "inspector", debug_inspector, 0);
}

/*

*/