debase-ruby_core_source 3.3.6 → 3.4.0

data/lib/debase/ruby_core_source/ruby-3.4.0-preview2/vm_call_iseq_optimized.inc

@@ -1,244 +0,0 @@
-/* -*- c -*- */
-#if 1 /* enable or disable this optimization */
-
-/* DO NOT EDIT THIS FILE DIRECTLY
- *
- * This file is generated by tool/generic_erb.rb
- * with template/call_iseq_optimized.inc.tmpl
- */
-
-static VALUE
-vm_call_iseq_setup_normal_0start_0params_0locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 0, 0);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_0params_1locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 0, 1);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_0params_2locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 0, 2);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_0params_3locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 0, 3);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_0params_4locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 0, 4);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_0params_5locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 0, 5);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_1params_0locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 1, 0);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_1params_1locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 1, 1);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_1params_2locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 1, 2);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_1params_3locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 1, 3);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_1params_4locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 1, 4);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_1params_5locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 1, 5);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_2params_0locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 2, 0);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_2params_1locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 2, 1);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_2params_2locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 2, 2);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_2params_3locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 2, 3);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_2params_4locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 2, 4);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_2params_5locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 2, 5);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_3params_0locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 3, 0);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_3params_1locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 3, 1);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_3params_2locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 3, 2);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_3params_3locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 3, 3);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_3params_4locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 3, 4);
-}
-
-static VALUE
-vm_call_iseq_setup_normal_0start_3params_5locals(rb_execution_context_t *ec, rb_control_frame_t *cfp, struct rb_calling_info *calling)
-{
-    RB_DEBUG_COUNTER_INC(ccf_iseq_fix);
-    return vm_call_iseq_setup_normal(ec, cfp, calling, vm_cc_cme(calling->cc), 0, 3, 5);
-}
-
-/* vm_call_iseq_handlers[param][local] */
-static const vm_call_handler vm_call_iseq_handlers[][6] = {
-    {
-        vm_call_iseq_setup_normal_0start_0params_0locals,
-        vm_call_iseq_setup_normal_0start_0params_1locals,
-        vm_call_iseq_setup_normal_0start_0params_2locals,
-        vm_call_iseq_setup_normal_0start_0params_3locals,
-        vm_call_iseq_setup_normal_0start_0params_4locals,
-        vm_call_iseq_setup_normal_0start_0params_5locals,
-    },
-    {
-        vm_call_iseq_setup_normal_0start_1params_0locals,
-        vm_call_iseq_setup_normal_0start_1params_1locals,
-        vm_call_iseq_setup_normal_0start_1params_2locals,
-        vm_call_iseq_setup_normal_0start_1params_3locals,
-        vm_call_iseq_setup_normal_0start_1params_4locals,
-        vm_call_iseq_setup_normal_0start_1params_5locals,
-    },
-    {
-        vm_call_iseq_setup_normal_0start_2params_0locals,
-        vm_call_iseq_setup_normal_0start_2params_1locals,
-        vm_call_iseq_setup_normal_0start_2params_2locals,
-        vm_call_iseq_setup_normal_0start_2params_3locals,
-        vm_call_iseq_setup_normal_0start_2params_4locals,
-        vm_call_iseq_setup_normal_0start_2params_5locals,
-    },
-    {
-        vm_call_iseq_setup_normal_0start_3params_0locals,
-        vm_call_iseq_setup_normal_0start_3params_1locals,
-        vm_call_iseq_setup_normal_0start_3params_2locals,
-        vm_call_iseq_setup_normal_0start_3params_3locals,
-        vm_call_iseq_setup_normal_0start_3params_4locals,
-        vm_call_iseq_setup_normal_0start_3params_5locals,
-    },
-};
-
-static inline vm_call_handler
-vm_call_iseq_setup_func(const struct rb_callinfo *ci, const int param_size, const int local_size)
-{
-    if (UNLIKELY(vm_ci_flag(ci) & VM_CALL_TAILCALL)) {
-        return &vm_call_iseq_setup_tailcall_0start;
-    }
-    else if (0) { /* to disable optimize */
-        return &vm_call_iseq_setup_normal_0start;
-    }
-    else if (param_size <= 3 && local_size <= 5) {
-        VM_ASSERT(local_size >= 0);
-        return vm_call_iseq_handlers[param_size][local_size];
-    }
-    else {
-        return &vm_call_iseq_setup_normal_0start;
-    }
-}
-
-#else
-
-static inline vm_call_handler
-vm_call_iseq_setup_func(const struct rb_callinfo *ci, const int param_size, const int local_size)
-{
-    if (UNLIKELY(vm_ci_flag(ci) & VM_CALL_TAILCALL)) {
-        return &vm_call_iseq_setup_tailcall_0start;
-    }
-    else {
-        return &vm_call_iseq_setup_normal_0start;
-    }
-}
-#endif

