compiling-bytecode.c

#include <stdbool.h>
#include <stdio.h>

#include <mruby.h>
#include <mruby/compile.h>
#include <mruby/dump.h>
#include <mruby/irep.h>
#include <mruby/proc.h>

/* Like mrbc, but simpler and stupid */
int main(int argc, char *argv[]) {
    mrb_state *mrb = mrb_open();
    if (!mrb) {
        fprintf(stderr, "Couldn't initialize MRuby\n");
        return 1;
    }

    // Prepare our files
    FILE *input = fopen("input.rb", "r");
    if (!input) {
        fprintf(stderr, "Couldn't find input.rb current directory, quitting...\n");
        mrb_close(mrb);
        return 1;
    }
    FILE *output = fopen("output.mrb", "wb");

    struct mrbc_context *cxt;

    cxt = mrbc_context_new(mrb);
    cxt->no_exec = true; // To not run the file when loaded

    mrbc_filename(mrb, cxt, "input.rb");
    mrb_value result = mrb_load_file_cxt(mrb, input, cxt);

    fclose(input);
    mrbc_context_free(mrb, cxt);

    struct RProc *proc = mrb_proc_ptr(result);
    const mrb_irep *irep = proc->body.irep;

    // NOTE: DUMP_DEBUG_INFO was deprecated in 3.3.0 and used only for compatibility, in newer
    //       MRuby you should use MRB_DUMP_DEBUG_INFO
    #if MRUBY_RELEASE_MAJOR == 3 && MRUBY_RELEASE_MINOR < 3
    mrb_dump_irep_binary(mrb, irep, DUMP_DEBUG_INFO, output);
    #else
    mrb_dump_irep_binary(mrb, irep, MRB_DUMP_DEBUG_INFO, output);
    #endif

    fclose(output);
    mrb_close(mrb);
    return 0;
}