#ifndef ruby_internal_method__h_
#define ruby_internal_method__h_

#include <ruby.h>

#ifdef RUBY_VM
#include "method.h"
#endif

#include "internal/node/ruby_internal_node.h"

#ifndef FALSE
#define FALSE 0
#endif

#ifndef TRUE
#define TRUE (!FALSE)
#endif

#ruby <<END
  $: << '../..'
  require 'ruby_source_dir'
  proc_c_location = "#{RUBY_SOURCE_DIR}/proc.c"
  eval_c_location = "#{RUBY_SOURCE_DIR}/eval.c"

  oclass_member = "klass"
  rclass_member = "klass"

  [ proc_c_location, eval_c_location ].each do |file|
    next if not File.exist?(file)

    File.open(file) do |eval_c|
      write = false
      stopwrite = false
      prev_line = nil
      while (line = eval_c.gets) != nil do
        case line
        when /^struct (METHOD)/
          write = true
          stopwrite = false
        when /rb_data_type_t method_data_type = {/
          write = true
          stopwrite = false
        when /^(bm_mark|bm_free|bm_memsize)/
          puts prev_line
          write = true
          stopwrite = false
        when /^\}/
          stopwrite = true
        when /VALUE oclass/
          oclass_member = "oclass"
        when /VALUE oklass/
          oklass_member = "oklass"
        when /VALUE (klass, )?rclass/
          rclass_member = "rclass"
        when /VALUE (klass, )?rklass/
          rclass_member = "rklass"
        end
        puts line if write
        if write and stopwrite then
          stopwrite = false
          write = false
          puts ''
        end
        prev_line = line
      end
    end
  end

  puts <<-END
#define METHOD_OCLASS(m) m->#{oclass_member}
#define METHOD_RCLASS(m) m->#{rclass_member}
  END

  nil
END

#endif