debase-ruby_core_source 0.10.17 → 3.2.0

data/lib/debase/ruby_core_source/ruby-3.2.0-preview1/thread_none.h

@@ -1,17 +0,0 @@
-#ifndef RUBY_THREAD_NONE_H
-#define RUBY_THREAD_NONE_H
-
-#define RB_NATIVETHREAD_LOCK_INIT (void)(0)
-#define RB_NATIVETHREAD_COND_INIT (void)(0)
-
-// no-thread impl doesn't use TLS but define this to avoid using tls key
-// based implementation in vm.c
-#define RB_THREAD_LOCAL_SPECIFIER
-
-typedef struct native_thread_data_struct {} native_thread_data_t;
-
-typedef struct rb_global_vm_lock_struct {} rb_global_vm_lock_t;
-
-RUBY_EXTERN struct rb_execution_context_struct *ruby_current_ec;
-
-#endif /* RUBY_THREAD_NONE_H */

data/lib/debase/ruby_core_source/ruby-3.2.0-preview1/thread_pthread.h

@@ -1,115 +0,0 @@
-#ifndef RUBY_THREAD_PTHREAD_H
-#define RUBY_THREAD_PTHREAD_H
-/**********************************************************************
-
-  thread_pthread.h -
-
-  $Author$
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-#ifdef HAVE_PTHREAD_NP_H
-#include <pthread_np.h>
-#endif
-
-#define RB_NATIVETHREAD_LOCK_INIT PTHREAD_MUTEX_INITIALIZER
-#define RB_NATIVETHREAD_COND_INIT PTHREAD_COND_INITIALIZER
-
-typedef struct native_thread_data_struct {
-    union {
-        struct ccan_list_node ubf;
-        struct ccan_list_node gvl;
-    } node;
-#if defined(__GLIBC__) || defined(__FreeBSD__)
-    union
-#else
-    /*
-     * assume the platform condvars are badly implemented and have a
-     * "memory" of which mutex they're associated with
-     */
-    struct
-#endif
-    {
-        rb_nativethread_cond_t intr; /* th->interrupt_lock */
-        rb_nativethread_cond_t gvlq; /* vm->gvl.lock */
-    } cond;
-} native_thread_data_t;
-
-#undef except
-#undef try
-#undef leave
-#undef finally
-
-typedef struct rb_global_vm_lock_struct {
-    /* fast path */
-    const struct rb_thread_struct *owner;
-    rb_nativethread_lock_t lock; /* AKA vm->gvl.lock */
-
-    /*
-     * slow path, protected by vm->gvl.lock
-     * - @waitq - FIFO queue of threads waiting for GVL
-     * - @timer - it handles timeslices for @owner.  It is any one thread
-     *   in @waitq, there is no @timer if @waitq is empty, but always
-     *   a @timer if @waitq has entries
-     * - @timer_err tracks timeslice limit, the timeslice only resets
-     *   when pthread_cond_timedwait returns ETIMEDOUT, so frequent
-     *   switching between contended/uncontended GVL won't reset the
-     *   timer.
-     */
-    struct ccan_list_head waitq; /* <=> native_thread_data_t.node.ubf */
-    const struct rb_thread_struct *timer;
-    int timer_err;
-
-    /* yield */
-    rb_nativethread_cond_t switch_cond;
-    rb_nativethread_cond_t switch_wait_cond;
-    int need_yield;
-    int wait_yield;
-} rb_global_vm_lock_t;
-
-
-#if __STDC_VERSION__ >= 201112
-  #define RB_THREAD_LOCAL_SPECIFIER _Thread_local
-#elif defined(__GNUC__)
-  /* note that ICC (linux) and Clang are covered by __GNUC__ */
-  #define RB_THREAD_LOCAL_SPECIFIER __thread
-#else
-
-typedef pthread_key_t native_tls_key_t;
-
-static inline void *
-native_tls_get(native_tls_key_t key)
-{
-    void *ptr = pthread_getspecific(key);
-    if (UNLIKELY(ptr == NULL)) {
-        rb_bug("pthread_getspecific returns NULL");
-    }
-    return ptr;
-}
-
-static inline void
-native_tls_set(native_tls_key_t key, void *ptr)
-{
-    if (UNLIKELY(pthread_setspecific(key, ptr) != 0)) {
-        rb_bug("pthread_setspecific error");
-    }
-}
-#endif
-
-RUBY_SYMBOL_EXPORT_BEGIN
-#ifdef RB_THREAD_LOCAL_SPECIFIER
-  #ifdef __APPLE__
-    // on Darwin, TLS can not be accessed across .so
-    struct rb_execution_context_struct *rb_current_ec(void);
-    void rb_current_ec_set(struct rb_execution_context_struct *);
-  #else
-    RUBY_EXTERN RB_THREAD_LOCAL_SPECIFIER struct rb_execution_context_struct *ruby_current_ec;
-  #endif
-#else
-  RUBY_EXTERN native_tls_key_t ruby_current_ec_key;
-#endif
-RUBY_SYMBOL_EXPORT_END
-
-#endif /* RUBY_THREAD_PTHREAD_H */