data/lib/debase/ruby_core_source/ruby-3.4.0-preview2/vm_debug.h

@@ -1,124 +0,0 @@
-#ifndef RUBY_DEBUG_H
-#define RUBY_DEBUG_H
-/**********************************************************************
-
-  vm_debug.h - YARV Debug function interface
-
-  $Author$
-  created at: 04/08/25 02:33:49 JST
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-#include "ruby/ruby.h"
-
-RUBY_SYMBOL_EXPORT_BEGIN
-
-#define dpv(h,v) ruby_debug_print_value(-1, 0, (h), (v))
-#define dp(v)    ruby_debug_print_value(-1, 0, "", (v))
-#define dpi(i)   ruby_debug_print_id(-1, 0, "", (i))
-#define dpn(n)   ruby_debug_print_node(-1, 0, "", (n))
-
-struct RNode;
-
-VALUE ruby_debug_print_value(int level, int debug_level, const char *header, VALUE v);
-void  ruby_debug_print_v(VALUE v);
-ID    ruby_debug_print_id(int level, int debug_level, const char *header, ID id);
-struct RNode *ruby_debug_print_node(int level, int debug_level, const char *header, const struct RNode *node);
-void  ruby_debug_print_n(const struct RNode *node);
-int   ruby_debug_print_indent(int level, int debug_level, int indent_level);
-void  ruby_debug_gc_check_func(void);
-void ruby_set_debug_option(const char *str);
-
-RUBY_SYMBOL_EXPORT_END
-
-#ifndef USE_RUBY_DEBUG_LOG
-#define USE_RUBY_DEBUG_LOG 0
-#endif
-
-/* RUBY_DEBUG_LOG: Logging debug information mechanism
- *
- * This feature provides a mechanism to store logging information
- * to a file, stderr or memory space with simple macros.
- *
- * The following information will be stored.
- *   * (1) __FILE__, __LINE__ in C
- *   * (2) __FILE__, __LINE__ in Ruby
- *   * (3) __func__ in C (message title)
- *   * (4) given string with sprintf format
- *   * (5) Thread number (if multiple threads are running)
- *
- * This feature is enabled only USE_RUBY_DEBUG_LOG is enabled.
- * Release version should not enable it.
- *
- * Running with the `RUBY_DEBUG_LOG` environment variable enables
- * this feature.
- *
- *   # logging into a file
- *   RUBY_DEBUG_LOG=/path/to/file STDERR
- *
- *   # logging into STDERR
- *   RUBY_DEBUG_LOG=stderr
- *
- *   # logging into memory space (check with a debugger)
- *   # It will help if the timing is important.
- *   RUBY_DEBUG_LOG=mem
- *
- * RUBY_DEBUG_LOG_FILTER environment variable can specify the filter string.
- * If "(3) __func__ in C (message title)" contains the specified string, the
- * information will be stored (example: RUBY_DEBUG_LOG_FILTER=str will enable
- * only on str related information).
- *
- * In a MRI source code, you can use the following macros:
- *   * RUBY_DEBUG_LOG(fmt, ...): Above (1) to (4) will be logged.
- *   * RUBY_DEBUG_LOG2(file, line, fmt, ...):
- *     Same as RUBY_DEBUG_LOG(), but (1) will be replaced with given file, line.
- */
-
-extern enum ruby_debug_log_mode {
-    ruby_debug_log_disabled = 0x00,
-    ruby_debug_log_memory   = 0x01,
-    ruby_debug_log_stderr   = 0x02,
-    ruby_debug_log_file     = 0x04,
-} ruby_debug_log_mode;
-
-RBIMPL_ATTR_FORMAT(RBIMPL_PRINTF_FORMAT, 4, 5)
-void ruby_debug_log(const char *file, int line, const char *func_name, const char *fmt, ...);
-void ruby_debug_log_print(unsigned int n);
-bool ruby_debug_log_filter(const char *func_name, const char *file_name);
-
-#if RBIMPL_COMPILER_IS(GCC) && defined(__OPTIMIZE__)
-# define ruby_debug_log(...) \
-    RB_GNUC_EXTENSION_BLOCK( \
-        RBIMPL_WARNING_PUSH(); \
-        RBIMPL_WARNING_IGNORED(-Wformat-zero-length); \
-        ruby_debug_log(__VA_ARGS__); \
-        RBIMPL_WARNING_POP())
-#endif
-
-// convenient macro to log even if the USE_RUBY_DEBUG_LOG macro is not specified.
-// You can use this macro for temporary usage (you should not commit it).
-#define _RUBY_DEBUG_LOG(...) ruby_debug_log(__FILE__, __LINE__, RUBY_FUNCTION_NAME_STRING, "" __VA_ARGS__)
-
-#if USE_RUBY_DEBUG_LOG
-# define RUBY_DEBUG_LOG_ENABLED(func_name, file_name)                     \
-    (ruby_debug_log_mode && ruby_debug_log_filter(func_name, file_name))
-
-#define RUBY_DEBUG_LOG(...) do { \
-    if (RUBY_DEBUG_LOG_ENABLED(RUBY_FUNCTION_NAME_STRING, __FILE__)) \
-        ruby_debug_log(__FILE__, __LINE__, RUBY_FUNCTION_NAME_STRING, "" __VA_ARGS__); \
-} while (0)
-
-#define RUBY_DEBUG_LOG2(file, line, ...) do { \
-    if (RUBY_DEBUG_LOG_ENABLED(RUBY_FUNCTION_NAME_STRING, file)) \
-        ruby_debug_log(file, line, RUBY_FUNCTION_NAME_STRING, "" __VA_ARGS__); \
-} while (0)
-
-#else // USE_RUBY_DEBUG_LOG
-// do nothing
-#define RUBY_DEBUG_LOG(...)
-#define RUBY_DEBUG_LOG2(file, line, ...)
-#endif // USE_RUBY_DEBUG_LOG
-
-#endif /* RUBY_DEBUG_H */

