/** -*-c-*-
  This file contains instruction information for yarv instruction sequence.

  ----
  This file is auto generated by insns2vm.rb
  DO NOT TOUCH!

  If you want to fix something, you must edit 'template/insns_info.inc.tmpl'
  or tool/insns2vm.rb
 */

% TYPE_CHARS.each do |t, c|
#define <%=t%> '<%=c%>'
% end

static const unsigned short insn_name_info_offset[] = {
% insn_name_length = @insns.inject(0) do |ofs, insn|
    <%= ofs %>,
%   ofs + insn.name.size + 1
% end
};

ASSERT_VM_INSTRUCTION_SIZE(insn_name_info_offset);

static const char insn_name_info_base[<%=insn_name_length%>] = ""
% @insns.each do |insn|
    "<%= insn.name %>\0"
% end
;

#define insn_name_info insn_name_info_base+insn_name_info_offset

static const char insn_operand_info[][8] = {
% @insns.each do |insn|
    "\<%= (insn.opes.size+1).to_s(8) %>""<%
    insn.opes.each {|type, _|
      %><%=TYPE_CHARS.fetch(op2typesig(type))%><%
    }%>",
% end
};

ASSERT_VM_INSTRUCTION_SIZE(insn_operand_info);

#ifdef USE_INSN_RET_NUM
static const unsigned short insn_stack_push_num_info[] = {
% @insns.each do |insn|
    <%= insn.rets.size %>,
% end
};

ASSERT_VM_INSTRUCTION_SIZE(insn_stack_push_num_info);
#endif

#ifdef USE_INSN_STACK_INCREASE
static int
insn_stack_increase(int depth, int insn, VALUE *opes)
{
    switch (insn) {
% @insns.each do |insn|
      case BIN(<%= insn.name %>): {
	<%= insn.sp_increase_c_expr %>
      }
% end
      default:
	rb_bug("insn_sp_increase: unreachable");
    }
    return 0;
}
#endif

/* some utilities */

static int
insn_len(VALUE insn)
{
    return (unsigned char)insn_operand_info[(int)insn][0];
}

static const char *
insn_name(VALUE insn)
{
    return insn_name_info[(int)insn];
}

static const char *
insn_op_types(VALUE insn)
{
    return insn_operand_info[(int)insn]+1;
}

static int
insn_op_type(VALUE insn, long pos)
{
    int len = insn_len(insn) - 1;
    if (pos < len) {
	return insn_operand_info[(int)insn][pos+1];
    }
    else{
	return 0;
    }
}

#ifdef USE_INSN_RET_NUM
static int
insn_ret_num(VALUE insn)
{
    return insn_stack_push_num_info[(int)insn];
}
#endif