зеркало из https://github.com/github/ruby.git
110 строки
2.1 KiB
C
110 строки
2.1 KiB
C
/** -*-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
|