data/lib/debase/ruby_core_source/ruby-3.4.0-preview2/vm_exec.h

@@ -1,199 +0,0 @@
-#ifndef RUBY_VM_EXEC_H
-#define RUBY_VM_EXEC_H
-/**********************************************************************
-
-  vm.h -
-
-  $Author$
-  created at: 04/01/01 16:56:59 JST
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-typedef long OFFSET;
-typedef unsigned long lindex_t;
-typedef VALUE GENTRY;
-typedef rb_iseq_t *ISEQ;
-
-#if VMDEBUG > 0
-#define debugs printf
-#define DEBUG_ENTER_INSN(insn) \
-    rb_vmdebug_debug_print_pre(ec, GET_CFP(), GET_PC());
-
-#define SC_REGS()
-
-#define DEBUG_END_INSN() \
-  rb_vmdebug_debug_print_post(ec, GET_CFP() SC_REGS());
-
-#else
-
-#define debugs
-#define DEBUG_ENTER_INSN(insn)
-#define DEBUG_END_INSN()
-#endif
-
-#define throwdebug if(0)ruby_debug_printf
-/* #define throwdebug ruby_debug_printf */
-
-/************************************************/
-#if defined(DISPATCH_XXX)
-error !
-/************************************************/
-#elif OPT_CALL_THREADED_CODE
-
-#define LABEL(x)  insn_func_##x
-#define ELABEL(x)
-#define LABEL_PTR(x) &LABEL(x)
-
-#define INSN_ENTRY(insn) \
-  static rb_control_frame_t * \
-    FUNC_FASTCALL(LABEL(insn))(rb_execution_context_t *ec, rb_control_frame_t *reg_cfp) {
-
-#define END_INSN(insn) return reg_cfp;}
-
-#define NEXT_INSN() return reg_cfp;
-
-#define START_OF_ORIGINAL_INSN(x) /* ignore */
-#define DISPATCH_ORIGINAL_INSN(x) return LABEL(x)(ec, reg_cfp);
-
-/************************************************/
-#elif OPT_TOKEN_THREADED_CODE || OPT_DIRECT_THREADED_CODE
-/* threaded code with gcc */
-
-#define LABEL(x)  INSN_LABEL_##x
-#define ELABEL(x) INSN_ELABEL_##x
-#define LABEL_PTR(x) RB_GNUC_EXTENSION(&&LABEL(x))
-
-#define INSN_ENTRY_SIG(insn) \
-  if (0) { \
-      ruby_debug_printf("exec: %s@(%"PRIdPTRDIFF", %"PRIdPTRDIFF")@%s:%u\n", #insn, \
-                        (reg_pc - ISEQ_BODY(reg_cfp->iseq)->iseq_encoded), \
-                        (reg_cfp->pc - ISEQ_BODY(reg_cfp->iseq)->iseq_encoded), \
-                        RSTRING_PTR(rb_iseq_path(reg_cfp->iseq)), \
-                        rb_iseq_line_no(reg_cfp->iseq, reg_pc - ISEQ_BODY(reg_cfp->iseq)->iseq_encoded)); \
-  }
-
-#define INSN_DISPATCH_SIG(insn)
-
-#define INSN_ENTRY(insn) \
-  LABEL(insn): \
-  INSN_ENTRY_SIG(insn); \
-
-/**********************************/
-#if OPT_DIRECT_THREADED_CODE
-
-/* for GCC 3.4.x */
-#define TC_DISPATCH(insn) \
-  INSN_DISPATCH_SIG(insn); \
-  RB_GNUC_EXTENSION_BLOCK(goto *(void const *)GET_CURRENT_INSN()); \
-  ;
-
-#else
-/* token threaded code */
-
-/* dispatcher */
-#if defined(__GNUC__) && (defined(__i386__) || defined(__x86_64__)) && __GNUC__ == 3
-#define DISPATCH_ARCH_DEPEND_WAY(addr) \
-  __asm__ __volatile__("jmp *%0;\t# -- inserted by vm.h\t[length = 2]" : : "r" (addr))
-
-#else
-#define DISPATCH_ARCH_DEPEND_WAY(addr) \
-                                /* do nothing */
-#endif
-#define TC_DISPATCH(insn)  \
-  DISPATCH_ARCH_DEPEND_WAY(insns_address_table[GET_CURRENT_INSN()]); \
-  INSN_DISPATCH_SIG(insn); \
-  RB_GNUC_EXTENSION_BLOCK(goto *insns_address_table[GET_CURRENT_INSN()]); \
-  rb_bug("tc error");
-
-#endif /* OPT_DIRECT_THREADED_CODE */
-
-#define END_INSN(insn)      \
-  DEBUG_END_INSN();         \
-  TC_DISPATCH(insn);
-
-#define INSN_DISPATCH()     \
-  TC_DISPATCH(__START__)    \
-  {
-
-#define END_INSNS_DISPATCH()    \
-      rb_bug("unknown insn: %"PRIdVALUE, GET_CURRENT_INSN());   \
-  }   /* end of while loop */   \
-
-#define NEXT_INSN() TC_DISPATCH(__NEXT_INSN__)
-
-/************************************************/
-#else /* no threaded code */
-/* most common method */
-
-#define INSN_ENTRY(insn) \
-case BIN(insn):
-
-#define END_INSN(insn)                        \
-  DEBUG_END_INSN();                           \
-  break;
-
-#define INSN_DISPATCH()         \
-  while (1) {			\
-    switch (GET_CURRENT_INSN()) {
-
-#define END_INSNS_DISPATCH()    \
-default:                        \
-  SDR(); \
-      rb_bug("unknown insn: %ld", GET_CURRENT_INSN());   \
-    } /* end of switch */       \
-  }   /* end of while loop */   \
-
-#define NEXT_INSN() goto first
-
-#endif
-
-#ifndef START_OF_ORIGINAL_INSN
-#define START_OF_ORIGINAL_INSN(x) if (0) goto start_of_##x; start_of_##x:
-#define DISPATCH_ORIGINAL_INSN(x) goto  start_of_##x;
-#endif
-
-#define VM_SP_CNT(ec, sp) ((sp) - (ec)->vm_stack)
-
-#if OPT_CALL_THREADED_CODE
-#define THROW_EXCEPTION(exc) do { \
-    ec->errinfo = (VALUE)(exc); \
-    return 0; \
-} while (0)
-#else
-#define THROW_EXCEPTION(exc) return (VALUE)(exc)
-#endif
-
-// Run the interpreter from the JIT
-#define VM_EXEC(ec, val) do { \
-    if (UNDEF_P(val)) { \
-        VM_ENV_FLAGS_SET(ec->cfp->ep, VM_FRAME_FLAG_FINISH); \
-        val = vm_exec(ec); \
-    } \
-} while (0)
-
-// Run the JIT from the interpreter
-#define JIT_EXEC(ec, val) do { \
-    rb_jit_func_t func; \
-    /* don't run tailcalls since that breaks FINISH */ \
-    if (UNDEF_P(val) && GET_CFP() != ec->cfp && (func = jit_compile(ec))) { \
-        val = func(ec, ec->cfp); \
-        if (ec->tag->state) THROW_EXCEPTION(val); \
-    } \
-} while (0)
-
-#define SCREG(r) (reg_##r)
-
-#define VM_DEBUG_STACKOVERFLOW 0
-
-#if VM_DEBUG_STACKOVERFLOW
-#define CHECK_VM_STACK_OVERFLOW_FOR_INSN CHECK_VM_STACK_OVERFLOW
-#else
-#define CHECK_VM_STACK_OVERFLOW_FOR_INSN(cfp, margin)
-#endif
-
-#define INSN_LABEL2(insn, name) INSN_LABEL_ ## insn ## _ ## name
-#define INSN_LABEL(x) INSN_LABEL2(NAME_OF_CURRENT_INSN, x)
-
-#endif /* RUBY_VM_EXEC_H */

