debase-ruby_core_source 0.8.2 → 0.8.3

data/lib/debase/ruby_core_source/ruby-2.2.4-p230/id.h

@@ -0,0 +1,210 @@
+/* DO NOT EDIT THIS FILE DIRECTLY */
+/**********************************************************************
+
+  id.h -
+
+  $Author: nobu $
+  created at: Sun Oct 19 21:12:51 2008
+
+  Copyright (C) 2007 Koichi Sasada
+
+**********************************************************************/
+
+#ifndef RUBY_ID_H
+#define RUBY_ID_H
+
+enum ruby_id_types {
+    RUBY_ID_STATIC_SYM  = 0x01,
+    RUBY_ID_LOCAL       = 0x00,
+    RUBY_ID_INSTANCE    = (0x01<<1),
+    RUBY_ID_GLOBAL      = (0x03<<1),
+    RUBY_ID_ATTRSET     = (0x04<<1),
+    RUBY_ID_CONST       = (0x05<<1),
+    RUBY_ID_CLASS       = (0x06<<1),
+    RUBY_ID_JUNK        = (0x07<<1),
+    RUBY_ID_INTERNAL    = RUBY_ID_JUNK,
+    RUBY_ID_SCOPE_SHIFT = 4,
+    RUBY_ID_SCOPE_MASK  = (~(~0U<<(RUBY_ID_SCOPE_SHIFT-1))<<1)
+};
+
+#define ID_STATIC_SYM  RUBY_ID_STATIC_SYM
+#define ID_SCOPE_SHIFT RUBY_ID_SCOPE_SHIFT
+#define ID_SCOPE_MASK  RUBY_ID_SCOPE_MASK
+#define ID_LOCAL       RUBY_ID_LOCAL
+#define ID_INSTANCE    RUBY_ID_INSTANCE
+#define ID_GLOBAL      RUBY_ID_GLOBAL
+#define ID_ATTRSET     RUBY_ID_ATTRSET
+#define ID_CONST       RUBY_ID_CONST
+#define ID_CLASS       RUBY_ID_CLASS
+#define ID_JUNK        RUBY_ID_JUNK
+#define ID_INTERNAL    RUBY_ID_INTERNAL
+
+#define ID2ATTRSET(id) (((id)&~ID_SCOPE_MASK)|ID_ATTRSET)
+
+#define symIFUNC ID2SYM(idIFUNC)
+#define symCFUNC ID2SYM(idCFUNC)
+
+#define RUBY_TOKEN_DOT2 128
+#define RUBY_TOKEN_DOT3 129
+#define RUBY_TOKEN_UPLUS 130
+#define RUBY_TOKEN_UMINUS 131
+#define RUBY_TOKEN_POW 132
+#define RUBY_TOKEN_DSTAR 133
+#define RUBY_TOKEN_CMP 134
+#define RUBY_TOKEN_LSHFT 135
+#define RUBY_TOKEN_RSHFT 136
+#define RUBY_TOKEN_LEQ 137
+#define RUBY_TOKEN_GEQ 138
+#define RUBY_TOKEN_EQ 139
+#define RUBY_TOKEN_EQQ 140
+#define RUBY_TOKEN_NEQ 141
+#define RUBY_TOKEN_MATCH 142
+#define RUBY_TOKEN_NMATCH 143
+#define RUBY_TOKEN_AREF 144
+#define RUBY_TOKEN_ASET 145
+#define RUBY_TOKEN_COLON2 146
+#define RUBY_TOKEN_COLON3 147
+#define RUBY_TOKEN_ANDOP 148
+#define RUBY_TOKEN_OROP 149
+#define RUBY_TOKEN(t) RUBY_TOKEN_##t
+
+enum ruby_method_ids {
+    idDot2 = RUBY_TOKEN(DOT2),
+    idDot3 = RUBY_TOKEN(DOT3),
+    idUPlus = RUBY_TOKEN(UPLUS),
+    idUMinus = RUBY_TOKEN(UMINUS),
+    idPow = RUBY_TOKEN(POW),
+    idCmp = RUBY_TOKEN(CMP),
+    idPLUS = '+',
+    idMINUS = '-',
+    idMULT = '*',
+    idDIV = '/',
+    idMOD = '%',
+    idLT = '<',
+    idLTLT = RUBY_TOKEN(LSHFT),
+    idLE = RUBY_TOKEN(LEQ),
+    idGT = '>',
+    idGTGT = RUBY_TOKEN(RSHFT),
+    idGE = RUBY_TOKEN(GEQ),
+    idEq = RUBY_TOKEN(EQ),
+    idEqq = RUBY_TOKEN(EQQ),
+    idNeq = RUBY_TOKEN(NEQ),
+    idNot = '!',
+    idBackquote = '`',
+    idEqTilde = RUBY_TOKEN(MATCH),
+    idNeqTilde = RUBY_TOKEN(NMATCH),
+    idAREF = RUBY_TOKEN(AREF),
+    idASET = RUBY_TOKEN(ASET),
+    idCOLON2 = RUBY_TOKEN(COLON2),
+    idANDOP = RUBY_TOKEN(ANDOP),
+    idOROP = RUBY_TOKEN(OROP),
+    tPRESERVED_ID_BEGIN = 149,
+    idNULL,
+    idEmptyP,
+    idEqlP,
+    idRespond_to,
+    idRespond_to_missing,
+    idIFUNC,
+    idCFUNC,
+    id_core_set_method_alias,
+    id_core_set_variable_alias,
+    id_core_undef_method,
+    id_core_define_method,
+    id_core_define_singleton_method,
+    id_core_set_postexe,
+    id_core_hash_from_ary,
+    id_core_hash_merge_ary,
+    id_core_hash_merge_ptr,
+    id_core_hash_merge_kwd,
+    tPRESERVED_ID_END,
+    tFreeze,
+    tInspect,
+    tIntern,
+    tObject_id,
+    tConst_missing,
+    tMethodMissing,
+    tMethod_added,
+    tSingleton_method_added,
+    tMethod_removed,
+    tSingleton_method_removed,
+    tMethod_undefined,
+    tSingleton_method_undefined,
+    tLength,
+    tSize,
+    tGets,
+    tSucc,
+    tEach,
+    tProc,
+    tLambda,
+    tSend,
+    t__send__,
+    t__attached__,
+    tInitialize,
+    tInitialize_copy,
+    tInitialize_clone,
+    tInitialize_dup,
+    tTo_int,
+    tTo_ary,
+    tTo_str,
+    tTo_sym,
+    tTo_hash,
+    tTo_proc,
+    tTo_io,
+    tTo_a,
+    tTo_s,
+    tTo_i,
+    tBt,
+    tBt_locations,
+    tCall,
+    tMesg,
+    tException,
+    tUScore,
+    tNEXT_ID,
+#define TOKEN2LOCALID(n) id##n = ((t##n<<ID_SCOPE_SHIFT)|ID_LOCAL|ID_STATIC_SYM)
+    TOKEN2LOCALID(Freeze),
+    TOKEN2LOCALID(Inspect),
+    TOKEN2LOCALID(Intern),
+    TOKEN2LOCALID(Object_id),
+    TOKEN2LOCALID(Const_missing),
+    TOKEN2LOCALID(MethodMissing),
+    TOKEN2LOCALID(Method_added),
+    TOKEN2LOCALID(Singleton_method_added),
+    TOKEN2LOCALID(Method_removed),
+    TOKEN2LOCALID(Singleton_method_removed),
+    TOKEN2LOCALID(Method_undefined),
+    TOKEN2LOCALID(Singleton_method_undefined),
+    TOKEN2LOCALID(Length),
+    TOKEN2LOCALID(Size),
+    TOKEN2LOCALID(Gets),
+    TOKEN2LOCALID(Succ),
+    TOKEN2LOCALID(Each),
+    TOKEN2LOCALID(Proc),
+    TOKEN2LOCALID(Lambda),
+    TOKEN2LOCALID(Send),
+    TOKEN2LOCALID(__send__),
+    TOKEN2LOCALID(__attached__),
+    TOKEN2LOCALID(Initialize),
+    TOKEN2LOCALID(Initialize_copy),
+    TOKEN2LOCALID(Initialize_clone),
+    TOKEN2LOCALID(Initialize_dup),
+    TOKEN2LOCALID(To_int),
+    TOKEN2LOCALID(To_ary),
+    TOKEN2LOCALID(To_str),
+    TOKEN2LOCALID(To_sym),
+    TOKEN2LOCALID(To_hash),
+    TOKEN2LOCALID(To_proc),
+    TOKEN2LOCALID(To_io),
+    TOKEN2LOCALID(To_a),
+    TOKEN2LOCALID(To_s),
+    TOKEN2LOCALID(To_i),
+    TOKEN2LOCALID(Bt),
+    TOKEN2LOCALID(Bt_locations),
+    TOKEN2LOCALID(Call),
+    TOKEN2LOCALID(Mesg),
+    TOKEN2LOCALID(Exception),
+    TOKEN2LOCALID(UScore),
+    tLAST_OP_ID = tPRESERVED_ID_END-1,
+    idLAST_OP_ID = tLAST_OP_ID >> ID_SCOPE_SHIFT
+};
+
+#endif /* RUBY_ID_H */

