gistfile1.c

    sym = mrb_sym_value(mrb, args[i]);
    name = mrb_sym2name(mrb, sym);
    len = snprintf(dummy, 1, "Proc.new { @%s }", name) + 1;
    scr = malloc(len);
    snprintf(scr, len, "Proc.new { @%s }", name);
    proc = mrb_load_string(mrb, scr);
    free(scr);
    mrb_define_method_vm(mrb, mrb_class_ptr(mod), sym, proc);