data/lib/debase/ruby_core_source/ruby-3.4.0-preview2/vm_opts.h

@@ -1,67 +0,0 @@
-#ifndef RUBY_VM_OPTS_H/*-*-c-*-*/
-#define RUBY_VM_OPTS_H
-/**********************************************************************
-
-  vm_opts.h - VM optimize option
-
-  $Author$
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-/* Compile options.
- * You can change these options at runtime by VM::CompileOption.
- * Following definitions are default values.
- */
-
-#define OPT_TAILCALL_OPTIMIZATION       0
-#define OPT_PEEPHOLE_OPTIMIZATION       1
-#define OPT_SPECIALISED_INSTRUCTION     1
-#define OPT_INLINE_CONST_CACHE          1
-#define OPT_FROZEN_STRING_LITERAL       -1
-#define OPT_DEBUG_FROZEN_STRING_LITERAL 0
-
-/* Build Options.
- * You can't change these options at runtime.
- */
-
-/* C compiler dependent */
-
-/*
- * 0: direct (using labeled goto using GCC special)
- * 1: token (switch/case)
- * 2: call (function call for each insn dispatch)
- */
-#ifndef OPT_THREADED_CODE
-#define OPT_THREADED_CODE 0
-#endif
-
-#define OPT_DIRECT_THREADED_CODE (OPT_THREADED_CODE == 0)
-#define OPT_TOKEN_THREADED_CODE  (OPT_THREADED_CODE == 1)
-#define OPT_CALL_THREADED_CODE   (OPT_THREADED_CODE == 2)
-
-/* VM running option */
-#define OPT_CHECKED_RUN              1
-#define OPT_INLINE_METHOD_CACHE      1
-#define OPT_GLOBAL_METHOD_CACHE      1
-
-#ifndef OPT_IC_FOR_IVAR
-#define OPT_IC_FOR_IVAR 1
-#endif
-
-/* architecture independent, affects generated code */
-#define OPT_OPERANDS_UNIFICATION     1
-#define OPT_INSTRUCTIONS_UNIFICATION 0
-#define OPT_UNIFY_ALL_COMBINATION    0
-
-/* misc */
-#ifndef OPT_SUPPORT_JOKE
-#define OPT_SUPPORT_JOKE             0
-#endif
-
-#ifndef VM_COLLECT_USAGE_DETAILS
-#define VM_COLLECT_USAGE_DETAILS     0
-#endif
-
-#endif /* RUBY_VM_OPTS_H */