data/lib/debase/ruby_core_source/ruby-3.2.0-preview1/thread_win32.h

@@ -1,61 +0,0 @@
-#ifndef RUBY_THREAD_WIN32_H
-#define RUBY_THREAD_WIN32_H
-/**********************************************************************
-
-  thread_win32.h -
-
-  $Author$
-
-  Copyright (C) 2004-2007 Koichi Sasada
-
-**********************************************************************/
-
-/* interface */
-
-# ifdef __CYGWIN__
-# undef _WIN32
-# endif
-
-#define USE_VM_CLOCK 1
-
-WINBASEAPI BOOL WINAPI
-TryEnterCriticalSection(IN OUT LPCRITICAL_SECTION lpCriticalSection);
-
-struct rb_thread_cond_struct {
-    struct cond_event_entry *next;
-    struct cond_event_entry *prev;
-};
-
-typedef struct native_thread_data_struct {
-    HANDLE interrupt_event;
-} native_thread_data_t;
-
-typedef struct rb_global_vm_lock_struct {
-    HANDLE lock;
-} rb_global_vm_lock_t;
-
-typedef DWORD native_tls_key_t; // TLS index
-
-static inline void *
-native_tls_get(native_tls_key_t key)
-{
-    void *ptr = TlsGetValue(key);
-    if (UNLIKELY(ptr == NULL)) {
-        rb_bug("TlsGetValue() returns NULL");
-    }
-    return ptr;
-}
-
-static inline void
-native_tls_set(native_tls_key_t key, void *ptr)
-{
-    if (UNLIKELY(TlsSetValue(key, ptr) == 0)) {
-        rb_bug("TlsSetValue() error");
-    }
-}
-
-RUBY_SYMBOL_EXPORT_BEGIN
-RUBY_EXTERN native_tls_key_t ruby_current_ec_key;
-RUBY_SYMBOL_EXPORT_END
-
-#endif /* RUBY_THREAD_WIN32_H */

data/lib/debase/ruby_core_source/ruby-3.2.0-preview1/transcode_data.h

