debase-ruby_core_source 0.10.9 → 0.10.10

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

@@ -1,70 +0,0 @@
-/*-*-c-*-*/
-/**********************************************************************
-
-  vm_opts.h - VM optimize option
-
-  $Author$
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-
-#ifndef RUBY_VM_OPTS_H
-#define RUBY_VM_OPTS_H
-
-/* 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       0
-#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
-#define OPT_BLOCKINLINING            0
-
-#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
-#define OPT_STACK_CACHING            0
-
-/* misc */
-#define OPT_SUPPORT_JOKE             0
-
-#ifndef VM_COLLECT_USAGE_DETAILS
-#define VM_COLLECT_USAGE_DETAILS     0
-#endif
-
-#endif /* RUBY_VM_OPTS_H */

data/lib/debase/ruby_core_source/ruby-2.7.0-preview2/vmtc.inc

@@ -1,243 +0,0 @@
-/* -*- C -*- */
-
-/* This is  an auto-generated file  and is a  part of the  programming language
- * Ruby.   The person  who  created  a program  to  generate  this file  (``I''
- * hereafter) would like  to refrain from defining licensing  of this generated
- * source code.
- *
- * This file consists of many small  parts of codes copyrighted by each author,
- * not  only  the  ``I''  person.   Those  original  authors  agree  with  some
- * open-source license.  I  believe that the license we agree  is the condition
- * mentioned in  the file COPYING.  It  states "4.  You may  modify and include
- * the part of the software into any  other software ...".  But the problem is,
- * the license never makes it clear if  such modified parts still remain in the
- * same  license, or  not.   The fact  that  we agree  with  the source  code's
- * licensing terms does not automatically  define that of generated ones.  This
- * is the reason why this file is  under an unclear situation.  All what I know
- * is that above provision guarantees this file to exist.
- *
- * Please let me hesitate to declare  something about this nuanced contract.  I
- * am not in the position to take  over other authors' license to merge into my
- * one.  Changing them to (say) GPLv3 is not doable by myself.  Perhaps someday
- * it might turn  out to be okay to  say this file is under a  license.  I wish
- * the situation would become more clear in the future. */
-/*******************************************************************/
-/*******************************************************************/
-/*******************************************************************/
-/**
-  This file is for threaded code.
-
-  ----
-  This file is auto generated by insns2vm.rb
-  DO NOT TOUCH!
-
-  If you want to fix something, you must edit "tool/ruby_vm/views/vmtc.inc.erb"
-  or tool/insns2vm.rb
- */
-
-static const void *const insns_address_table[] = {
-    LABEL_PTR(nop),
-    LABEL_PTR(getlocal),
-    LABEL_PTR(setlocal),
-    LABEL_PTR(getblockparam),
-    LABEL_PTR(setblockparam),
-    LABEL_PTR(getblockparamproxy),
-    LABEL_PTR(getspecial),
-    LABEL_PTR(setspecial),
-    LABEL_PTR(getinstancevariable),
-    LABEL_PTR(setinstancevariable),
-    LABEL_PTR(getclassvariable),
-    LABEL_PTR(setclassvariable),
-    LABEL_PTR(getconstant),
-    LABEL_PTR(setconstant),
-    LABEL_PTR(getglobal),
-    LABEL_PTR(setglobal),
-    LABEL_PTR(putnil),
-    LABEL_PTR(putself),
-    LABEL_PTR(putobject),
-    LABEL_PTR(putspecialobject),
-    LABEL_PTR(putstring),
-    LABEL_PTR(concatstrings),
-    LABEL_PTR(tostring),
-    LABEL_PTR(freezestring),
-    LABEL_PTR(toregexp),
-    LABEL_PTR(intern),
-    LABEL_PTR(newarray),
-    LABEL_PTR(newarraykwsplat),
-    LABEL_PTR(duparray),
-    LABEL_PTR(duphash),
-    LABEL_PTR(expandarray),
-    LABEL_PTR(concatarray),
-    LABEL_PTR(splatarray),
-    LABEL_PTR(newhash),
-    LABEL_PTR(newrange),
-    LABEL_PTR(pop),
-    LABEL_PTR(dup),
-    LABEL_PTR(dupn),
-    LABEL_PTR(swap),
-    LABEL_PTR(reverse),
-    LABEL_PTR(topn),
-    LABEL_PTR(setn),
-    LABEL_PTR(adjuststack),
-    LABEL_PTR(defined),
-    LABEL_PTR(checkmatch),
-    LABEL_PTR(checkkeyword),
-    LABEL_PTR(checktype),
-    LABEL_PTR(methodref),
-    LABEL_PTR(defineclass),
-    LABEL_PTR(definemethod),
-    LABEL_PTR(definesmethod),
-    LABEL_PTR(send),
-    LABEL_PTR(opt_send_without_block),
-    LABEL_PTR(opt_str_freeze),
-    LABEL_PTR(opt_nil_p),
-    LABEL_PTR(opt_str_uminus),
-    LABEL_PTR(opt_newarray_max),
-    LABEL_PTR(opt_newarray_min),
-    LABEL_PTR(invokesuper),
-    LABEL_PTR(invokeblock),
-    LABEL_PTR(leave),
-    LABEL_PTR(throw),
-    LABEL_PTR(jump),
-    LABEL_PTR(branchif),
-    LABEL_PTR(branchunless),
-    LABEL_PTR(branchnil),
-    LABEL_PTR(opt_getinlinecache),
-    LABEL_PTR(opt_setinlinecache),
-    LABEL_PTR(once),
-    LABEL_PTR(opt_case_dispatch),
-    LABEL_PTR(opt_plus),
-    LABEL_PTR(opt_minus),
-    LABEL_PTR(opt_mult),
-    LABEL_PTR(opt_div),
-    LABEL_PTR(opt_mod),
-    LABEL_PTR(opt_eq),
-    LABEL_PTR(opt_neq),
-    LABEL_PTR(opt_lt),
-    LABEL_PTR(opt_le),
-    LABEL_PTR(opt_gt),
-    LABEL_PTR(opt_ge),
-    LABEL_PTR(opt_ltlt),
-    LABEL_PTR(opt_and),
-    LABEL_PTR(opt_or),
-    LABEL_PTR(opt_aref),
-    LABEL_PTR(opt_aset),
-    LABEL_PTR(opt_aset_with),
-    LABEL_PTR(opt_aref_with),
-    LABEL_PTR(opt_length),
-    LABEL_PTR(opt_size),
-    LABEL_PTR(opt_empty_p),
-    LABEL_PTR(opt_succ),
-    LABEL_PTR(opt_not),
-    LABEL_PTR(opt_regexpmatch2),
-    LABEL_PTR(opt_call_c_function),
-    LABEL_PTR(getlocal_WC_0),
-    LABEL_PTR(getlocal_WC_1),
-    LABEL_PTR(setlocal_WC_0),
-    LABEL_PTR(setlocal_WC_1),
-    LABEL_PTR(putobject_INT2FIX_0_),
-    LABEL_PTR(putobject_INT2FIX_1_),
-    LABEL_PTR(trace_nop),
-    LABEL_PTR(trace_getlocal),
-    LABEL_PTR(trace_setlocal),
-    LABEL_PTR(trace_getblockparam),
-    LABEL_PTR(trace_setblockparam),
-    LABEL_PTR(trace_getblockparamproxy),
-    LABEL_PTR(trace_getspecial),
-    LABEL_PTR(trace_setspecial),
-    LABEL_PTR(trace_getinstancevariable),
-    LABEL_PTR(trace_setinstancevariable),
-    LABEL_PTR(trace_getclassvariable),
-    LABEL_PTR(trace_setclassvariable),
-    LABEL_PTR(trace_getconstant),
-    LABEL_PTR(trace_setconstant),
-    LABEL_PTR(trace_getglobal),
-    LABEL_PTR(trace_setglobal),
-    LABEL_PTR(trace_putnil),
-    LABEL_PTR(trace_putself),
-    LABEL_PTR(trace_putobject),
-    LABEL_PTR(trace_putspecialobject),
-    LABEL_PTR(trace_putstring),
-    LABEL_PTR(trace_concatstrings),
-    LABEL_PTR(trace_tostring),
-    LABEL_PTR(trace_freezestring),
-    LABEL_PTR(trace_toregexp),
-    LABEL_PTR(trace_intern),
-    LABEL_PTR(trace_newarray),
-    LABEL_PTR(trace_newarraykwsplat),
-    LABEL_PTR(trace_duparray),
-    LABEL_PTR(trace_duphash),
-    LABEL_PTR(trace_expandarray),
-    LABEL_PTR(trace_concatarray),
-    LABEL_PTR(trace_splatarray),
-    LABEL_PTR(trace_newhash),
-    LABEL_PTR(trace_newrange),
-    LABEL_PTR(trace_pop),
-    LABEL_PTR(trace_dup),
-    LABEL_PTR(trace_dupn),
-    LABEL_PTR(trace_swap),
-    LABEL_PTR(trace_reverse),
-    LABEL_PTR(trace_topn),
-    LABEL_PTR(trace_setn),
-    LABEL_PTR(trace_adjuststack),
-    LABEL_PTR(trace_defined),
-    LABEL_PTR(trace_checkmatch),
-    LABEL_PTR(trace_checkkeyword),
-    LABEL_PTR(trace_checktype),
-    LABEL_PTR(trace_methodref),
-    LABEL_PTR(trace_defineclass),
-    LABEL_PTR(trace_definemethod),
-    LABEL_PTR(trace_definesmethod),
-    LABEL_PTR(trace_send),
-    LABEL_PTR(trace_opt_send_without_block),
-    LABEL_PTR(trace_opt_str_freeze),
-    LABEL_PTR(trace_opt_nil_p),
-    LABEL_PTR(trace_opt_str_uminus),
-    LABEL_PTR(trace_opt_newarray_max),
-    LABEL_PTR(trace_opt_newarray_min),
-    LABEL_PTR(trace_invokesuper),
-    LABEL_PTR(trace_invokeblock),
-    LABEL_PTR(trace_leave),
-    LABEL_PTR(trace_throw),
-    LABEL_PTR(trace_jump),
-    LABEL_PTR(trace_branchif),
-    LABEL_PTR(trace_branchunless),
-    LABEL_PTR(trace_branchnil),
-    LABEL_PTR(trace_opt_getinlinecache),
-    LABEL_PTR(trace_opt_setinlinecache),
-    LABEL_PTR(trace_once),
-    LABEL_PTR(trace_opt_case_dispatch),
-    LABEL_PTR(trace_opt_plus),
-    LABEL_PTR(trace_opt_minus),
-    LABEL_PTR(trace_opt_mult),
-    LABEL_PTR(trace_opt_div),
-    LABEL_PTR(trace_opt_mod),
-    LABEL_PTR(trace_opt_eq),
-    LABEL_PTR(trace_opt_neq),
-    LABEL_PTR(trace_opt_lt),
-    LABEL_PTR(trace_opt_le),
-    LABEL_PTR(trace_opt_gt),
-    LABEL_PTR(trace_opt_ge),
-    LABEL_PTR(trace_opt_ltlt),
-    LABEL_PTR(trace_opt_and),
-    LABEL_PTR(trace_opt_or),
-    LABEL_PTR(trace_opt_aref),
-    LABEL_PTR(trace_opt_aset),
-    LABEL_PTR(trace_opt_aset_with),
-    LABEL_PTR(trace_opt_aref_with),
-    LABEL_PTR(trace_opt_length),
-    LABEL_PTR(trace_opt_size),
-    LABEL_PTR(trace_opt_empty_p),
-    LABEL_PTR(trace_opt_succ),
-    LABEL_PTR(trace_opt_not),
-    LABEL_PTR(trace_opt_regexpmatch2),
-    LABEL_PTR(trace_opt_call_c_function),
-    LABEL_PTR(trace_getlocal_WC_0),
-    LABEL_PTR(trace_getlocal_WC_1),
-    LABEL_PTR(trace_setlocal_WC_0),
-    LABEL_PTR(trace_setlocal_WC_1),
-    LABEL_PTR(trace_putobject_INT2FIX_0_),
-    LABEL_PTR(trace_putobject_INT2FIX_1_),
-};
-
-ASSERT_VM_INSTRUCTION_SIZE(insns_address_table);