data/lib/debase/ruby_core_source/ruby-2.2.4-p230/insns.inc

@@ -0,0 +1,107 @@
+/** -*-c-*-
+  This file contains YARV instructions list.
+
+  ----
+  This file is auto generated by insns2vm.rb
+  DO NOT TOUCH!
+
+  If you want to fix something, you must edit 'template/insns.inc.tmpl'
+  or tool/insns2vm.rb
+ */
+
+
+/* BIN : Basic Instruction Name */
+#define BIN(n) YARVINSN_##n
+
+enum ruby_vminsn_type {
+  BIN(nop)                       = 0,
+  BIN(getlocal)                  = 1,
+  BIN(setlocal)                  = 2,
+  BIN(getspecial)                = 3,
+  BIN(setspecial)                = 4,
+  BIN(getinstancevariable)       = 5,
+  BIN(setinstancevariable)       = 6,
+  BIN(getclassvariable)          = 7,
+  BIN(setclassvariable)          = 8,
+  BIN(getconstant)               = 9,
+  BIN(setconstant)               = 10,
+  BIN(getglobal)                 = 11,
+  BIN(setglobal)                 = 12,
+  BIN(putnil)                    = 13,
+  BIN(putself)                   = 14,
+  BIN(putobject)                 = 15,
+  BIN(putspecialobject)          = 16,
+  BIN(putiseq)                   = 17,
+  BIN(putstring)                 = 18,
+  BIN(concatstrings)             = 19,
+  BIN(tostring)                  = 20,
+  BIN(toregexp)                  = 21,
+  BIN(newarray)                  = 22,
+  BIN(duparray)                  = 23,
+  BIN(expandarray)               = 24,
+  BIN(concatarray)               = 25,
+  BIN(splatarray)                = 26,
+  BIN(newhash)                   = 27,
+  BIN(newrange)                  = 28,
+  BIN(pop)                       = 29,
+  BIN(dup)                       = 30,
+  BIN(dupn)                      = 31,
+  BIN(swap)                      = 32,
+  BIN(reput)                     = 33,
+  BIN(topn)                      = 34,
+  BIN(setn)                      = 35,
+  BIN(adjuststack)               = 36,
+  BIN(defined)                   = 37,
+  BIN(checkmatch)                = 38,
+  BIN(checkkeyword)              = 39,
+  BIN(trace)                     = 40,
+  BIN(defineclass)               = 41,
+  BIN(send)                      = 42,
+  BIN(opt_str_freeze)            = 43,
+  BIN(opt_send_without_block)    = 44,
+  BIN(invokesuper)               = 45,
+  BIN(invokeblock)               = 46,
+  BIN(leave)                     = 47,
+  BIN(throw)                     = 48,
+  BIN(jump)                      = 49,
+  BIN(branchif)                  = 50,
+  BIN(branchunless)              = 51,
+  BIN(getinlinecache)            = 52,
+  BIN(setinlinecache)            = 53,
+  BIN(once)                      = 54,
+  BIN(opt_case_dispatch)         = 55,
+  BIN(opt_plus)                  = 56,
+  BIN(opt_minus)                 = 57,
+  BIN(opt_mult)                  = 58,
+  BIN(opt_div)                   = 59,
+  BIN(opt_mod)                   = 60,
+  BIN(opt_eq)                    = 61,
+  BIN(opt_neq)                   = 62,
+  BIN(opt_lt)                    = 63,
+  BIN(opt_le)                    = 64,
+  BIN(opt_gt)                    = 65,
+  BIN(opt_ge)                    = 66,
+  BIN(opt_ltlt)                  = 67,
+  BIN(opt_aref)                  = 68,
+  BIN(opt_aset)                  = 69,
+  BIN(opt_aset_with)             = 70,
+  BIN(opt_aref_with)             = 71,
+  BIN(opt_length)                = 72,
+  BIN(opt_size)                  = 73,
+  BIN(opt_empty_p)               = 74,
+  BIN(opt_succ)                  = 75,
+  BIN(opt_not)                   = 76,
+  BIN(opt_regexpmatch1)          = 77,
+  BIN(opt_regexpmatch2)          = 78,
+  BIN(opt_call_c_function)       = 79,
+  BIN(bitblt)                    = 80,
+  BIN(answer)                    = 81,
+  BIN(getlocal_OP__WC__0)        = 82,
+  BIN(getlocal_OP__WC__1)        = 83,
+  BIN(setlocal_OP__WC__0)        = 84,
+  BIN(setlocal_OP__WC__1)        = 85,
+  BIN(putobject_OP_INT2FIX_O_0_C_) = 86,
+  BIN(putobject_OP_INT2FIX_O_1_C_) = 87,
+  VM_INSTRUCTION_SIZE            = 88
+};
+