@@ -1,138 +0,0 @@
-#ifndef RUBY_TRANSCODE_DATA_H
-#define RUBY_TRANSCODE_DATA_H 1
-/**********************************************************************
-
-  transcode_data.h -
-
-  $Author$
-  created at: Mon 10 Dec 2007 14:01:47 JST 2007
-
-  Copyright (C) 2007 Martin Duerst
-
-**********************************************************************/
-
-#include "ruby/ruby.h"
-
-RUBY_SYMBOL_EXPORT_BEGIN
-
-#define WORDINDEX_SHIFT_BITS 2
-#define WORDINDEX2INFO(widx)      ((widx) << WORDINDEX_SHIFT_BITS)
-#define INFO2WORDINDEX(info)      ((info) >> WORDINDEX_SHIFT_BITS)
-#define BYTE_LOOKUP_BASE(bl) ((bl)[0])
-#define BYTE_LOOKUP_INFO(bl) ((bl)[1])
-
-#define PType (unsigned int)
-
-#define NOMAP	(PType 0x01)	/* direct map */
-#define ONEbt	(0x02)		/* one byte payload */
-#define TWObt	(0x03)		/* two bytes payload */
-#define THREEbt	(0x05)		/* three bytes payload */
-#define FOURbt	(0x06)		/* four bytes payload, UTF-8 only, macros start at getBT0 */
-#define INVALID	(PType 0x07)	/* invalid byte sequence */
-#define UNDEF	(PType 0x09)	/* legal but undefined */
-#define ZERObt	(PType 0x0A)	/* zero bytes of payload, i.e. remove */
-#define FUNii	(PType 0x0B)	/* function from info to info */
-#define FUNsi	(PType 0x0D)	/* function from start to info */
-#define FUNio	(PType 0x0E)	/* function from info to output */
-#define FUNso	(PType 0x0F)	/* function from start to output */
-#define STR1	(PType 0x11)	/* string 4 <= len <= 259 bytes: 1byte length + content */
-#define GB4bt	(PType 0x12)	/* GB18030 four bytes payload */
-#define FUNsio  (PType 0x13)    /* function from start and info to output */
-
-#define STR1_LENGTH(byte_addr) (unsigned int)(*(byte_addr) + 4)
-#define STR1_BYTEINDEX(w) ((w) >> 6)
-#define makeSTR1(bi) (((bi) << 6) | STR1)
-#define makeSTR1LEN(len) ((len)-4)
-
-#define o1(b1)		(PType((((unsigned char)(b1))<<8)|ONEbt))
-#define o2(b1,b2)	(PType((((unsigned char)(b1))<<8)|\
-			       (((unsigned char)(b2))<<16)|\
-			       TWObt))
-#define o3(b1,b2,b3)	(PType(((((unsigned char)(b1))<<8)|\
-				(((unsigned char)(b2))<<16)|\
-				(((unsigned int)(unsigned char)(b3))<<24)|\
-				THREEbt)&\
-			       0xffffffffU))
-#define o4(b0,b1,b2,b3)	(PType(((((unsigned char)(b1))<<8)|\
-				(((unsigned char)(b2))<<16)|\
-				(((unsigned int)(unsigned char)(b3))<<24)|\
-				((((unsigned char)(b0))&0x07)<<5)|\
-				FOURbt)&\
-			       0xffffffffU))
-#define g4(b0,b1,b2,b3) (PType(((((unsigned char)(b0))<<8)|\
-				(((unsigned char)(b2))<<16)|\
-				((((unsigned char)(b1))&0x0f)<<24)|\
-				((((unsigned int)(unsigned char)(b3))&0x0f)<<28)|\
-				GB4bt)&\
-			       0xffffffffU))
-#define funsio(diff)	(PType((((unsigned int)(diff))<<8)|FUNsio))
-
-#define getBT1(a)	((unsigned char)((a)>> 8))
-#define getBT2(a)	((unsigned char)((a)>>16))
-#define getBT3(a)	((unsigned char)((a)>>24))
-#define getBT0(a)	(((unsigned char)((a)>> 5)&0x07)|0xF0)   /* for UTF-8 only!!! */
-
-#define getGB4bt0(a)	((unsigned char)((a)>> 8))
-#define getGB4bt1(a)	(((unsigned char)((a)>>24)&0x0F)|0x30)
-#define getGB4bt2(a)	((unsigned char)((a)>>16))
-#define getGB4bt3(a)	(((unsigned char)((a)>>28)&0x0F)|0x30)
-
-#define o2FUNii(b1,b2)	(PType((((unsigned char)(b1))<<8)|(((unsigned char)(b2))<<16)|FUNii))
-
-/* do we need these??? maybe not, can be done with simple tables */
-#define ONETRAIL       /* legal but undefined if one more trailing UTF-8 */
-#define TWOTRAIL       /* legal but undefined if two more trailing UTF-8 */
-#define THREETRAIL     /* legal but undefined if three more trailing UTF-8 */
-
-typedef enum {
-    asciicompat_converter,        /* ASCII-compatible -> ASCII-compatible */
-    asciicompat_decoder,          /* ASCII-incompatible -> ASCII-compatible */
-    asciicompat_encoder           /* ASCII-compatible -> ASCII-incompatible */
-  /* ASCII-incompatible -> ASCII-incompatible is intentionally omitted. */
-} rb_transcoder_asciicompat_type_t;
-
-typedef struct rb_transcoder rb_transcoder;
-
-/* static structure, one per supported encoding pair */
-struct rb_transcoder {
-    const char *src_encoding;
-    const char *dst_encoding;
-    unsigned int conv_tree_start;
-    const unsigned char *byte_array;
-    unsigned int byte_array_length;
-    const unsigned int *word_array;
-    unsigned int word_array_length;
-    int word_size;
-    int input_unit_length;
-    int max_input;
-    int max_output;
-    rb_transcoder_asciicompat_type_t asciicompat_type;
-    size_t state_size;
-    int (*state_init_func)(void*); /* ret==0:success ret!=0:failure(errno) */
-    int (*state_fini_func)(void*); /* ret==0:success ret!=0:failure(errno) */
-    VALUE (*func_ii)(void*, VALUE); /* info  -> info   */
-    VALUE (*func_si)(void*, const unsigned char*, size_t); /* start -> info   */
-    ssize_t (*func_io)(void*, VALUE, const unsigned char*, size_t); /* info  -> output */
-    ssize_t (*func_so)(void*, const unsigned char*, size_t, unsigned char*, size_t); /* start -> output */
-    ssize_t (*finish_func)(void*, unsigned char*, size_t); /* -> output */
-    ssize_t (*resetsize_func)(void*); /* -> len */
-    ssize_t (*resetstate_func)(void*, unsigned char*, size_t); /* -> output */
-    ssize_t (*func_sio)(void*, const unsigned char*, size_t, VALUE, unsigned char*, size_t); /* start -> output */
-};
-
-void rb_declare_transcoder(const char *enc1, const char *enc2, const char *lib);
-void rb_register_transcoder(const rb_transcoder *);
-
-/*
- * To get rid of collision of initializer symbols in statically-linked encodings
- * and transcoders
- */
-#if defined(EXTSTATIC) && EXTSTATIC
-# define TRANS_INIT(name) void Init_trans_ ## name(void)
-#else
-# define TRANS_INIT(name) void Init_ ## name(void)
-#endif
-
-RUBY_SYMBOL_EXPORT_END
-
-#endif /* RUBY_TRANSCODE_DATA_H */