data/lib/debase/ruby_core_source/ruby-2.7.0-preview3/addr2line.h

@@ -1,21 +0,0 @@
-/**********************************************************************
-
-  addr2line.h -
-
-  $Author$
-
-  Copyright (C) 2010 Shinichiro Hamaji
-
-**********************************************************************/
-
-#ifndef RUBY_ADDR2LINE_H
-#define RUBY_ADDR2LINE_H
-
-#if (defined(USE_ELF) || defined(HAVE_MACH_O_LOADER_H))
-
-void
-rb_dump_backtrace_with_lines(int num_traces, void **traces);
-
-#endif /* USE_ELF */
-
-#endif /* RUBY_ADDR2LINE_H */

data/lib/debase/ruby_core_source/ruby-2.7.0-preview3/builtin.h

@@ -1,68 +0,0 @@
-// invoke
-
-struct rb_builtin_function {
-    // for invocation
-    const void * const func_ptr;
-    const int argc;
-
-    // for load
-    const int index;
-    const char * const name;
-};
-
-#define RB_BUILTIN_FUNCTION(_i, _name, _arity) { .name = #_name, .func_ptr = (void *)_name, .argc = _arity, .index = _i }
-
-void rb_load_with_builtin_functions(const char *feature_name, const struct rb_builtin_function *table);
-
-#ifndef VM_CORE_H_EC_DEFINED
-typedef struct rb_execution_context_struct rb_execution_context_t;
-#endif
-
-/* The following code is generated by the following Ruby script:
-
-16.times{|i|
-  args = (i > 0 ? ', ' : '') + (0...i).map{"VALUE"}.join(', ')
-  puts "static inline void rb_builtin_function_check_arity#{i}(VALUE (*f)(rb_execution_context_t *ec, VALUE self#{args})){}"
-}
-*/
-
-static inline void rb_builtin_function_check_arity0(VALUE (*f)(rb_execution_context_t *ec, VALUE self)){}
-static inline void rb_builtin_function_check_arity1(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE)){}
-static inline void rb_builtin_function_check_arity2(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity3(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity4(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity5(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity6(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity7(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity8(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity9(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity10(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity11(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity12(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity13(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity14(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-static inline void rb_builtin_function_check_arity15(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
-
-VALUE rb_vm_lvar_exposed(rb_execution_context_t *ec, int index);
-
-// __builtin_inline!
-
-PUREFUNC(static inline VALUE rb_vm_lvar(rb_execution_context_t *ec, int index));
-
-static inline VALUE
-rb_vm_lvar(rb_execution_context_t *ec, int index)
-{
-#if VM_CORE_H_EC_DEFINED
-    return ec->cfp->ep[index];
-#else
-    return rb_vm_lvar_exposed(ec, index);
-#endif
-}
-
-// dump/load
-
-struct builtin_binary {
-    const char *feature;          // feature name
-    const unsigned char *bin;     // binary by ISeq#to_binary
-    size_t bin_size;
-};

data/lib/debase/ruby_core_source/ruby-2.7.0-preview3/ccan/build_assert/build_assert.h

@@ -1,40 +0,0 @@
-/* CC0 (Public domain) - see ccan/licenses/CC0 file for details */
-#ifndef CCAN_BUILD_ASSERT_H
-#define CCAN_BUILD_ASSERT_H
-
-/**
- * BUILD_ASSERT - assert a build-time dependency.
- * @cond: the compile-time condition which must be true.
- *
- * Your compile will fail if the condition isn't true, or can't be evaluated
- * by the compiler.  This can only be used within a function.
- *
- * Example:
- * #include <stddef.h>
- * ...
- * static char *foo_to_char(struct foo *foo)
- * {
- *     // This code needs string to be at start of foo.
- *     BUILD_ASSERT(offsetof(struct foo, string) == 0);
- *     return (char *)foo;
- * }
- */
-#define BUILD_ASSERT(cond) \
-   do { (void) sizeof(char [1 - 2*!(cond)]); } while(0)
-
-/**
- * BUILD_ASSERT_OR_ZERO - assert a build-time dependency, as an expression.
- * @cond: the compile-time condition which must be true.
- *
- * Your compile will fail if the condition isn't true, or can't be evaluated
- * by the compiler.  This can be used in an expression: its value is "0".
- *
- * Example:
- * #define foo_to_char(foo)                    \
- *      ((char *)(foo)                     \
- *       + BUILD_ASSERT_OR_ZERO(offsetof(struct foo, string) == 0))
- */
-#define BUILD_ASSERT_OR_ZERO(cond) \
-   (sizeof(char [1 - 2*!(cond)]) - 1)
-
-#endif /* CCAN_BUILD_ASSERT_H */

data/lib/debase/ruby_core_source/ruby-2.7.0-preview3/ccan/check_type/check_type.h

@@ -1,63 +0,0 @@
-/* CC0 (Public domain) - see ccan/licenses/CC0 file for details */
-#ifndef CCAN_CHECK_TYPE_H
-#define CCAN_CHECK_TYPE_H
-
-/**
- * check_type - issue a warning or build failure if type is not correct.
- * @expr: the expression whose type we should check (not evaluated).
- * @type: the exact type we expect the expression to be.
- *
- * This macro is usually used within other macros to try to ensure that a macro
- * argument is of the expected type.  No type promotion of the expression is
- * done: an unsigned int is not the same as an int!
- *
- * check_type() always evaluates to 0.
- *
- * If your compiler does not support typeof, then the best we can do is fail
- * to compile if the sizes of the types are unequal (a less complete check).
- *
- * Example:
- * // They should always pass a 64-bit value to _set_some_value!
- * #define set_some_value(expr)            \
- *     _set_some_value((check_type((expr), uint64_t), (expr)))
- */
-
-/**
- * check_types_match - issue a warning or build failure if types are not same.
- * @expr1: the first expression (not evaluated).
- * @expr2: the second expression (not evaluated).
- *
- * This macro is usually used within other macros to try to ensure that
- * arguments are of identical types.  No type promotion of the expressions is
- * done: an unsigned int is not the same as an int!
- *
- * check_types_match() always evaluates to 0.
- *
- * If your compiler does not support typeof, then the best we can do is fail
- * to compile if the sizes of the types are unequal (a less complete check).
- *
- * Example:
- * // Do subtraction to get to enclosing type, but make sure that
- * // pointer is of correct type for that member.
- * #define container_of(mbr_ptr, encl_type, mbr)           \
- *     (check_types_match((mbr_ptr), &((encl_type *)0)->mbr),  \
- *      ((encl_type *)                     \
- *       ((char *)(mbr_ptr) - offsetof(enclosing_type, mbr))))
- */
-#if HAVE_TYPEOF
-#define check_type(expr, type)         \
-   ((typeof(expr) *)0 != (type *)0)
-
-#define check_types_match(expr1, expr2)        \
-   ((typeof(expr1) *)0 != (typeof(expr2) *)0)
-#else
-#include "ccan/build_assert/build_assert.h"
-/* Without typeof, we can only test the sizes. */
-#define check_type(expr, type)                 \
-   BUILD_ASSERT_OR_ZERO(sizeof(expr) == sizeof(type))
-
-#define check_types_match(expr1, expr2)                \
-   BUILD_ASSERT_OR_ZERO(sizeof(expr1) == sizeof(expr2))
-#endif /* HAVE_TYPEOF */
-
-#endif /* CCAN_CHECK_TYPE_H */