data/lib/debase/ruby_core_source/ruby-2.2.4-p230/insns_info.inc

@@ -0,0 +1,752 @@
+/** -*-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_CDHASH 'H'
+#define TS_ISEQ 'S'
+#define TS_VARIABLE '.'
+#define TS_FUNCPTR 'F'
+
+static const char *const insn_name_info[] = {
+  "nop",
+  "getlocal",
+  "setlocal",
+  "getspecial",
+  "setspecial",
+  "getinstancevariable",
+  "setinstancevariable",
+  "getclassvariable",
+  "setclassvariable",
+  "getconstant",
+  "setconstant",
+  "getglobal",
+  "setglobal",
+  "putnil",
+  "putself",
+  "putobject",
+  "putspecialobject",
+  "putiseq",
+  "putstring",
+  "concatstrings",
+  "tostring",
+  "toregexp",
+  "newarray",
+  "duparray",
+  "expandarray",
+  "concatarray",
+  "splatarray",
+  "newhash",
+  "newrange",
+  "pop",
+  "dup",
+  "dupn",
+  "swap",
+  "reput",
+  "topn",
+  "setn",
+  "adjuststack",
+  "defined",
+  "checkmatch",
+  "checkkeyword",
+  "trace",
+  "defineclass",
+  "send",
+  "opt_str_freeze",
+  "opt_send_without_block",
+  "invokesuper",
+  "invokeblock",
+  "leave",
+  "throw",
+  "jump",
+  "branchif",
+  "branchunless",
+  "getinlinecache",
+  "setinlinecache",
+  "once",
+  "opt_case_dispatch",
+  "opt_plus",
+  "opt_minus",
+  "opt_mult",
+  "opt_div",
+  "opt_mod",
+  "opt_eq",
+  "opt_neq",
+  "opt_lt",
+  "opt_le",
+  "opt_gt",
+  "opt_ge",
+  "opt_ltlt",
+  "opt_aref",
+  "opt_aset",
+  "opt_aset_with",
+  "opt_aref_with",
+  "opt_length",
+  "opt_size",
+  "opt_empty_p",
+  "opt_succ",
+  "opt_not",
+  "opt_regexpmatch1",
+  "opt_regexpmatch2",
+  "opt_call_c_function",
+  "bitblt",
+  "answer",
+  "getlocal_OP__WC__0",
+  "getlocal_OP__WC__1",
+  "setlocal_OP__WC__0",
+  "setlocal_OP__WC__1",
+  "putobject_OP_INT2FIX_O_0_C_",
+  "putobject_OP_INT2FIX_O_1_C_",
+
+};
+
+static const char *const insn_operand_info[] = {
+  "",
+  "LN",
+  "LN",
+  "NN",
+  "N",
+  "IK",
+  "IK",
+  "I",
+  "I",
+  "I",
+  "I",
+  "G",
+  "G",
+  "",
+  "",
+  "V",
+  "N",
+  "S",
+  "V",
+  "N",
+  "",
+  "NN",
+  "N",
+  "V",
+  "NN",
+  "",
+  "V",
+  "N",
+  "N",
+  "",
+  "",
+  "N",
+  "",
+  "",
+  "N",
+  "N",
+  "N",
+  "NVV",
+  "N",
+  "LN",
+  "N",
+  "ISN",
+  "C",
+  "V",
+  "C",
+  "C",
+  "C",
+  "",
+  "N",
+  "O",
+  "O",
+  "O",
+  "OK",
+  "K",
+  "SK",
+  "HO",
+  "C",
+  "C",
+  "C",
+  "C",
+  "C",
+  "C",
+  "CC",
+  "C",
+  "C",
+  "C",
+  "C",
+  "C",
+  "C",
+  "C",
+  "CV",
+  "CV",
+  "C",
+  "C",
+  "C",
+  "C",
+  "C",
+  "V",
+  "C",
+  "F",
+  "",
+  "",
+  "L",
+  "L",
+  "L",
+  "L",
+  "",
+  "",
+
+};
+
+static const int insn_len_info[] = {
+  1,
+  3,
+  3,
+  3,
+  2,
+  3,
+  3,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  1,
+  1,
+  2,
+  2,
+  2,
+  2,
+  2,
+  1,
+  3,
+  2,
+  2,
+  3,
+  1,
+  2,
+  2,
+  2,
+  1,
+  1,
+  2,
+  1,
+  1,
+  2,
+  2,
+  2,
+  4,
+  2,
+  3,
+  2,
+  4,
+  2,
+  2,
+  2,
+  2,
+  2,
+  1,
+  2,
+  2,
+  2,
+  2,
+  3,
+  2,
+  3,
+  3,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  3,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  3,
+  3,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  2,
+  1,
+  1,
+  2,
+  2,
+  2,
+  2,
+  1,
+  1,
+
+};
+
+#ifdef USE_INSN_RET_NUM
+static const int 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,
+  0,
+  2,
+  1,
+  2,
+  1,
+  1,
+  1,
+  1,
+  1,
+  1,
+  1,
+  0,
+  1,
+  1,
+  1,
+  1,
+  1,
+  1,
+  1,
+  1,
+  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,
+
+};
+#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 + 0;
+        }
+        case BIN(toregexp):{
+          int inc = 0;
+        int cnt = FIX2INT(opes[1]);
+        inc += 1 - cnt;;
+        return depth + inc;
+        }
+        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(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(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_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(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 insn_len_info[(int)insn];
+}
+
+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];
+}
+
+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];
+  }
+  else{
+    return 0;
+  }
+}
+
+#ifdef USE_INSN_RET_NUM
+static int
+insn_ret_num(VALUE insn)
+{
+  return insn_stack_push_num_info[(int)insn];
+}
+#endif