debase-ruby_core_source 0.9.10 → 0.9.11

data/lib/debase/ruby_core_source/ruby-2.5.0-preview1/insns_info.inc

@@ -0,0 +1,827 @@
+/** -*-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
+ */
+
+#define TS_OFFSET 'O'
+#define TS_NUM 'N'
+#define TS_LINDEX 'L'
+#define TS_VALUE 'V'
+#define TS_ID 'I'
+#define TS_GENTRY 'G'
+#define TS_IC 'K'
+#define TS_CALLINFO 'C'
+#define TS_CALLCACHE 'E'
+#define TS_CDHASH 'H'
+#define TS_ISEQ 'S'
+#define TS_VARIABLE '.'
+#define TS_FUNCPTR 'F'
+
+static const unsigned short insn_name_info_offset[] = {
+    0,
+    4,
+    13,
+    22,
+    33,
+    44,
+    64,
+    84,
+    101,
+    118,
+    130,
+    142,
+    152,
+    162,
+    169,
+    177,
+    187,
+    204,
+    212,
+    222,
+    236,
+    245,
+    258,
+    267,
+    274,
+    283,
+    292,
+    304,
+    316,
+    327,
+    335,
+    344,
+    348,
+    352,
+    357,
+    362,
+    370,
+    376,
+    381,
+    386,
+    398,
+    406,
+    417,
+    430,
+    436,
+    443,
+    455,
+    460,
+    475,
+    490,
+    507,
+    524,
+    547,
+    559,
+    571,
+    577,
+    583,
+    588,
+    597,
+    610,
+    620,
+    633,
+    648,
+    663,
+    668,
+    686,
+    695,
+    705,
+    714,
+    722,
+    730,
+    737,
+    745,
+    752,
+    759,
+    766,
+    773,
+    782,
+    791,
+    800,
+    814,
+    828,
+    839,
+    848,
+    860,
+    869,
+    877,
+    894,
+    911,
+    931,
+    938,
+    945,
+    964,
+    983,
+    1002,
+    1021,
+    1049,
+};
+
+ASSERT_VM_INSTRUCTION_SIZE(insn_name_info_offset);
+
+static const char insn_name_info_base[1077] = ""
+    "nop\0"
+    "getlocal\0"
+    "setlocal\0"
+    "getspecial\0"
+    "setspecial\0"
+    "getinstancevariable\0"
+    "setinstancevariable\0"
+    "getclassvariable\0"
+    "setclassvariable\0"
+    "getconstant\0"
+    "setconstant\0"
+    "getglobal\0"
+    "setglobal\0"
+    "putnil\0"
+    "putself\0"
+    "putobject\0"
+    "putspecialobject\0"
+    "putiseq\0"
+    "putstring\0"
+    "concatstrings\0"
+    "tostring\0"
+    "freezestring\0"
+    "toregexp\0"
+    "intern\0"
+    "newarray\0"
+    "duparray\0"
+    "expandarray\0"
+    "concatarray\0"
+    "splatarray\0"
+    "newhash\0"
+    "newrange\0"
+    "pop\0"
+    "dup\0"
+    "dupn\0"
+    "swap\0"
+    "reverse\0"
+    "reput\0"
+    "topn\0"
+    "setn\0"
+    "adjuststack\0"
+    "defined\0"
+    "checkmatch\0"
+    "checkkeyword\0"
+    "trace\0"
+    "trace2\0"
+    "defineclass\0"
+    "send\0"
+    "opt_str_freeze\0"
+    "opt_str_uminus\0"
+    "opt_newarray_max\0"
+    "opt_newarray_min\0"
+    "opt_send_without_block\0"
+    "invokesuper\0"
+    "invokeblock\0"
+    "leave\0"
+    "throw\0"
+    "jump\0"
+    "branchif\0"
+    "branchunless\0"
+    "branchnil\0"
+    "branchiftype\0"
+    "getinlinecache\0"
+    "setinlinecache\0"
+    "once\0"
+    "opt_case_dispatch\0"
+    "opt_plus\0"
+    "opt_minus\0"
+    "opt_mult\0"
+    "opt_div\0"
+    "opt_mod\0"
+    "opt_eq\0"
+    "opt_neq\0"
+    "opt_lt\0"
+    "opt_le\0"
+    "opt_gt\0"
+    "opt_ge\0"
+    "opt_ltlt\0"
+    "opt_aref\0"
+    "opt_aset\0"
+    "opt_aset_with\0"
+    "opt_aref_with\0"
+    "opt_length\0"
+    "opt_size\0"
+    "opt_empty_p\0"
+    "opt_succ\0"
+    "opt_not\0"
+    "opt_regexpmatch1\0"
+    "opt_regexpmatch2\0"
+    "opt_call_c_function\0"
+    "bitblt\0"
+    "answer\0"
+    "getlocal_OP__WC__0\0"
+    "getlocal_OP__WC__1\0"
+    "setlocal_OP__WC__0\0"
+    "setlocal_OP__WC__1\0"
+    "putobject_OP_INT2FIX_O_0_C_\0"
+    "putobject_OP_INT2FIX_O_1_C_\0"
+;
+
+#define insn_name_info insn_name_info_base+insn_name_info_offset
+
+static const char insn_operand_info[][8] = {
+    "\1""",
+    "\3""LN",
+    "\3""LN",
+    "\3""NN",
+    "\2""N",
+    "\3""IK",
+    "\3""IK",
+    "\2""I",
+    "\2""I",
+    "\2""I",
+    "\2""I",
+    "\2""G",
+    "\2""G",
+    "\1""",
+    "\1""",
+    "\2""V",
+    "\2""N",
+    "\2""S",
+    "\2""V",
+    "\2""N",
+    "\1""",
+    "\2""V",
+    "\3""NN",
+    "\1""",
+    "\2""N",
+    "\2""V",
+    "\3""NN",
+    "\1""",
+    "\2""V",
+    "\2""N",
+    "\2""N",
+    "\1""",
+    "\1""",
+    "\2""N",
+    "\1""",
+    "\2""N",
+    "\1""",
+    "\2""N",
+    "\2""N",
+    "\2""N",
+    "\4""NVV",
+    "\2""N",
+    "\3""LN",
+    "\2""N",
+    "\3""NV",
+    "\4""ISN",
+    "\4""CES",
+    "\2""V",
+    "\2""V",
+    "\2""N",
+    "\2""N",
+    "\3""CE",
+    "\4""CES",
+    "\2""C",
+    "\1""",
+    "\2""N",
+    "\2""O",
+    "\2""O",
+    "\2""O",
+    "\2""O",
+    "\3""NO",
+    "\3""OK",
+    "\2""K",
+    "\3""SK",
+    "\3""HO",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\5""CECE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\4""CEV",
+    "\4""CEV",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\3""CE",
+    "\2""V",
+    "\3""CE",
+    "\2""F",
+    "\1""",
+    "\1""",
+    "\2""L",
+    "\2""L",
+    "\2""L",
+    "\2""L",
+    "\1""",
+    "\1""",
+};
+
+ASSERT_VM_INSTRUCTION_SIZE(insn_operand_info);
+
+#ifdef USE_INSN_RET_NUM
+static const unsigned short insn_stack_push_num_info[] = {
+    0,
+    1,
+    0,
+    1,
+    0,
+    1,
+    0,
+    1,
+    0,
+    1,
+    0,
+    1,
+    0,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    0,
+    2,
+    1,
+    2,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    0,
+    0,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    0,
+    0,
+    0,
+    0,
+    0,
+    1,
+    1,
+    1,
+    0,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    1,
+    0,
+    1,
+    1,
+    1,
+    1,
+    0,
+    0,
+    1,
+    1,
+};
+
+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) {
+      case BIN(nop): {
+	return depth + 0;
+      }
+      case BIN(getlocal): {
+	return depth + 1;
+      }
+      case BIN(setlocal): {
+	return depth + -1;
+      }
+      case BIN(getspecial): {
+	return depth + 1;
+      }
+      case BIN(setspecial): {
+	return depth + -1;
+      }
+      case BIN(getinstancevariable): {
+	return depth + 1;
+      }
+      case BIN(setinstancevariable): {
+	return depth + -1;
+      }
+      case BIN(getclassvariable): {
+	return depth + 1;
+      }
+      case BIN(setclassvariable): {
+	return depth + -1;
+      }
+      case BIN(getconstant): {
+	return depth + 0;
+      }
+      case BIN(setconstant): {
+	return depth + -2;
+      }
+      case BIN(getglobal): {
+	return depth + 1;
+      }
+      case BIN(setglobal): {
+	return depth + -1;
+      }
+      case BIN(putnil): {
+	return depth + 1;
+      }
+      case BIN(putself): {
+	return depth + 1;
+      }
+      case BIN(putobject): {
+	return depth + 1;
+      }
+      case BIN(putspecialobject): {
+	return depth + 1;
+      }
+      case BIN(putiseq): {
+	return depth + 1;
+      }
+      case BIN(putstring): {
+	return depth + 1;
+      }
+      case BIN(concatstrings): {
+	int inc = 0;
+        int num = FIX2INT(opes[0]);
+        inc += 1 - num;;
+        return depth + inc;
+      }
+      case BIN(tostring): {
+	return depth + -1;
+      }
+      case BIN(freezestring): {
+	return depth + 0;
+      }
+      case BIN(toregexp): {
+	int inc = 0;
+        int cnt = FIX2INT(opes[1]);
+        inc += 1 - cnt;;
+        return depth + inc;
+      }
+      case BIN(intern): {
+	return depth + 0;
+      }
+      case BIN(newarray): {
+	int inc = 0;
+        int num = FIX2INT(opes[0]);
+        inc += 1 - num;;
+        return depth + inc;
+      }
+      case BIN(duparray): {
+	return depth + 1;
+      }
+      case BIN(expandarray): {
+	int inc = 0;
+        int num = FIX2INT(opes[0]);
+        int flag = FIX2INT(opes[1]);
+        inc += num - 1 + (flag & 1 ? 1 : 0);;
+        return depth + inc;
+      }
+      case BIN(concatarray): {
+	return depth + -1;
+      }
+      case BIN(splatarray): {
+	return depth + 0;
+      }
+      case BIN(newhash): {
+	int inc = 0;
+        int num = FIX2INT(opes[0]);
+        inc += 1 - num;;
+        return depth + inc;
+      }
+      case BIN(newrange): {
+	return depth + -1;
+      }
+      case BIN(pop): {
+	return depth + -1;
+      }
+      case BIN(dup): {
+	return depth + 1;
+      }
+      case BIN(dupn): {
+	int inc = 0;
+        int n = FIX2INT(opes[0]);
+        inc += n;;
+        return depth + inc;
+      }
+      case BIN(swap): {
+	return depth + 0;
+      }
+      case BIN(reverse): {
+	int inc = 0;
+        inc += 0;;
+        return depth + inc;
+      }
+      case BIN(reput): {
+	int inc = 0;
+        inc += 0;;
+        return depth + inc;
+      }
+      case BIN(topn): {
+	int inc = 0;
+        inc += 1;;
+        return depth + inc;
+      }
+      case BIN(setn): {
+	int inc = 0;
+        inc += 0;
+        return depth + inc;
+      }
+      case BIN(adjuststack): {
+	int inc = 0;
+        int n = FIX2INT(opes[0]);
+        inc -= n;
+        return depth + inc;
+      }
+      case BIN(defined): {
+	return depth + 0;
+      }
+      case BIN(checkmatch): {
+	return depth + -1;
+      }
+      case BIN(checkkeyword): {
+	return depth + 1;
+      }
+      case BIN(trace): {
+	return depth + 0;
+      }
+      case BIN(trace2): {
+	return depth + 0;
+      }
+      case BIN(defineclass): {
+	return depth + -1;
+      }
+      case BIN(send): {
+	int inc = 0;
+        CALL_INFO ci = (CALL_INFO)(opes[0]);
+        inc += - (int)(ci->orig_argc + ((ci->flag & VM_CALL_ARGS_BLOCKARG) ? 1 : 0));;
+        return depth + inc;
+      }
+      case BIN(opt_str_freeze): {
+	return depth + 1;
+      }
+      case BIN(opt_str_uminus): {
+	return depth + 1;
+      }
+      case BIN(opt_newarray_max): {
+	int inc = 0;
+        int num = FIX2INT(opes[0]);
+        inc += 1 - num;;
+        return depth + inc;
+      }
+      case BIN(opt_newarray_min): {
+	int inc = 0;
+        int num = FIX2INT(opes[0]);
+        inc += 1 - num;;
+        return depth + inc;
+      }
+      case BIN(opt_send_without_block): {
+	int inc = 0;
+        CALL_INFO ci = (CALL_INFO)(opes[0]);
+        inc += -ci->orig_argc;;
+        return depth + inc;
+      }
+      case BIN(invokesuper): {
+	int inc = 0;
+        CALL_INFO ci = (CALL_INFO)(opes[0]);
+        inc += - (int)(ci->orig_argc + ((ci->flag & VM_CALL_ARGS_BLOCKARG) ? 1 : 0));;
+        return depth + inc;
+      }
+      case BIN(invokeblock): {
+	int inc = 0;
+        CALL_INFO ci = (CALL_INFO)(opes[0]);
+        inc += 1 - ci->orig_argc;;
+        return depth + inc;
+      }
+      case BIN(leave): {
+	return depth + 0;
+      }
+      case BIN(throw): {
+	return depth + 0;
+      }
+      case BIN(jump): {
+	return depth + 0;
+      }
+      case BIN(branchif): {
+	return depth + -1;
+      }
+      case BIN(branchunless): {
+	return depth + -1;
+      }
+      case BIN(branchnil): {
+	return depth + -1;
+      }
+      case BIN(branchiftype): {
+	return depth + -1;
+      }
+      case BIN(getinlinecache): {
+	return depth + 1;
+      }
+      case BIN(setinlinecache): {
+	return depth + 0;
+      }
+      case BIN(once): {
+	return depth + 1;
+      }
+      case BIN(opt_case_dispatch): {
+	int inc = 0;
+        inc += -1;;
+        return depth + inc;
+      }
+      case BIN(opt_plus): {
+	return depth + -1;
+      }
+      case BIN(opt_minus): {
+	return depth + -1;
+      }
+      case BIN(opt_mult): {
+	return depth + -1;
+      }
+      case BIN(opt_div): {
+	return depth + -1;
+      }
+      case BIN(opt_mod): {
+	return depth + -1;
+      }
+      case BIN(opt_eq): {
+	return depth + -1;
+      }
+      case BIN(opt_neq): {
+	return depth + -1;
+      }
+      case BIN(opt_lt): {
+	return depth + -1;
+      }
+      case BIN(opt_le): {
+	return depth + -1;
+      }
+      case BIN(opt_gt): {
+	return depth + -1;
+      }
+      case BIN(opt_ge): {
+	return depth + -1;
+      }
+      case BIN(opt_ltlt): {
+	return depth + -1;
+      }
+      case BIN(opt_aref): {
+	return depth + -1;
+      }
+      case BIN(opt_aset): {
+	return depth + -2;
+      }
+      case BIN(opt_aset_with): {
+	return depth + -1;
+      }
+      case BIN(opt_aref_with): {
+	return depth + 0;
+      }
+      case BIN(opt_length): {
+	return depth + 0;
+      }
+      case BIN(opt_size): {
+	return depth + 0;
+      }
+      case BIN(opt_empty_p): {
+	return depth + 0;
+      }
+      case BIN(opt_succ): {
+	return depth + 0;
+      }
+      case BIN(opt_not): {
+	return depth + 0;
+      }
+      case BIN(opt_regexpmatch1): {
+	return depth + 0;
+      }
+      case BIN(opt_regexpmatch2): {
+	return depth + -1;
+      }
+      case BIN(opt_call_c_function): {
+	return depth + 0;
+      }
+      case BIN(bitblt): {
+	return depth + 1;
+      }
+      case BIN(answer): {
+	return depth + 1;
+      }
+      case BIN(getlocal_OP__WC__0): {
+	return depth + 1;
+      }
+      case BIN(getlocal_OP__WC__1): {
+	return depth + 1;
+      }
+      case BIN(setlocal_OP__WC__0): {
+	return depth + -1;
+      }
+      case BIN(setlocal_OP__WC__1): {
+	return depth + -1;
+      }
+      case BIN(putobject_OP_INT2FIX_O_0_C_): {
+	return depth + 1;
+      }
+      case BIN(putobject_OP_INT2FIX_O_1_C_): {
+	return depth + 1;
+      }
+      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