data/lib/debase/ruby_core_source/ruby-3.2.0-preview1/version.h

@@ -1,91 +0,0 @@
-#ifndef RUBY_TOPLEVEL_VERSION_H                          /*-*-C-*-vi:se ft=c:*/
-#define RUBY_TOPLEVEL_VERSION_H
-/**
- * @author     Ruby developers <ruby-core@ruby-lang.org>
- * @copyright  This  file  is   a  part  of  the   programming  language  Ruby.
- *             Permission  is hereby  granted,  to  either redistribute  and/or
- *             modify this file, provided that  the conditions mentioned in the
- *             file COPYING are met.  Consult the file for details.
- */
-# define RUBY_VERSION_MAJOR RUBY_API_VERSION_MAJOR
-# define RUBY_VERSION_MINOR RUBY_API_VERSION_MINOR
-#define RUBY_VERSION_TEENY 0
-#define RUBY_RELEASE_DATE RUBY_RELEASE_YEAR_STR"-"RUBY_RELEASE_MONTH_STR"-"RUBY_RELEASE_DAY_STR
-#define RUBY_PATCHLEVEL -1
-
-#define RUBY_RELEASE_YEAR 2022
-#define RUBY_RELEASE_MONTH 4
-#define RUBY_RELEASE_DAY 3
-
-#include "ruby/version.h"
-#include "ruby/internal/abi.h"
-
-#ifndef TOKEN_PASTE
-#define TOKEN_PASTE(x,y) x##y
-#endif
-#define ONLY_ONE_DIGIT(x) TOKEN_PASTE(10,x) < 1000
-#define WITH_ZERO_PADDING(x) TOKEN_PASTE(0,x)
-#define RUBY_BIRTH_YEAR_STR STRINGIZE(RUBY_BIRTH_YEAR)
-#define RUBY_RELEASE_YEAR_STR STRINGIZE(RUBY_RELEASE_YEAR)
-#if ONLY_ONE_DIGIT(RUBY_RELEASE_MONTH)
-#define RUBY_RELEASE_MONTH_STR STRINGIZE(WITH_ZERO_PADDING(RUBY_RELEASE_MONTH))
-#else
-#define RUBY_RELEASE_MONTH_STR STRINGIZE(RUBY_RELEASE_MONTH)
-#endif
-#if ONLY_ONE_DIGIT(RUBY_RELEASE_DAY)
-#define RUBY_RELEASE_DAY_STR STRINGIZE(WITH_ZERO_PADDING(RUBY_RELEASE_DAY))
-#else
-#define RUBY_RELEASE_DAY_STR STRINGIZE(RUBY_RELEASE_DAY)
-#endif
-
-#if !defined RUBY_LIB_VERSION && defined RUBY_LIB_VERSION_STYLE
-# if RUBY_LIB_VERSION_STYLE == 3
-#   define RUBY_LIB_VERSION STRINGIZE(RUBY_API_VERSION_MAJOR)"."STRINGIZE(RUBY_API_VERSION_MINOR) \
-        "."STRINGIZE(RUBY_API_VERSION_TEENY)"+"STRINGIZE(RUBY_ABI_VERSION)
-# elif RUBY_LIB_VERSION_STYLE == 2
-#   define RUBY_LIB_VERSION STRINGIZE(RUBY_API_VERSION_MAJOR)"."STRINGIZE(RUBY_API_VERSION_MINOR) \
-    "+"STRINGIZE(RUBY_ABI_VERSION)
-# endif
-#endif
-
-#if RUBY_PATCHLEVEL == -1
-#define RUBY_PATCHLEVEL_STR "preview1"
-#else
-#define RUBY_PATCHLEVEL_STR ""
-#endif
-
-#ifndef RUBY_REVISION
-# include "revision.h"
-#endif
-
-#ifdef RUBY_REVISION
-# if RUBY_PATCHLEVEL == -1
-#  ifndef RUBY_BRANCH_NAME
-#   define RUBY_BRANCH_NAME "master"
-#  endif
-#  define RUBY_REVISION_STR " "RUBY_BRANCH_NAME" "RUBY_REVISION
-# else
-#  define RUBY_REVISION_STR " revision "RUBY_REVISION
-# endif
-#else
-# define RUBY_REVISION "HEAD"
-# define RUBY_REVISION_STR ""
-#endif
-#if !defined RUBY_RELEASE_DATETIME || RUBY_PATCHLEVEL != -1
-# undef RUBY_RELEASE_DATETIME
-# define RUBY_RELEASE_DATETIME RUBY_RELEASE_DATE
-#endif
-
-# define RUBY_DESCRIPTION_WITH(opt) \
-    "ruby "RUBY_VERSION		    \
-    RUBY_PATCHLEVEL_STR		    \
-    " ("RUBY_RELEASE_DATETIME	    \
-    RUBY_REVISION_STR")"opt" "	    \
-    "["RUBY_PLATFORM"]"
-# define RUBY_COPYRIGHT		    \
-    "ruby - Copyright (C) "	    \
-    RUBY_BIRTH_YEAR_STR"-"   \
-    RUBY_RELEASE_YEAR_STR" " \
-    RUBY_AUTHOR
-
-#endif /* RUBY_TOPLEVEL_VERSION_H */