-#ifndef RBIMPL_ANYARGS_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ANYARGS_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Function overloads to issue warnings around #ANYARGS.

- *

- * For instance ::rb_define_method takes a pointer to #ANYARGS -ed functions,

- * which in fact varies 18 different prototypes. We still need to preserve

- * #ANYARGS for storages but why not check the consistencies if possible. With

- * those complex macro overlays defined in this header file, use of a function

- * pointer gets checked against the corresponding arity argument.

- *

- * ### Q&A ###

- *

- * - Q: Where did the magic number "18" came from in the description above?

- *

- * - A: Count the case branch of `vm_method.c:call_cfunc_invoker_func()`. Note

- * also that the 18 branches has lasted for at least 25 years. See also

- * commit 200e0ee2fd3c1c006c528874a88f684447215524.

- *

- * - Q: What is this `__weakref__` thing?

- *

- * - A: That is a kind of function overloading mechanism that GCC provides. In

- * this case for instance `rb_define_method_00` is an alias of

- * ::rb_define_method, with a strong type.

- *

- * - Q: What is this `__transparent_union__` thing?

- *

- * A: That is another kind of function overloading mechanism that GCC

- * provides. In this case the attributed function pointer is either

- * `VALUE(*)(int,VALUE*,VALUE)` or `VALUE(*)(int,const VALUE*,VALUE)`.

- *

- * This is better than `void*` or #ANYARGS because we can reject all other

- * possibilities than the two.

- *

- * - Q: What does this #rb_define_method macro mean?

- *

- * - A: It selects appropriate alias of the ::rb_define_method function,

- * depending on the last (arity) argument.

- *

- * - Q: Why the special case for ::rb_f_notimplement ?

- *

- * - A: Function pointer to ::rb_f_notimplement is special cased in

- * `vm_method.c:rb_add_method_cfunc()`. That should be handled by the

- * `__builtin_choose_expr` chain inside of #rb_define_method macro

- * expansion. In order to do so, comparison like

- * `(func == rb_f_notimplement)` is inappropriate for

- * `__builtin_choose_expr`'s expression (which must be a compile-time

- * integer constant but the address of ::rb_f_notimplement is not fixed

- * until the linker). Instead we are using

- * `__builtin_types_compatible_p`, and in doing so we need to distinguish

- * ::rb_f_notimplement from others, by type.

- */

-#include "ruby/impl/attr/maybe_unused.h"

-#include "ruby/impl/attr/nonnull.h"

-#include "ruby/impl/attr/weakref.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/config.h"

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/intern/class.h"

-#include "ruby/impl/intern/vm.h"

-#include "ruby/impl/method.h"

-#include "ruby/impl/value.h"

-#include "ruby/backward/2/stdarg.h"

-

-#if defined(__cplusplus)

-# include "ruby/backward/cxxanyargs.hpp"

-

-#elif defined(_WIN32) || defined(__CYGWIN__)

-# /* Skip due to [Bug #16134] */

-

-#elif ! RBIMPL_HAS_ATTRIBUTE(transparent_union)

-# /* :TODO: improve here, please find a way to support. */

-

-#elif ! defined(HAVE_VA_ARGS_MACRO)

-# /* :TODO: improve here, please find a way to support. */

-

-#else

-# /** @cond INTERNAL_MACRO */

-# if ! defined(HAVE_BUILTIN___BUILTIN_TYPES_COMPATIBLE_P)

-# define RBIMPL_CFUNC_IS_rb_f_notimplement(f) 0

-# else

-# define RBIMPL_CFUNC_IS_rb_f_notimplement(f) \

- __builtin_types_compatible_p( \

- __typeof__(f), \

- __typeof__(rb_f_notimplement))

-# endif

-

-# if ! defined(HAVE_BUILTIN___BUILTIN_CHOOSE_EXPR_CONSTANT_P)

-# define RBIMPL_ANYARGS_DISPATCH(expr, truthy, falsy) (falsy)

-# else

-# define RBIMPL_ANYARGS_DISPATCH(expr, truthy, falsy) \

- __builtin_choose_expr( \

- __builtin_choose_expr( \

- __builtin_constant_p(expr), \

- (expr), 0), \

- (truthy), (falsy))

-# endif

-

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_singleton_method_m2, rb_define_singleton_method_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_singleton_method_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_singleton_method_00, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_singleton_method_01, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_singleton_method_02, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_singleton_method_03, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_singleton_method_04, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_singleton_method_05, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_singleton_method_06, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_singleton_method_07, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_singleton_method_08, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_singleton_method_09, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_singleton_method_10, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_singleton_method_11, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_singleton_method_12, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_singleton_method_13, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_singleton_method_14, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_singleton_method_15, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_protected_method_m2, rb_define_protected_method_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_protected_method_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_protected_method_00, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_protected_method_01, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_protected_method_02, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_protected_method_03, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_protected_method_04, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_protected_method_05, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_protected_method_06, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_protected_method_07, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_protected_method_08, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_protected_method_09, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_protected_method_10, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_protected_method_11, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_protected_method_12, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_protected_method_13, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_protected_method_14, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_protected_method_15, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_private_method_m2, rb_define_private_method_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_private_method_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_private_method_00, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_private_method_01, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_private_method_02, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_private_method_03, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_private_method_04, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_private_method_05, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_private_method_06, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_private_method_07, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_private_method_08, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_private_method_09, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_private_method_10, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_private_method_11, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_private_method_12, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_private_method_13, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_private_method_14, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_private_method_15, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_module_function_m2, rb_define_module_function_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_module_function_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_module_function_00, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_module_function_01, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_module_function_02, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_module_function_03, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_module_function_04, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_module_function_05, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_module_function_06, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_module_function_07, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_module_function_08, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_module_function_09, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_module_function_10, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_module_function_11, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_module_function_12, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_module_function_13, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_module_function_14, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_module_function_15, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_global_function_m2, rb_define_global_function_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_global_function_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_global_function_00, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_global_function_01, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_global_function_02, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_global_function_03, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_global_function_04, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_global_function_05, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_global_function_06, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_global_function_07, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_global_function_08, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_global_function_09, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_global_function_10, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_global_function_11, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_global_function_12, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_global_function_13, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_global_function_14, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_global_function_15, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_method_id_m2, rb_define_method_id_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_method_id_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_method_id_00, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_method_id_01, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_method_id_02, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_method_id_03, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_method_id_04, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_method_id_05, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_method_id_06, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_method_id_07, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_method_id_08, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_method_id_09, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_method_id_10, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_method_id_11, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_method_id_12, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_method_id_13, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_method_id_14, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_method_id_15, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_m2(n) RBIMPL_ANYARGS_DISPATCH((n) == -2, rb_define_method_m2, rb_define_method_m3)

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_m1(n) RBIMPL_ANYARGS_DISPATCH((n) == -1, rb_define_method_m1, RBIMPL_ANYARGS_DISPATCH_rb_define_method_m2(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_00(n) RBIMPL_ANYARGS_DISPATCH((n) == 0, rb_define_method_00, RBIMPL_ANYARGS_DISPATCH_rb_define_method_m1(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_01(n) RBIMPL_ANYARGS_DISPATCH((n) == 1, rb_define_method_01, RBIMPL_ANYARGS_DISPATCH_rb_define_method_00(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_02(n) RBIMPL_ANYARGS_DISPATCH((n) == 2, rb_define_method_02, RBIMPL_ANYARGS_DISPATCH_rb_define_method_01(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_03(n) RBIMPL_ANYARGS_DISPATCH((n) == 3, rb_define_method_03, RBIMPL_ANYARGS_DISPATCH_rb_define_method_02(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_04(n) RBIMPL_ANYARGS_DISPATCH((n) == 4, rb_define_method_04, RBIMPL_ANYARGS_DISPATCH_rb_define_method_03(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_05(n) RBIMPL_ANYARGS_DISPATCH((n) == 5, rb_define_method_05, RBIMPL_ANYARGS_DISPATCH_rb_define_method_04(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_06(n) RBIMPL_ANYARGS_DISPATCH((n) == 6, rb_define_method_06, RBIMPL_ANYARGS_DISPATCH_rb_define_method_05(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_07(n) RBIMPL_ANYARGS_DISPATCH((n) == 7, rb_define_method_07, RBIMPL_ANYARGS_DISPATCH_rb_define_method_06(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_08(n) RBIMPL_ANYARGS_DISPATCH((n) == 8, rb_define_method_08, RBIMPL_ANYARGS_DISPATCH_rb_define_method_07(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_09(n) RBIMPL_ANYARGS_DISPATCH((n) == 9, rb_define_method_09, RBIMPL_ANYARGS_DISPATCH_rb_define_method_08(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_10(n) RBIMPL_ANYARGS_DISPATCH((n) == 10, rb_define_method_10, RBIMPL_ANYARGS_DISPATCH_rb_define_method_09(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_11(n) RBIMPL_ANYARGS_DISPATCH((n) == 11, rb_define_method_11, RBIMPL_ANYARGS_DISPATCH_rb_define_method_10(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_12(n) RBIMPL_ANYARGS_DISPATCH((n) == 12, rb_define_method_12, RBIMPL_ANYARGS_DISPATCH_rb_define_method_11(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_13(n) RBIMPL_ANYARGS_DISPATCH((n) == 13, rb_define_method_13, RBIMPL_ANYARGS_DISPATCH_rb_define_method_12(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_14(n) RBIMPL_ANYARGS_DISPATCH((n) == 14, rb_define_method_14, RBIMPL_ANYARGS_DISPATCH_rb_define_method_13(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_15(n) RBIMPL_ANYARGS_DISPATCH((n) == 15, rb_define_method_15, RBIMPL_ANYARGS_DISPATCH_rb_define_method_14(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_singleton_method_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method_15(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_protected_method_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method_15(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_private_method(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_private_method_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_private_method_15(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_module_function(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_module_function_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_module_function_15(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_global_function(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_global_function_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_global_function_15(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method_id(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_method_id_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_method_id_15(n))

-# define RBIMPL_ANYARGS_DISPATCH_rb_define_method(n, f) RBIMPL_ANYARGS_DISPATCH(RBIMPL_CFUNC_IS_rb_f_notimplement(f), rb_define_method_m3, RBIMPL_ANYARGS_DISPATCH_rb_define_method_15(n))

-# define RBIMPL_ANYARGS_ATTRSET(sym) RBIMPL_ATTR_MAYBE_UNUSED() RBIMPL_ATTR_NONNULL() RBIMPL_ATTR_WEAKREF(sym)

-# define RBIMPL_ANYARGS_DECL(sym, ...) \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _m3(__VA_ARGS__, VALUE(*)(ANYARGS), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _m2(__VA_ARGS__, VALUE(*)(VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _m1(__VA_ARGS__, VALUE(*)(int, union { VALUE *x; const VALUE *y; } __attribute__((__transparent_union__)), VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _00(__VA_ARGS__, VALUE(*)(VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _01(__VA_ARGS__, VALUE(*)(VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _02(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _03(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _04(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _05(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _06(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _07(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _08(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _09(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _10(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _11(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _12(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _13(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _14(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int); \

-RBIMPL_ANYARGS_ATTRSET(sym) static void sym ## _15(__VA_ARGS__, VALUE(*)(VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE), int);

-RBIMPL_ANYARGS_DECL(rb_define_singleton_method, VALUE, const char *)

-RBIMPL_ANYARGS_DECL(rb_define_protected_method, VALUE, const char *)

-RBIMPL_ANYARGS_DECL(rb_define_private_method, VALUE, const char *)

-RBIMPL_ANYARGS_DECL(rb_define_module_function, VALUE, const char *)

-RBIMPL_ANYARGS_DECL(rb_define_global_function, const char *)

-RBIMPL_ANYARGS_DECL(rb_define_method_id, VALUE, ID)

-RBIMPL_ANYARGS_DECL(rb_define_method, VALUE, const char *)

-/** @endcond */

-

-/**

- * @brief Defines klass\#mid.

- * @see ::rb_define_method

- * @param klass Where the method lives.

- * @param mid Name of the defining method.

- * @param func Implementation of klass\#mid.

- * @param arity Arity of klass\#mid.

- */

-#define rb_define_method(klass, mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_method((arity), (func))((klass), (mid), (func), (arity))

-

-/**

- * @brief Defines klass\#mid.

- * @see ::rb_define_method_id

- * @param klass Where the method lives.

- * @param mid Name of the defining method.

- * @param func Implementation of klass\#mid.

- * @param arity Arity of klass\#mid.

- */

-#define rb_define_method_id(klass, mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_method_id((arity), (func))((klass), (mid), (func), (arity))

-

-/**

- * @brief Defines obj.mid.

- * @see ::rb_define_singleton_method

- * @param obj Where the method lives.

- * @param mid Name of the defining method.

- * @param func Implementation of obj.mid.

- * @param arity Arity of obj.mid.

- */

-#define rb_define_singleton_method(obj, mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_singleton_method((arity), (func))((obj), (mid), (func), (arity))

-

-/**

- * @brief Defines klass\#mid and make it protected.

- * @see ::rb_define_protected_method

- * @param klass Where the method lives.

- * @param mid Name of the defining method.

- * @param func Implementation of klass\#mid.

- * @param arity Arity of klass\#mid.

- */

-#define rb_define_protected_method(klass, mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_protected_method((arity), (func))((klass), (mid), (func), (arity))

-

-/**

- * @brief Defines klass\#mid and make it private.

- * @see ::rb_define_private_method

- * @param klass Where the method lives.

- * @param mid Name of the defining method.

- * @param func Implementation of klass\#mid.

- * @param arity Arity of klass\#mid.

- */

-#define rb_define_private_method(klass, mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_private_method((arity), (func))((klass), (mid), (func), (arity))

-

-/**

- * @brief Defines mod\#mid and make it a module function.

- * @see ::rb_define_module_function

- * @param mod Where the method lives.

- * @param mid Name of the defining method.

- * @param func Implementation of mod\#mid.

- * @param arity Arity of mod\#mid.

- */

-#define rb_define_module_function(mod, mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_module_function((arity), (func))((mod), (mid), (func), (arity))

-

-/**

- * @brief Defines ::rb_mKerbel \#mid.

- * @see ::rb_define_gobal_function

- * @param mid Name of the defining method.

- * @param func Implementation of ::rb_mKernel \#mid.

- * @param arity Arity of ::rb_mKernel \#mid.

- */

-#define rb_define_global_function(mid, func, arity) RBIMPL_ANYARGS_DISPATCH_rb_define_global_function((arity), (func))((mid), (func), (arity))

-

-#endif /* __cplusplus */

-

-/**

- * This macro is to properly cast a function parameter of *_define_method

- * family. It has been around since 1.x era so you can maximize backwards

- * compatibility by using it.

- *

- * ```CXX

- * rb_define_method(klass, "method", RUBY_METHOD_FUNC(func), arity);

- * ```

- *

- * @param func A pointer to a function that implements a method.

- */

-#if ! defined(RUBY_DEVEL)

-# define RUBY_METHOD_FUNC(func) RBIMPL_CAST((VALUE (*)(ANYARGS))(func))

-

-#elif ! RUBY_DEVEL

-# define RUBY_METHOD_FUNC(func) RBIMPL_CAST((VALUE (*)(ANYARGS))(func))

-

-#elif ! defined(rb_define_method)

-# define RUBY_METHOD_FUNC(func) RBIMPL_CAST((VALUE (*)(ANYARGS))(func))

-

-#else

-# define RUBY_METHOD_FUNC(func) (func)

-

-#endif

-

-#endif /* RBIMPL_ANYARGS_H */

-#ifndef RBIMPL_ARITHMETIC_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Conversion between C's arithmtic types and Ruby's numeric types.

- */

-#include "ruby/impl/arithmetic/char.h"

-#include "ruby/impl/arithmetic/double.h"

-#include "ruby/impl/arithmetic/fixnum.h"

-#include "ruby/impl/arithmetic/gid_t.h"

-#include "ruby/impl/arithmetic/int.h"

-#include "ruby/impl/arithmetic/intptr_t.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/arithmetic/long_long.h"

-#include "ruby/impl/arithmetic/mode_t.h"

-#include "ruby/impl/arithmetic/off_t.h"

-#include "ruby/impl/arithmetic/pid_t.h"

-#include "ruby/impl/arithmetic/short.h"

-#include "ruby/impl/arithmetic/size_t.h"

-#include "ruby/impl/arithmetic/st_data_t.h"

-#include "ruby/impl/arithmetic/uid_t.h"

-#endif /* RBIMPL_ARITHMETIC_H */

-#ifndef RBIMPL_ARITHMETIC_CHAR_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_CHAR_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `char` and Ruby's.

- */

-#include "ruby/impl/arithmetic/int.h" /* NUM2INT is here, but */

-#include "ruby/impl/arithmetic/long.h" /* INT2FIX is here.*/

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/const.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rstring.h"

-#include "ruby/impl/value_type.h"

-

-#define RB_NUM2CHR rb_num2char_inline

-#define NUM2CHR RB_NUM2CHR

-#define CHR2FIX RB_CHR2FIX

-

-/** @cond INTERNAL_MACRO */

-#define RB_CHR2FIX RB_CHR2FIX

-/** @endcond */

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RB_CHR2FIX(unsigned char c)

-{

- return RB_INT2FIX(c);

-}

-

-static inline char

-rb_num2char_inline(VALUE x)

-{

- if (RB_TYPE_P(x, RUBY_T_STRING) && (RSTRING_LEN(x)>=1))

- return RSTRING_PTR(x)[0];

- else

- return RBIMPL_CAST((char)RB_NUM2INT(x));

-}

-

-#endif /* RBIMPL_ARITHMETIC_CHAR_H */

-#ifndef RBIMPL_ARITHMETIC_DOUBLE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_DOUBLE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `double` and Ruby's.

- */

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-

-#define NUM2DBL rb_num2dbl

-#define RFLOAT_VALUE rb_float_value

-#define DBL2NUM rb_float_new

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-double rb_num2dbl(VALUE);

-RBIMPL_ATTR_PURE()

-double rb_float_value(VALUE);

-VALUE rb_float_new(double);

-VALUE rb_float_new_in_heap(double);

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_ARITHMETIC_DOUBLE_H */

-#ifndef RBIMPL_ARITHMETIC_FIXNUM_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_FIXNUM_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Handling of integers formerly known as Fixnums.

- */

-#include "ruby/backward/2/limits.h"

-

-#define FIXABLE RB_FIXABLE

-#define FIXNUM_MAX RUBY_FIXNUM_MAX

-#define FIXNUM_MIN RUBY_FIXNUM_MIN

-#define NEGFIXABLE RB_NEGFIXABLE

-#define POSFIXABLE RB_POSFIXABLE

-

-/*

- * FIXABLE can be applied to anything, from double to intmax_t. The problem is

- * double. On a 64bit system RUBY_FIXNUM_MAX is 4,611,686,018,427,387,903,

- * which is not representable by a double. The nearest value that a double can

- * represent is 4,611,686,018,427,387,904, which is not fixable. The

- * seemingly-stragne "< FIXNUM_MAX + 1" expression below is due to this.

- */

-#define RB_POSFIXABLE(_) ((_) < RUBY_FIXNUM_MAX + 1)

-#define RB_NEGFIXABLE(_) ((_) >= RUBY_FIXNUM_MIN)

-#define RB_FIXABLE(_) (RB_POSFIXABLE(_) && RB_NEGFIXABLE(_))

-#define RUBY_FIXNUM_MAX (LONG_MAX / 2)

-#define RUBY_FIXNUM_MIN (LONG_MIN / 2)

-

-#endif /* RBIMPL_ARITHMETIC_FIXNUM_H */

-#ifndef RBIMPL_ARITHMETIC_GID_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_GID_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `gid_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/long.h"

-

-#ifndef GIDT2NUM

-# define GIDT2NUM RB_LONG2NUM

-#endif

-

-#ifndef NUM2GIDT

-# define NUM2GIDT RB_NUM2LONG

-#endif

-

-#endif /* RBIMPL_ARITHMETIC_GID_T_H */

-#ifndef RBIMPL_ARITHMETIC_INT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_INT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `int` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/fixnum.h"

-#include "ruby/impl/arithmetic/intptr_t.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/const.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/compiler_is.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/special_consts.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/warning_push.h"

-#include "ruby/assert.h"

-

-#define RB_INT2NUM rb_int2num_inline

-#define RB_NUM2INT rb_num2int_inline

-#define RB_UINT2NUM rb_uint2num_inline

-

-#define FIX2INT RB_FIX2INT

-#define FIX2UINT RB_FIX2UINT

-#define INT2NUM RB_INT2NUM

-#define NUM2INT RB_NUM2INT

-#define NUM2UINT RB_NUM2UINT

-#define UINT2NUM RB_UINT2NUM

-

-/** @cond INTERNAL_MACRO */

-#define RB_FIX2INT RB_FIX2INT

-#define RB_NUM2UINT RB_NUM2UINT

-#define RB_FIX2UINT RB_FIX2UINT

-/** @endcond */

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-long rb_num2int(VALUE);

-long rb_fix2int(VALUE);

-unsigned long rb_num2uint(VALUE);

-unsigned long rb_fix2uint(VALUE);

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-RB_FIX2INT(VALUE x)

-{

- /* "FIX2INT raises a TypeError if passed nil", says rubyspec. Not sure if

- * that is a desired behaviour but just preserve backwards compatilibily.

- */

-#if 0

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXNUM_P(x));

-#endif

- long ret;

-

- if /* constexpr */ (sizeof(int) < sizeof(long)) {

- ret = rb_fix2int(x);

- }

- else {

- ret = RB_FIX2LONG(x);

- }

-

- return RBIMPL_CAST((int)ret);

-}

-

-static inline int

-rb_num2int_inline(VALUE x)

-{

- long ret;

-

- if /* constexpr */ (sizeof(int) == sizeof(long)) {

- ret = RB_NUM2LONG(x);

- }

- else if (RB_FIXNUM_P(x)) {

- ret = rb_fix2int(x);

- }

- else {

- ret = rb_num2int(x);

- }

-

- return RBIMPL_CAST((int)ret);

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline unsigned int

-RB_NUM2UINT(VALUE x)

-{

- unsigned long ret;

-

- if /* constexpr */ (sizeof(int) < sizeof(long)) {

- ret = rb_num2uint(x);

- }

- else {

- ret = RB_NUM2ULONG(x);

- }

-

- return RBIMPL_CAST((unsigned int)ret);

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline unsigned int

-RB_FIX2UINT(VALUE x)

-{

-#if 0 /* Ditto for RB_FIX2INT. */

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXNUM_P(x));

-#endif

- unsigned long ret;

-

- if /* constexpr */ (sizeof(int) < sizeof(long)) {

- ret = rb_fix2uint(x);

- }

- else {

- ret = RB_FIX2ULONG(x);

- }

-

- return RBIMPL_CAST((unsigned int)ret);

-}

-

-RBIMPL_WARNING_PUSH()

-#if RBIMPL_COMPILER_IS(GCC)

-RBIMPL_WARNING_IGNORED(-Wtype-limits) /* We can ignore them here. */

-#elif RBIMPL_HAS_WARNING("-Wtautological-constant-out-of-range-compare")

-RBIMPL_WARNING_IGNORED(-Wtautological-constant-out-of-range-compare)

-#endif

-

-static inline VALUE

-rb_int2num_inline(int v)

-{

- if (RB_FIXABLE(v))

- return RB_INT2FIX(v);

- else

- return rb_int2big(v);

-}

-

-static inline VALUE

-rb_uint2num_inline(unsigned int v)

-{

- if (RB_POSFIXABLE(v))

- return RB_LONG2FIX(v);

- else

- return rb_uint2big(v);

-}

-

-RBIMPL_WARNING_POP()

-

-#endif /* RBIMPL_ARITHMETIC_INT_H */

-#ifndef RBIMPL_ARITHMETIC_INTPTR_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_INTPTR_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `intptr_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-

-#ifdef HAVE_STDINT_H

-# include <stdint.h>

-#endif

-

-#include "ruby/impl/value.h"

-#include "ruby/impl/dllexport.h"

-

-#define rb_int_new rb_int2inum

-#define rb_uint_new rb_uint2inum

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_int2big(intptr_t i);

-VALUE rb_int2inum(intptr_t i);

-VALUE rb_uint2big(uintptr_t i);

-VALUE rb_uint2inum(uintptr_t i);

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_ARITHMETIC_INTPTR_T_H */

-#ifndef RBIMPL_ARITHMETIC_LONG_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_LONG_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `long` and Ruby's.

- *

- * ### Q&A ###

- *

- * - Q: Why are INT2FIX etc. here, not in `int.h`?

- *

- * - A: Because they are in fact handling `long`. It seems someone did not

- * understand the difference of `int` and `long` when they designed those

- * macros.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/fixnum.h" /* FIXABLE */

-#include "ruby/impl/arithmetic/intptr_t.h" /* rb_int2big etc.*/

-#include "ruby/impl/assume.h"

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/cold.h"

-#include "ruby/impl/attr/const.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/attr/noreturn.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/special_consts.h" /* FIXNUM_FLAG */

-#include "ruby/impl/value.h"

-#include "ruby/assert.h"

-

-#define FIX2LONG RB_FIX2LONG

-#define FIX2ULONG RB_FIX2ULONG

-#define INT2FIX RB_INT2FIX

-#define LONG2FIX RB_INT2FIX

-#define LONG2NUM RB_LONG2NUM

-#define NUM2LONG RB_NUM2LONG

-#define NUM2ULONG RB_NUM2ULONG

-#define RB_FIX2LONG rb_fix2long

-#define RB_FIX2ULONG rb_fix2ulong

-#define RB_LONG2FIX RB_INT2FIX

-#define RB_LONG2NUM rb_long2num_inline

-#define RB_NUM2LONG rb_num2long_inline

-#define RB_NUM2ULONG rb_num2ulong_inline

-#define RB_ULONG2NUM rb_ulong2num_inline

-#define ULONG2NUM RB_ULONG2NUM

-#define rb_fix_new RB_INT2FIX

-#define rb_long2int rb_long2int_inline

-

-/** @cond INTERNAL_MACRO */

-#define RB_INT2FIX RB_INT2FIX

-/** @endcond */

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-

-RBIMPL_ATTR_NORETURN()

-RBIMPL_ATTR_COLD()

-void rb_out_of_int(SIGNED_VALUE num);

-

-long rb_num2long(VALUE num);

-unsigned long rb_num2ulong(VALUE num);

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RB_INT2FIX(long i)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXABLE(i));

-

- /* :NOTE: VALUE can be wider than long. As j being unsigned, 2j+1 is fully

- * defined. Also it can be compiled into a single LEA instruction. */

- const unsigned long j = i;

- const unsigned long k = 2 * j + RUBY_FIXNUM_FLAG;

- const long l = k;

- const SIGNED_VALUE m = l; /* Sign extend */

- const VALUE n = m;

-

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXNUM_P(n));

- return n;

-}

-

-static inline int

-rb_long2int_inline(long n)

-{

- int i = RBIMPL_CAST((int)n);

-

- if /* constexpr */ (sizeof(long) <= sizeof(int)) {

- RBIMPL_ASSUME(i == n);

- }

-

- if (i != n)

- rb_out_of_int(n);

-

- return i;

-}

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-static inline long

-rbimpl_fix2long_by_idiv(VALUE x)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXNUM_P(x));

-

- /* :NOTE: VALUE can be wider than long. (x-1)/2 never overflows because

- * RB_FIXNUM_P(x) holds. Also it has no portability issue like y>>1

- * below. */

- const SIGNED_VALUE y = x - RUBY_FIXNUM_FLAG;

- const SIGNED_VALUE z = y / 2;

- const long w = RBIMPL_CAST((long)z);

-

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXABLE(w));

- return w;

-}

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-static inline long

-rbimpl_fix2long_by_shift(VALUE x)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXNUM_P(x));

-

- /* :NOTE: VALUE can be wider than long. If right shift is arithmetic, this

- * is noticeably faster than above. */

- const SIGNED_VALUE y = x;

- const SIGNED_VALUE z = y >> 1;

- const long w = RBIMPL_CAST((long)z);

-

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXABLE(w));

- return w;

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-static inline bool

-rbimpl_right_shift_is_arithmetic_p(void)

-{

- return (-1 >> 1) == -1;

-}

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-static inline long

-rb_fix2long(VALUE x)

-{

- if /* constexpr */ (rbimpl_right_shift_is_arithmetic_p()) {

- return rbimpl_fix2long_by_shift(x);

- }

- else {

- return rbimpl_fix2long_by_idiv(x);

- }

-}

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-static inline unsigned long

-rb_fix2ulong(VALUE x)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXNUM_P(x));

- return rb_fix2long(x);

-}

-

-static inline long

-rb_num2long_inline(VALUE x)

-{

- if (RB_FIXNUM_P(x))

- return RB_FIX2LONG(x);

- else

- return rb_num2long(x);

-}

-

-static inline unsigned long

-rb_num2ulong_inline(VALUE x)

-{

- /* This (negative fixnum would become a large unsigned long while negative

- * bignum is an exception) has been THE behaviour of NUM2ULONG since the

- * beginning. It is strange, but we can no longer change how it works at

- * this moment. We have to get by with it. See also:

- * https://bugs.ruby-lang.org/issues/9089 */

- if (RB_FIXNUM_P(x))

- return RB_FIX2ULONG(x);

- else

- return rb_num2ulong(x);

-}

-

-static inline VALUE

-rb_long2num_inline(long v)

-{

- if (RB_FIXABLE(v))

- return RB_LONG2FIX(v);

- else

- return rb_int2big(v);

-}

-

-static inline VALUE

-rb_ulong2num_inline(unsigned long v)

-{

- if (RB_POSFIXABLE(v))

- return RB_LONG2FIX(v);

- else

- return rb_uint2big(v);

-}

-

-/**

- * @cond INTERNAL_MACRO

- *

- * Following overload is necessary because sometimes INT2FIX is used as a enum

- * value (e.g. `enum { FOO = INT2FIX(0) };`). THIS IS NG in theory because a

- * VALUE does not fit into an enum (which must be a signed int). But we cannot

- * break existing codes.

- */

-#if RBIMPL_HAS_ATTR_CONSTEXPR_CXX14

-# /* C++ can write constexpr as enum values. */

-

-#elif ! defined(HAVE_BUILTIN___BUILTIN_CHOOSE_EXPR_CONSTANT_P)

-# undef INT2FIX

-# define INT2FIX(i) (RBIMPL_CAST((VALUE)(i)) << 1 | RUBY_FIXNUM_FLAG)

-

-#else

-# undef INT2FIX

-# define INT2FIX(i) \

- __builtin_choose_expr( \

- __builtin_constant_p(i), \

- RBIMPL_CAST((VALUE)(i)) << 1 | RUBY_FIXNUM_FLAG, \

- RB_INT2FIX(i))

-#endif

-/** @endcond */

-

-#endif /* RBIMPL_ARITHMETIC_LONG_H */

-#ifndef RBIMPL_ARITHMETIC_LONG_LONG_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_LONG_LONG_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `long long` and Ruby's.

- */

-#include "ruby/impl/value.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/special_consts.h"

-#include "ruby/backward/2/long_long.h"

-

-#define RB_LL2NUM rb_ll2inum

-#define RB_ULL2NUM rb_ull2inum

-#define LL2NUM RB_LL2NUM

-#define ULL2NUM RB_ULL2NUM

-#define RB_NUM2LL rb_num2ll_inline

-#define RB_NUM2ULL rb_num2ull

-#define NUM2LL RB_NUM2LL

-#define NUM2ULL RB_NUM2ULL

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_ll2inum(LONG_LONG);

-VALUE rb_ull2inum(unsigned LONG_LONG);

-LONG_LONG rb_num2ll(VALUE);

-unsigned LONG_LONG rb_num2ull(VALUE);

-RBIMPL_SYMBOL_EXPORT_END()

-

-static inline LONG_LONG

-rb_num2ll_inline(VALUE x)

-{

- if (RB_FIXNUM_P(x))

- return RB_FIX2LONG(x);

- else

- return rb_num2ll(x);

-}

-

-#endif /* RBIMPL_ARITHMETIC_LONG_LONG_H */

-#ifndef RBIMPL_ARITHMETIC_MODE_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_MODE_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `mode_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/int.h"

-

-#ifndef NUM2MODET

-# define NUM2MODET RB_NUM2INT

-#endif

-

-#ifndef MODET2NUM

-# define MODET2NUM RB_INT2NUM

-#endif

-

-#endif /* RBIMPL_ARITHMETIC_MODE_T_H */

-#ifndef RBIMPL_ARITHMETIC_OFF_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_OFF_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `off_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/int.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/arithmetic/long_long.h"

-#include "ruby/backward/2/long_long.h"

-

-#ifdef OFFT2NUM

-# /* take that. */

-#elif SIZEOF_OFF_T == SIZEOF_LONG_LONG

-# define OFFT2NUM RB_LL2NUM

-#elif SIZEOF_OFF_T == SIZEOF_LONG

-# define OFFT2NUM RB_LONG2NUM

-#else

-# define OFFT2NUM RB_INT2NUM

-#endif

-

-#ifdef NUM2OFFT

-# /* take that. */

-#elif SIZEOF_OFF_T == SIZEOF_LONG_LONG

-# define NUM2OFFT RB_NUM2LL

-#elif SIZEOF_OFF_T == SIZEOF_LONG

-# define NUM2OFFT RB_NUM2LONG

-#else

-# define NUM2OFFT RB_NUM2INT

-#endif

-

-#endif /* RBIMPL_ARITHMETIC_OFF_T_H */

-#ifndef RBIMPL_ARITHMETIC_PID_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_PID_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `pid_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/long.h"

-

-#ifndef PIDT2NUM

-# define PIDT2NUM RB_LONG2NUM

-#endif

-

-#ifndef NUM2PIDT

-# define NUM2PIDT RB_NUM2LONG

-#endif

-

-#endif /* RBIMPL_ARITHMETIC_PID_T_H */

-#ifndef RBIMPL_ARITHMETIC_SHORT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_SHORT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `short` and Ruby's.

- *

- * Shyouhei wonders: why there is no SHORT2NUM, given there are both

- * #USHORT2NUM and #CHR2FIX?

- */

-#include "ruby/impl/value.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/special_consts.h"

-

-#define RB_NUM2SHORT rb_num2short_inline

-#define RB_NUM2USHORT rb_num2ushort

-#define NUM2SHORT RB_NUM2SHORT

-#define NUM2USHORT RB_NUM2USHORT

-#define USHORT2NUM RB_INT2FIX

-#define RB_FIX2SHORT rb_fix2short

-#define FIX2SHORT RB_FIX2SHORT

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-short rb_num2short(VALUE);

-unsigned short rb_num2ushort(VALUE);

-short rb_fix2short(VALUE);

-unsigned short rb_fix2ushort(VALUE);

-RBIMPL_SYMBOL_EXPORT_END()

-

-static inline short

-rb_num2short_inline(VALUE x)

-{

- if (RB_FIXNUM_P(x))

- return rb_fix2short(x);

- else

- return rb_num2short(x);

-}

-

-#endif /* RBIMPL_ARITHMETIC_SOHRT_H */

-#ifndef RBIMPL_ARITHMETIC_SIZE_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_SIZE_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `size_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/int.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/arithmetic/long_long.h"

-#include "ruby/backward/2/long_long.h"

-

-#if SIZEOF_SIZE_T == SIZEOF_LONG_LONG

-# define SIZET2NUM RB_ULL2NUM

-# define SSIZET2NUM RB_LL2NUM

-#elif SIZEOF_SIZE_T == SIZEOF_LONG

-# define SIZET2NUM RB_ULONG2NUM

-# define SSIZET2NUM RB_LONG2NUM

-#else

-# define SIZET2NUM RB_UINT2NUM

-# define SSIZET2NUM RB_INT2NUM

-#endif

-

-#if SIZEOF_SIZE_T == SIZEOF_LONG_LONG

-# define NUM2SIZET RB_NUM2ULL

-# define NUM2SSIZET RB_NUM2LL

-#elif SIZEOF_SIZE_T == SIZEOF_LONG

-# define NUM2SIZET RB_NUM2ULONG

-# define NUM2SSIZET RB_NUM2LONG

-#else

-# define NUM2SIZET RB_NUM2UINT

-# define NUM2SSIZET RB_NUM2INT

-#endif

-

-#endif /* RBIMPL_ARITHMETIC_SIZE_T_H */

-#ifndef RBIMPL_ARITHMERIC_ST_DATA_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMERIC_ST_DATA_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `st_data_t` and Ruby's.

- */

-#include "ruby/impl/arithmetic/fixnum.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/const.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/value.h"

-#include "ruby/assert.h"

-#include "ruby/st.h"

-

-#define ST2FIX RB_ST2FIX

-/** @cond INTERNAL_MACRO */

-#define RB_ST2FIX RB_ST2FIX

-/** @endcond */

-

-RBIMPL_ATTR_CONST_ON_NDEBUG()

-RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(CXX14)

-RBIMPL_ATTR_ARTIFICIAL()

-/* See also [ruby-core:84395] [Bug #14218] [ruby-core:82687] [Bug #13877] */

-static inline VALUE

-RB_ST2FIX(st_data_t i)

-{

- SIGNED_VALUE x = i;

-

- if (x >= 0) {

- x &= RUBY_FIXNUM_MAX;

- }

- else {

- x |= RUBY_FIXNUM_MIN;

- }

-

- RBIMPL_ASSERT_OR_ASSUME(RB_FIXABLE(x));

- unsigned long y = RBIMPL_CAST((unsigned long)x);

- return RB_LONG2FIX(y);

-}

-

-#endif /* RBIMPL_ARITHMERIC_ST_DATA_T_H */

-#ifndef RBIMPL_ARITHMETIC_UID_T_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ARITHMETIC_UID_T_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Arithmetic conversion between C's `uid_t` and Ruby's.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/long.h"

-

-#ifndef UIDT2NUM

-# define UIDT2NUM RB_LONG2NUM

-#endif

-

-#ifndef NUM2UIDT

-# define NUM2UIDT RB_NUM2LONG

-#endif

-

-#endif /* RBIMPL_ARITHMETIC_UID_T_H */

-#ifndef RBIMPL_ASSUME_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ASSUME_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ASSUME / #RBIMPL_UNREACHABLE.

- *

- * These macros must be defined at once because:

- *

- * - #RBIMPL_ASSUME could fallback to #RBIMPL_UNREACHABLE.

- * - #RBIMPL_UNREACHABLE could fallback to #RBIMPL_ASSUME.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/builtin.h"

-#include "ruby/impl/warning_push.h"

-

-/** @cond INTERNAL_MACRO */

-#if RBIMPL_COMPILER_SINCE(MSVC, 13, 10, 0)

-# define RBIMPL_HAVE___ASSUME

-

-#elif RBIMPL_COMPILER_SINCE(Intel, 13, 0, 0)

-# define RBIMPL_HAVE___ASSUME

-#endif

-/** @endcond */

-

-/** Wraps (or simulates) `__builtin_unreachable`. */

-#if RBIMPL_HAS_BUILTIN(__builtin_unreachable)

-# define RBIMPL_UNREACHABLE_RETURN(_) __builtin_unreachable()

-

-#elif defined(RBIMPL_HAVE___ASSUME)

-# define RBIMPL_UNREACHABLE_RETURN(_) return (__assume(0), (_))

-

-#else

-# define RBIMPL_UNREACHABLE_RETURN(_) return (_)

-#endif

-

-/** Wraps (or simulates) `__builtin_unreachable`. */

-#if RBIMPL_HAS_BUILTIN(__builtin_unreachable)

-# define RBIMPL_UNREACHABLE __builtin_unreachable

-

-#elif defined(RBIMPL_HAVE___ASSUME)

-# define RBIMPL_UNREACHABLE() __assume(0)

-#endif

-

-/** Wraps (or simulates) `__assume`. */

-#if RBIMPL_COMPILER_SINCE(Intel, 13, 0, 0)

-# /* icc warnings are false positives. Ignore them. */

-# /* "warning #2261: __assume expression with side effects discarded" */

-# define RBIMPL_ASSUME(expr) \

- RBIMPL_WARNING_PUSH() \

- RBIMPL_WARNING_IGNORED(2261) \

- __assume(expr) \

- RBIMPL_WARNING_POP()

-

-#elif defined(RBIMPL_HAVE___ASSUME)

-# define RBIMPL_ASSUME __assume

-

-#elif RBIMPL_HAS_BUILTIN(__builtin_assume)

-# define RBIMPL_ASSUME __builtin_assume

-

-#elif ! defined(RBIMPL_UNREACHABLE)

-# define RBIMPL_ASSUME(_) RBIMPL_CAST((void)(_))

-

-#else

-# define RBIMPL_ASSUME(_) \

- (RB_LIKELY(!!(_)) ? RBIMPL_CAST((void)0) : RBIMPL_UNREACHABLE())

-#endif

-

-#if ! defined(RBIMPL_UNREACHABLE)

-# define RBIMPL_UNREACHABLE() RBIMPL_ASSUME(0)

-#endif

-

-#endif /* RBIMPL_ASSUME_H */

-#ifndef RBIMPL_ATTR_ALLOC_SIZE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_ALLOC_SIZE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_ALLOC_SIZE.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((alloc_size))` */

-#if RBIMPL_HAS_ATTRIBUTE(alloc_size)

-# define RBIMPL_ATTR_ALLOC_SIZE(tuple) __attribute__((__alloc_size__ tuple))

-#else

-# define RBIMPL_ATTR_ALLOC_SIZE(tuple) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_ALLOC_SIZE_H */

-#ifndef RBIMPL_ATTR_ARTIFICIAL_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_ARTIFICIAL_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_ARTIFICIAL.

- *

- * ### Q&A ###

- *

- * - Q: What is this attribute? I don't get what GCC manual is talking about.

- *

- * - A: In short it is an attribute to manipulate GDB backtraces. The

- * attribute makes the best sense when it comes with

- * __attribute__((always_inline)). When a function annotated with this

- * attribute gets inlined, and when you somehow look at a backtrace which

- * includes such inlined call site, then the backtrace shows the caller

- * and not the callee. This is handy for instance when an identical

- * function is inlined more than once in a single big function. On such

- * case it gets vital to know where the inlining happened in the callee.

- * See also https://stackoverflow.com/a/21936099

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((artificial))` */

-#if RBIMPL_HAS_ATTRIBUTE(artificial)

-# define RBIMPL_ATTR_ARTIFICIAL() __attribute__((__artificial__))

-#else

-# define RBIMPL_ATTR_ARTIFICIAL() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_ARTIFICIAL_H */

-#ifndef RBIMPL_ATTR_COLD_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_COLD_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_COLD.

- */

-#include "ruby/impl/compiler_is.h"

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((cold))` */

-#if RBIMPL_COMPILER_IS(SunPro)

-# /* Recent SunPro has __has_attribute, and is borken. */

-# /* It reports it has attribute cold, reality isn't (warnings issued). */

-# define RBIMPL_ATTR_COLD() /* void */

-#elif RBIMPL_HAS_ATTRIBUTE(cold)

-# define RBIMPL_ATTR_COLD() __attribute__((__cold__))

-#else

-# define RBIMPL_ATTR_COLD() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_COLD_H */

-#ifndef RBIMPL_ATTR_CONST_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_CONST_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_CONST.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/has/declspec_attribute.h"

-

-/** Wraps (or simulates) `__attribute__((const))` */

-#if RBIMPL_HAS_ATTRIBUTE(const)

-# define RBIMPL_ATTR_CONST() __attribute__((__const__))

-#elif RBIMPL_HAS_DECLSPEC_ATTRIBUTE(noalias)

-# /* If a function can be a const, that is also a noalias. */

-# define RBIMPL_ATTR_CONST() __declspec(noalias)

-#elif RBIMPL_COMPILER_SINCE(SunPro, 5, 10, 0)

-# define RBIMPL_ATTR_CONST() _Pragma("no_side_effect")

-#else

-# define RBIMPL_ATTR_CONST() /* void */

-#endif

-

-/** Enables #RBIMPL_ATTR_CONST iff. #RUBY_NDEBUG. */

-#if RUBY_NDEBUG

-# define RBIMPL_ATTR_CONST_ON_NDEBUG() RBIMPL_ATTR_CONST()

-#else

-# define RBIMPL_ATTR_CONST_ON_NDEBUG() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_CONST_H */

-#ifndef RBIMPL_ATTR_CONSTEXPR_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_CONSTEXPR_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief #RBIMPL_ATTR_CONSTEXPR.

- */

-#include "ruby/impl/has/feature.h"

-#include "ruby/impl/compiler_is.h"

-#include "ruby/impl/token_paste.h"

-

-/** @cond INTERNAL_MACRO */

-#if ! defined(__cplusplus)

-# /* Makes no sense. */

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 0

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 0

-

-#elif defined(__cpp_constexpr)

-# /* https://isocpp.org/std/standing-documents/sd-6-sg10-feature-test-recommendations */

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 (__cpp_constexpr >= 200704L)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 (__cpp_constexpr >= 201304L)

-

-#elif RBIMPL_COMPILER_SINCE(MSVC, 19, 0, 0)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 RBIMPL_COMPILER_SINCE(MSVC, 19, 00, 00)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 RBIMPL_COMPILER_SINCE(MSVC, 19, 11, 00)

-

-#elif RBIMPL_COMPILER_SINCE(SunPro, 5, 13, 0)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 (__cplusplus >= 201103L)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 (__cplusplus >= 201402L)

-

-#elif RBIMPL_COMPILER_SINCE(GCC, 4, 9, 0)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 (__cplusplus >= 201103L)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 (__cplusplus >= 201402L)

-

-#elif RBIMPL_HAS_FEATURE(cxx_relaxed_constexpr)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 1

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 1

-

-#elif RBIMPL_HAS_FEATURE(cxx_constexpr)

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 1

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 0

-

-#else

-# /* :FIXME: icpc must have constexpr but don't know how to detect. */

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX11 0

-# define RBIMPL_HAS_ATTR_CONSTEXPR_CXX14 0

-#endif

-/** @endcond */

-

-/** Wraps (or simulates) C++11 `constexpr`. */

-#if RBIMPL_HAS_ATTR_CONSTEXPR_CXX14

-# define RBIMPL_ATTR_CONSTEXPR(_) constexpr

-

-#elif RBIMPL_HAS_ATTR_CONSTEXPR_CXX11

-# define RBIMPL_ATTR_CONSTEXPR(_) RBIMPL_TOKEN_PASTE(RBIMPL_ATTR_CONSTEXPR_, _)

-# define RBIMPL_ATTR_CONSTEXPR_CXX11 constexpr

-# define RBIMPL_ATTR_CONSTEXPR_CXX14 /* void */

-

-#else

-# define RBIMPL_ATTR_CONSTEXPR(_) /* void */

-#endif

-

-/** Enables #RBIMPL_ATTR_CONSTEXPR iff. #RUBY_NDEBUG. */

-#if RUBY_NDEBUG

-# define RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(_) RBIMPL_ATTR_CONSTEXPR(_)

-#else

-# define RBIMPL_ATTR_CONSTEXPR_ON_NDEBUG(_) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_CONSTEXPR_H */

-#ifndef RBIMPL_ATTR_DEPRECATED_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_DEPRECATED_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_DEPRECATED.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/has/c_attribute.h"

-#include "ruby/impl/has/cpp_attribute.h"

-#include "ruby/impl/has/declspec_attribute.h"

-#include "ruby/impl/has/extension.h"

-

-/** Wraps (or simulates) `[[deprecated]]` */

-#if RBIMPL_HAS_EXTENSION(attribute_deprecated_with_message)

-# define RBIMPL_ATTR_DEPRECATED(msg) __attribute__((__deprecated__ msg))

-

-#elif RBIMPL_COMPILER_SINCE(GCC, 4, 5, 0)

-# define RBIMPL_ATTR_DEPRECATED(msg) __attribute__((__deprecated__ msg))

-

-#elif RBIMPL_COMPILER_SINCE(Intel, 13, 0, 0)

-# define RBIMPL_ATTR_DEPRECATED(msg) __attribute__((__deprecated__ msg))

-

-#elif RBIMPL_HAS_ATTRIBUTE(deprecated) /* but not with message. */

-# define RBIMPL_ATTR_DEPRECATED(msg) __attribute__((__deprecated__))

-

-#elif RBIMPL_COMPILER_SINCE(MSVC, 14, 0, 0)

-# define RBIMPL_ATTR_DEPRECATED(msg) __declspec(deprecated msg)

-

-#elif RBIMPL_HAS_DECLSPEC_ATTRIBUTE(deprecated)

-# define RBIMPL_ATTR_DEPRECATED(msg) __declspec(deprecated)

-

-#elif RBIMPL_HAS_CPP_ATTRIBUTE(deprecated)

-# define RBIMPL_ATTR_DEPRECATED(msg) [[deprecated msg]]

-

-#elif RBIMPL_HAS_C_ATTRIBUTE(deprecated)

-# define RBIMPL_ATTR_DEPRECATED(msg) [[deprecated msg]]

-

-#else

-# define RBIMPL_ATTR_DEPRECATED(msg) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_DEPRECATED_H */

-#ifndef RBIMPL_ATTR_DIAGNOSE_IF_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_DIAGNOSE_IF_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_DIAGNOSE_IF.

- */

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/warning_push.h"

-

-/** Wraps (or simulates) `__attribute__((diagnose_if))` */

-#if RBIMPL_COMPILER_BEFORE(Clang, 5, 0, 0)

-# /* https://bugs.llvm.org/show_bug.cgi?id=34319 */

-# define RBIMPL_ATTR_DIAGNOSE_IF(_, __, ___) /* void */

-

-#elif RBIMPL_HAS_ATTRIBUTE(diagnose_if)

-# define RBIMPL_ATTR_DIAGNOSE_IF(_, __, ___) \

- RBIMPL_WARNING_PUSH() \

- RBIMPL_WARNING_IGNORED(-Wgcc-compat) \

- __attribute__((__diagnose_if__(_, __, ___))) \

- RBIMPL_WARNING_POP()

-

-#else

-# define RBIMPL_ATTR_DIAGNOSE_IF(_, __, ___) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_DIAGNOSE_IF_H */

-#ifndef RBIMPL_ATTR_ENUM_EXTENSIBILITY_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_ENUM_EXTENSIBILITY_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief #RBIMPL_ATTR_ENUM_EXTENSIBILITY.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((enum_extensibility))` */

-#if RBIMPL_HAS_ATTRIBUTE(enum_extensibility)

-# define RBIMPL_ATTR_ENUM_EXTENSIBILITY(_) __attribute__((__enum_extensibility__(_)))

-#else

-# define RBIMPL_ATTR_ENUM_EXTENSIBILITY(_) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_ENUM_EXTENSIBILITY_H */

-#ifndef RBIMPL_ATTR_ERROR_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_ERROR_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_ERROR.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((error))` */

-#if RBIMPL_HAS_ATTRIBUTE(error)

-# define RBIMPL_ATTR_ERROR(msg) __attribute__((__error__ msg))

-#else

-# define RBIMPL_ATTR_ERROR(msg) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_ERROR_H */

-#ifndef RBIMPL_ATTR_FLAG_ENUM_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_FLAG_ENUM_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_FLAG_ENUM.

- * @see https://clang.llvm.org/docs/AttributeReference.html#flag_enum

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((flag_enum)` */

-#if RBIMPL_HAS_ATTRIBUTE(flag_enum)

-# define RBIMPL_ATTR_FLAG_ENUM() __attribute__((__flag_enum__))

-#else

-# define RBIMPL_ATTR_FLAG_ENUM() /* void */

-#endif

-

-#endif /* RBIMPLATTR_FLAG_ENUM_H */

-#ifndef RBIMPL_ATTR_FORCEINLINE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_FORCEINLINE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_FORCEINLINE.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/attribute.h"

-

-/**

- * Wraps (or simulates) `__forceinline`. MSVC complains on declarations like

- * `static inline __forceinline void foo()`. It seems MSVC's `inline` and

- * `__forceinline` are mutually exclusive. We have to mimic that behaviour for

- * non-MSVC compilers.

- */

-#if RBIMPL_COMPILER_SINCE(MSVC, 12, 0, 0)

-# define RBIMPL_ATTR_FORCEINLINE() __forceinline

-#elif RBIMPL_HAS_ATTRIBUTE(always_inline)

-# define RBIMPL_ATTR_FORCEINLINE() __attribute__((__always_inline__)) inline

-#else

-# define RBIMPL_ATTR_FORCEINLINE() inline

-#endif

-

-#endif /* RBIMPL_ATTR_FORCEINLINE_H */

-#ifndef RBIMPL_ATTR_FORMAT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_FORMAT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_FORMAT.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((format))` */

-#if RBIMPL_HAS_ATTRIBUTE(format)

-# define RBIMPL_ATTR_FORMAT(x, y, z) __attribute__((__format__(x, y, z)))

-#else

-# define RBIMPL_ATTR_FORMAT(x, y, z) /* void */

-#endif

-

-#if defined(__MINGW_PRINTF_FORMAT)

-# define RBIMPL_PRINTF_FORMAT __MINGW_PRINTF_FORMAT

-#else

-# define RBIMPL_PRINTF_FORMAT __printf__

-#endif

-

-#endif /* RBIMPL_ATTR_FORMAT_H */

-#ifndef RBIMPL_ATTR_MAYBE_UNUSED_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_MAYBE_UNUSED_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_MAYBE_UNUSED.

- */

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/has/c_attribute.h"

-#include "ruby/impl/has/cpp_attribute.h"

-

-/** Wraps (or simulates) `[[maybe_unused]]` */

-#if RBIMPL_HAS_CPP_ATTRIBUTE(maybe_unused)

-# define RBIMPL_ATTR_MAYBE_UNUSED() [[maybe_unused]]

-#elif RBIMPL_HAS_C_ATTRIBUTE(maybe_unused)

-# define RBIMPL_ATTR_MAYBE_UNUSED() [[maybe_unused]]

-#elif RBIMPL_HAS_ATTRIBUTE(unused)

-# define RBIMPL_ATTR_MAYBE_UNUSED() __attribute__((__unused__))

-#else

-# define RBIMPL_ATTR_MAYBE_UNUSED() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_MAYBE_UNUSED */

-#ifndef RBIMPL_ATTR_NOALIAS_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_NOALIAS_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_NOALIAS.

- *

- * ### Q&A ###

- *

- * - Q: There are seemingly similar attributes named #RBIMPL_ATTR_CONST,

- * #RBIMPL_ATTR_PURE, and #RBIMPL_ATTR_NOALIAS. What are the difference?

- *

- * - A: Allowed operations are different.

- *

- * - #RBIMPL_ATTR_CONST ... Functions attributed by this are not allowed to

- * read/write _any_ pointers at all (there are exceptional situations

- * when reading a pointer is possible but forget that; they are too

- * exceptional to be useful). Just remember that everything pointer-

- * related are NG.

- *

- * - #RBIMPL_ATTR_PURE ... Functions attributed by this can read any

- * nonvolatile pointers, but no writes are allowed at all. The ability

- * to read _any_ nonvolatile pointers makes it possible to mark ::VALUE-

- * taking functions as being pure, as long as they are read-only.

- *

- * - #RBIMPL_ATTR_NOALIAS ... Can both read/write, but only through

- * pointers passed to the function as parameters. This is a typical

- * situation when you create a C++ non-static member function which only

- * concerns `this`. No global variables are allowed to read/write. So

- * this is not a super-set of being pure. If you want to read something,

- * that has to be passed to the function as a pointer. ::VALUE -taking

- * functions thus cannot be attributed as such.

- */

-#include "ruby/impl/has/declspec_attribute.h"

-

-/** Wraps (or simulates) `__declspec((noalias))` */

-#if RBIMPL_HAS_DECLSPEC_ATTRIBUTE(noalias)

-# define RBIMPL_ATTR_NOALIAS() __declspec(noalias)

-#else

-# define RBIMPL_ATTR_NOALIAS() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_NOALIAS_H */

-#ifndef RBIMPL_ATTR_NODISCARD_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_NODISCARD_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_NODISCARD.

- */

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/has/c_attribute.h"

-#include "ruby/impl/has/cpp_attribute.h"

-

-/**

- * Wraps (or simulates) `[[nodiscard]]`. In C++ (at least since C++20) a

- * nodiscard attribute can have a message why the result shall not be ignoed.

- * However GCC attribute and SAL annotation cannot take them.

- */

-#if RBIMPL_HAS_CPP_ATTRIBUTE(nodiscard)

-# define RBIMPL_ATTR_NODISCARD() [[nodiscard]]

-#elif RBIMPL_HAS_C_ATTRIBUTE(nodiscard)

-# define RBIMPL_ATTR_NODISCARD() [[nodiscard]]

-#elif RBIMPL_HAS_ATTRIBUTE(warn_unused_result)

-# define RBIMPL_ATTR_NODISCARD() __attribute__((__warn_unused_result__))

-#elif defined(_Check_return_)

-# /* Take SAL definition. */

-# define RBIMPL_ATTR_NODISCARD() _Check_return_

-#else

-# define RBIMPL_ATTR_NODISCARD() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_NODISCARD_H */

-#ifndef RBIMPL_ATTR_NOEXCEPT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_NOEXCEPT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_NOEXCEPT.

- *

- * This isn't actually an attribute in C++ but who cares...

- *

- * Mainly due to aesthetic reasons, this one is rarely used in the project.

- * But can be handy on occasions, especially when a function's noexcept-ness

- * depends on its calling functions.

- *

- * ### Q&A ###

- *

- * - Q: Can a function that raises Ruby exceptions be attributed `noexcept`?

- *

- * - A: Yes. `noexcept` is about C++ exceptions, not Ruby's. They don't

- * interface each other. You can safely attribute a function that raises

- * Ruby exceptions as `noexcept`.

- *

- * - Q: How, then, can I assert that a function I wrote doesn't raise any Ruby

- * exceptions?

- *

- * - A: `__attribute__((__leaf__))` is for that purpose. A function attributed

- * as leaf can still throw C++ exceptions, but not Ruby's. Note however,

- * that it's extremely difficult -- if not impossible -- to assert that a

- * function doesn't raise any Ruby exceptions at all. Use of that

- * attribute is not recommended; mere mortals can't properly use that by

- * hand.

- *

- * - Q: Does it make sense to attribute an inline function `noexcept`?

- *

- * - A: I thought so before. But no, I don't think they are useful any longer.

- *

- * - When an inline function attributed `noexcept` actually doesn't throw

- * any exceptions at all: these days I don't see any difference in

- * generated assembly by adding/removing this attribute. C++ compilers

- * get smarter and smarter. Today they can infer if it actually throws

- * or not without any annotations by humans (correct me if I'm wrong).

- *

- * - When an inline function attributed `noexcepr` actually _does_ throw an

- * exception: they have to call `std::terminate` then (C++ standard

- * mandates so). This means exception handling routines are actually

- * enforced, not omitted. This doesn't impact runtime performance (The

- * Itanium C++ ABI has zero-cost exception handling), but does impact on

- * generated binary size. This is bad.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/feature.h"

-

-/** Wraps (or simulates) C++11 `noexcept` */

-#if ! defined(__cplusplus)

-# /* Doesn't make sense. */

-# define RBIMPL_ATTR_NOEXCEPT(_) /* void */

-

-#elif RBIMPL_HAS_FEATURE(cxx_noexcept)

-# define RBIMPL_ATTR_NOEXCEPT(_) noexcept(noexcept(_))

-

-#elif defined(__GXX_EXPERIMENTAL_CXX0X__) && __GXX_EXPERIMENTAL_CXX0X__

-# define RBIMPL_ATTR_NOEXCEPT(_) noexcept(noexcept(_))

-

-#elif defined(__INTEL_CXX11_MODE__)

-# define RBIMPL_ATTR_NOEXCEPT(_) noexcept(noexcept(_))

-

-#elif RBIMPL_COMPILER_SINCE(MSVC, 19, 0, 0)

-# define RBIMPL_ATTR_NOEXCEPT(_) noexcept(noexcept(_))

-

-#elif __cplusplus >= 201103L

-# define RBIMPL_ATTR_NOEXCEPT(_) noexcept(noexcept(_))

-

-#else

-# define RBIMPL_ATTR_NOEXCEPT(_) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_NOEXCEPT_H */

-#ifndef RBIMPL_ATTR_NOINLINE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_NOINLINE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_NOINLINE.

- */

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/has/declspec_attribute.h"

-

-/** Wraps (or simulates) `__declspec(noinline)` */

-#if RBIMPL_HAS_DECLSPEC_ATTRIBUTE(noinline)

-# define RBIMPL_ATTR_NOINLINE() __declspec(noinline)

-#elif RBIMPL_HAS_ATTRIBUTE(noinline)

-# define RBIMPL_ATTR_NOINLINE() __attribute__((__noinline__))

-#else

-# define RBIMPL_ATTR_NOINLINE() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_NOINLINE_H */

-#ifndef RBIMPL_ATTR_NONNULL_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_NONNULL_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_NONNULL.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((nonnull))` */

-#if RBIMPL_HAS_ATTRIBUTE(nonnull)

-# define RBIMPL_ATTR_NONNULL(list) __attribute__((__nonnull__ list))

-#else

-# define RBIMPL_ATTR_NONNULL(list) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_NONNULL_H */

-#ifndef RBIMPL_ATTR_NORETURN_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_NORETURN_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_NORETURN.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/has/cpp_attribute.h"

-#include "ruby/impl/has/declspec_attribute.h"

-

-/** Wraps (or simulates) `[[noreturn]]` */

-#if RBIMPL_COMPILER_SINCE(SunPro, 5, 10, 0)

-# define RBIMPL_ATTR_NORETURN() _Pragma("does_not_return")

-

-#elif RBIMPL_HAS_DECLSPEC_ATTRIBUTE(noreturn)

-# define RBIMPL_ATTR_NORETURN() __declspec(noreturn)

-

-#elif RBIMPL_HAS_ATTRIBUTE(noreturn)

-# define RBIMPL_ATTR_NORETURN() __attribute__((__noreturn__))

-

-#elif RBIMPL_HAS_CPP_ATTRIBUTE(noreturn)

-# define RBIMPL_ATTR_NORETURN() [[noreturn]]

-

-#elif defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 201112)

-# define RBIMPL_ATTR_NORETURN() _Noreturn

-

-#elif defined(_Noreturn)

-# /* glibc <sys/cdefs.h> has this macro. */

-# define RBIMPL_ATTR_NORETURN() _Noreturn

-

-#else

-# define RBIMPL_ATTR_NORETURN() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_NORETURN_H */

-#ifndef RBIMPL_ATTR_PURE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_PURE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_PURE.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/attribute.h"

-#include "ruby/assert.h"

-

-/** Wraps (or simulates) `__attribute__((pure))` */

-#if RBIMPL_HAS_ATTRIBUTE(pure)

-# define RBIMPL_ATTR_PURE() __attribute__((__pure__))

-#elif RBIMPL_COMPILER_SINCE(SunPro, 5, 10, 0)

-# define RBIMPL_ATTR_PURE() _Pragma("does_not_write_global_data")

-#else

-# define RBIMPL_ATTR_PURE() /* void */

-#endif

-

-/** Enables #RBIMPL_ATTR_PURE iff. #RUBY_NDEBUG. */

-#if RUBY_NDEBUG

-# define RBIMPL_ATTR_PURE_ON_NDEBUG() RBIMPL_ATTR_PURE()

-#else

-# define RBIMPL_ATTR_PURE_ON_NDEBUG() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_PURE_H */

-#ifndef RBIMPL_ATTR_RESTRICT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_RESTRICT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_RESTRICT.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/attribute.h"

-#include "ruby/impl/token_paste.h"

-

-/* :FIXME: config.h includes conflicting `#define restrict`. MSVC can be

- * detected using `RBIMPL_COMPILER_SINCE()`, but Clang & family cannot use

- * `__has_declspec_attribute()` which involves macro substitution. */

-

-/** Wraps (or simulates) `__declspec(restrict)` */

-#if RBIMPL_COMPILER_SINCE(MSVC, 14, 0, 0)

-# define RBIMPL_ATTR_RESTRICT() __declspec(RBIMPL_TOKEN_PASTE(re, strict))

-

-#elif RBIMPL_HAS_ATTRIBUTE(malloc)

-# define RBIMPL_ATTR_RESTRICT() __attribute__((__malloc__))

-

-#elif RBIMPL_COMPILER_SINCE(SunPro, 5, 10, 0)

-# define RBIMPL_ATTR_RESTRICT() _Pragma("returns_new_memory")

-

-#else

-# define RBIMPL_ATTR_RESTRICT() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_RESTRICT_H */

-#ifndef RBIMPL_ATTR_RETURNS_NONNULL_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_RETURNS_NONNULL_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_RETURNS_NONNULL.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((returns_nonnull))` */

-#if defined(_Ret_nonnull_)

-# /* Take SAL definition. */

-# define RBIMPL_ATTR_RETURNS_NONNULL() _Ret_nonnull_

-

-#elif RBIMPL_HAS_ATTRIBUTE(returns_nonnull)

-# define RBIMPL_ATTR_RETURNS_NONNULL() __attribute__((__returns_nonnull__))

-

-#else

-# define RBIMPL_ATTR_RETURNS_NONNULL() /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_RETURNS_NONNULL_H */

-#ifndef RBIMPL_ATTR_WARNING_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_WARNING_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_WARNING.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((warning))` */

-#if RBIMPL_HAS_ATTRIBUTE(warning)

-# define RBIMPL_ATTR_WARNING(msg) __attribute__((__warning__ msg))

-#else

-# define RBIMPL_ATTR_WARNING(msg) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_WARNING_H */

-#ifndef RBIMPL_ATTR_WEAKREF_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ATTR_WEAKREF_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_ATTR_WEAKREF.

- */

-#include "ruby/impl/has/attribute.h"

-

-/** Wraps (or simulates) `__attribute__((weakref))` */

-#if RBIMPL_HAS_ATTRIBUTE(weakref)

-# define RBIMPL_ATTR_WEAKREF(sym) __attribute__((__weakref__(# sym)))

-#else

-# define RBIMPL_ATTR_WEAKREF(sym) /* void */

-#endif

-

-#endif /* RBIMPL_ATTR_WEAKREF_H */

-#ifndef RBIMPL_CAST_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_CAST_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines RBIMPL_CAST.

- * @cond INTERNAL_MACRO

- *

- * This casting macro makes sense only inside of other macros that are part of

- * public headers. They could be used from C++, and C-style casts could issue

- * warnings. Ruby internals are pure C so they should not bother.

- */

-#include "ruby/impl/compiler_since.h"

-#include "ruby/impl/has/warning.h"

-#include "ruby/impl/warning_push.h"

-

-#if ! defined(__cplusplus)

-# define RBIMPL_CAST(expr) (expr)

-

-#elif RBIMPL_COMPILER_SINCE(GCC, 4, 6, 0)

-# /* g++ has -Wold-style-cast since 1997 or so, but its _Pragma is broken. */

-# /* See https://gcc.godbolt.org/z/XWhU6J */

-# define RBIMPL_CAST(expr) (expr)

-# pragma GCC diagnostic ignored "-Wold-style-cast"

-

-#elif RBIMPL_HAS_WARNING("-Wold-style-cast")

-# define RBIMPL_CAST(expr) \

- RBIMPL_WARNING_PUSH() \

- RBIMPL_WARNING_IGNORED(-Wold-style-cast) \

- (expr) \

- RBIMPL_WARNING_POP()

-

-#else

-# define RBIMPL_CAST(expr) (expr)

-#endif

-/** @endcond */

-

-#endif /* RBIMPL_CAST_H */

-#ifndef RBIMPL_COMPILER_IS_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS.

- */

-

-/**

- * @brief Checks if the compiler is of given brand.

- * @param cc Compiler brand, like `MSVC`.

- * @retval true It is.

- * @retval false It isn't.

- */

-#define RBIMPL_COMPILER_IS(cc) RBIMPL_COMPILER_IS_ ## cc

-

-#include "ruby/impl/compiler_is/apple.h"

-#include "ruby/impl/compiler_is/clang.h"

-#include "ruby/impl/compiler_is/gcc.h"

-#include "ruby/impl/compiler_is/intel.h"

-#include "ruby/impl/compiler_is/msvc.h"

-#include "ruby/impl/compiler_is/sunpro.h"

-/* :TODO: Other possible compilers to support:

- *

- * - IBM XL: recent XL are clang-backended so some tweaks like we do for

- * Apple's might be needed.

- *

- * - ARM's armclang: ditto, it can be clang-backended. */

-

-#endif /* RBIMPL_COMPILER_IS_H */

-#ifndef RBIMPL_COMPILER_IS_APPLE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_APPLE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS_Apple.

- *

- * Apple ships clang. Problem is, its `__clang_major__` etc. are not the

- * upstream LLVM version, but XCode's. We have to think Apple's is distinct

- * from LLVM's, when it comes to compiler detection business in this header

- * file.

- */

-#if ! defined(__clang__)

-# define RBIMPL_COMPILER_IS_Apple 0

-

-#elif ! defined(__apple_build_version__)

-# define RBIMPL_COMPILER_IS_Apple 0

-

-#else

-# define RBIMPL_COMPILER_IS_Apple 1

-# define RBIMPL_COMPILER_VERSION_MAJOR __clang_major__

-# define RBIMPL_COMPILER_VERSION_MINOR __clang_minor__

-# define RBIMPL_COMPILER_VERSION_PATCH __clang_patchlevel__

-#endif

-

-#endif /* RBIMPL_COMPILER_IS_APPLE_H */

-#ifndef RBIMPL_COMPILER_IS_CLANG_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_CLANG_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS_Clang.

- */

-#include "ruby/impl/compiler_is/apple.h"

-

-#if ! defined(__clang__)

-# define RBIMPL_COMPILER_IS_Clang 0

-

-#elif RBIMPL_COMPILER_IS(Apple)

-# define RBIMPL_COMPILER_IS_Clang 0

-

-#else

-# define RBIMPL_COMPILER_IS_Clang 1

-# define RBIMPL_COMPILER_VERSION_MAJOR __clang_major__

-# define RBIMPL_COMPILER_VERSION_MINOR __clang_minor__

-# define RBIMPL_COMPILER_VERSION_PATCH __clang_patchlevel__

-#endif

-

-#endif /* RBIMPL_COMPILER_IS_CLANG_H */

-#ifndef RBIMPL_COMPILER_IS_GCC_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_GCC_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS_GCC.

- */

-#include "ruby/impl/compiler_is/apple.h"

-#include "ruby/impl/compiler_is/clang.h"

-#include "ruby/impl/compiler_is/intel.h"

-

-#if ! defined(__GNUC__)

-# define RBIMPL_COMPILER_IS_GCC 0

-

-#elif RBIMPL_COMPILER_IS(Apple)

-# define RBIMPL_COMPILER_IS_GCC 0

-

-#elif RBIMPL_COMPILER_IS(Clang)

-# define RBIMPL_COMPILER_IS_GCC 0

-

-#elif RBIMPL_COMPILER_IS(Intel)

-# define RBIMPL_COMPILER_IS_GCC 0

-

-#else

-# define RBIMPL_COMPILER_IS_GCC 1

-# define RBIMPL_COMPILER_VERSION_MAJOR __GNUC__

-# define RBIMPL_COMPILER_VERSION_MINOR __GNUC_MINOR__

-# define RBIMPL_COMPILER_VERSION_PATCH __GNUC_PATCHLEVEL__

-#endif

-

-#endif /* RBIMPL_COMPILER_IS_GCC_H */

-#ifndef RBIMPL_COMPILER_IS_INTEL_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_INTEL_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS_Intel.

- */

-#if ! defined(__INTEL_COMPILER)

-# define RBIMPL_COMPILER_IS_Intel 0

-

-#elif ! defined(__INTEL_COMPILER_UPDATE)

-# define RBIMPL_COMPILER_IS_Intel 1

-# /* __INTEL_COMPILER = XXYZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (__INTEL_COMPILER / 100)

-# define RBIMPL_COMPILER_VERSION_MINOR (__INTEL_COMPILER % 100 / 10)

-# define RBIMPL_COMPILER_VERSION_PATCH (__INTEL_COMPILER % 10)

-

-#else

-# define RBIMPL_COMPILER_IS_Intel 1

-# /* __INTEL_COMPILER = XXYZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (__INTEL_COMPILER / 100)

-# define RBIMPL_COMPILER_VERSION_MINOR (__INTEL_COMPILER % 100 / 10)

-# define RBIMPL_COMPILER_VERSION_PATCH __INTEL_COMPILER_UPDATE

-#endif

-

-#endif /* RBIMPL_COMPILER_IS_INTEL_H */

-#ifndef RBIMPL_COMPILER_IS_MSVC_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_MSVC_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS_MSVC.

- */

-#include "ruby/impl/compiler_is/clang.h"

-#include "ruby/impl/compiler_is/intel.h"

-

-#if ! defined(_MSC_VER)

-# define RBIMPL_COMPILER_IS_MSVC 0

-

-#elif RBIMPL_COMPILER_IS(Clang)

-# define RBIMPL_COMPILER_IS_MSVC 0

-

-#elif RBIMPL_COMPILER_IS(Intel)

-# define RBIMPL_COMPILER_IS_MSVC 0

-

-#elif _MSC_VER >= 1400

-# define RBIMPL_COMPILER_IS_MSVC 1

-# /* _MSC_FULL_VER = XXYYZZZZZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (_MSC_FULL_VER / 10000000)

-# define RBIMPL_COMPILER_VERSION_MINOR (_MSC_FULL_VER % 10000000 / 100000)

-# define RBIMPL_COMPILER_VERSION_PATCH (_MSC_FULL_VER % 100000)

-

-#elif defined(_MSC_FULL_VER)

-# define RBIMPL_COMPILER_IS_MSVC 1

-# /* _MSC_FULL_VER = XXYYZZZZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (_MSC_FULL_VER / 1000000)

-# define RBIMPL_COMPILER_VERSION_MINOR (_MSC_FULL_VER % 1000000 / 10000)

-# define RBIMPL_COMPILER_VERSION_PATCH (_MSC_FULL_VER % 10000)

-

-#else

-# define RBIMPL_COMPILER_IS_MSVC 1

-# /* _MSC_VER = XXYY */

-# define RBIMPL_COMPILER_VERSION_MAJOR (_MSC_VER / 100)

-# define RBIMPL_COMPILER_VERSION_MINOR (_MSC_VER % 100)

-# define RBIMPL_COMPILER_VERSION_PATCH 0

-#endif

-

-#endif /* RBIMPL_COMPILER_IS_MSVC_H */

-#ifndef RBIMPL_COMPILER_IS_SUNPRO_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_IS_SUNPRO_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_IS_SunPro.

- */

-#if ! (defined(__SUNPRO_C) || defined(__SUNPRO_CC))

-# define RBIMPL_COMPILER_IS_SunPro 0

-

-#elif defined(__SUNPRO_C) && __SUNPRO_C >= 0x5100

-# define RBIMPL_COMPILER_IS_SunPro 1

-# /* __SUNPRO_C = 0xXYYZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (__SUNPRO_C >> 12)

-# define RBIMPL_COMPILER_VERSION_MINOR ((__SUNPRO_C >> 8 & 0xF) * 10 + (__SUNPRO_C >> 4 & 0xF))

-# define RBIMPL_COMPILER_VERSION_PATCH (__SUNPRO_C & 0xF)

-

-#elif defined(__SUNPRO_CC) && __SUNPRO_CC >= 0x5100

-# define RBIMPL_COMPILER_IS_SunPro 1

-# /* __SUNPRO_CC = 0xXYYZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (__SUNPRO_CC >> 12)

-# define RBIMPL_COMPILER_VERSION_MINOR ((__SUNPRO_CC >> 8 & 0xF) * 10 + (__SUNPRO_CC >> 4 & 0xF))

-# define RBIMPL_COMPILER_VERSION_PATCH (__SUNPRO_CC & 0xF)

-

-#elif defined(__SUNPRO_C)

-# define RBIMPL_COMPILER_IS_SunPro 1

-# /* __SUNPRO_C = 0xXYZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (__SUNPRO_C >> 8)

-# define RBIMPL_COMPILER_VERSION_MINOR (__SUNPRO_C >> 4 & 0xF)

-# define RBIMPL_COMPILER_VERSION_PATCH (__SUNPRO_C & 0xF)

-

-#else

-# define RBIMPL_COMPILER_IS_SunPro 1

-# /* __SUNPRO_CC = 0xXYZ */

-# define RBIMPL_COMPILER_VERSION_MAJOR (__SUNPRO_CC >> 8)

-# define RBIMPL_COMPILER_VERSION_MINOR (__SUNPRO_CC >> 4 & 0xF)

-# define RBIMPL_COMPILER_VERSION_PATCH (__SUNPRO_CC & 0xF)

-#endif

-

-#endif /* RBIMPL_COMPILER_IS_SUNPRO_H */

-#ifndef RBIMPL_COMPILER_SINCE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_COMPILER_SINCE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_COMPILER_SINCE.

- */

-#include "ruby/impl/compiler_is.h"

-

-/**

- * @brief Checks if the compiler is of given brand and is newer than or equal

- * to the passed version.

- * @param cc Compiler brand, like `MSVC`.

- * @param x Major version.

- * @param y Minor version.

- * @param z Patchlevel.

- * @retval true cc >= x.y.z.

- * @retval false oherwise.

- */

-#define RBIMPL_COMPILER_SINCE(cc, x, y, z) \

- (RBIMPL_COMPILER_IS(cc) && \

- ((RBIMPL_COMPILER_VERSION_MAJOR > (x)) || \

- ((RBIMPL_COMPILER_VERSION_MAJOR == (x)) && \

- ((RBIMPL_COMPILER_VERSION_MINOR > (y)) || \

- ((RBIMPL_COMPILER_VERSION_MINOR == (y)) && \

- (RBIMPL_COMPILER_VERSION_PATCH >= (z)))))))

-

-/**

- * @brief Checks if the compiler is of given brand and is older than the

- * passed version.

- * @param cc Compiler brand, like `MSVC`.

- * @param x Major version.

- * @param y Minor version.

- * @param z Patchlevel.

- * @retval true cc < x.y.z.

- * @retval false oherwise.

- */

-#define RBIMPL_COMPILER_BEFORE(cc, x, y, z) \

- (RBIMPL_COMPILER_IS(cc) && \

- ((RBIMPL_COMPILER_VERSION_MAJOR < (x)) || \

- ((RBIMPL_COMPILER_VERSION_MAJOR == (x)) && \

- ((RBIMPL_COMPILER_VERSION_MINOR < (y)) || \

- ((RBIMPL_COMPILER_VERSION_MINOR == (y)) && \

- (RBIMPL_COMPILER_VERSION_PATCH < (z)))))))

-

-#endif /* RBIMPL_COMPILER_SINCE_H */

-#ifndef RBIMPL_CONFIG_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_CONFIG_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Thin wrapper to ruby/config.h

- */

-#include "ruby/config.h"

-

-#ifdef RUBY_EXTCONF_H

-# include RUBY_EXTCONF_H

-#endif

-

-#include "ruby/impl/compiler_since.h"

-

-#if defined(__cplusplus)

-#/* __builtin_choose_expr and __builtin_types_compatible aren't available

-# * on C++. See https://gcc.gnu.org/onlinedocs/gcc/Other-Builtins.html */

-# undef HAVE_BUILTIN___BUILTIN_CHOOSE_EXPR_CONSTANT_P

-# undef HAVE_BUILTIN___BUILTIN_TYPES_COMPATIBLE_P

-

-# undef HAVE_PROTOTYPES

-# define HAVE_PROTOTYPES 1

-

-# undef HAVE_STDARG_PROTOTYPES

-# define HAVE_STDARG_PROTOTYPES 1

-

-/* HAVE_VA_ARGS_MACRO is for C. C++ situations might be different. */

-# undef HAVE_VA_ARGS_MACRO

-# if __cplusplus >= 201103L

-# define HAVE_VA_ARGS_MACRO

-# elif defined(__GXX_EXPERIMENTAL_CXX0X__) && __GXX_EXPERIMENTAL_CXX0X__

-# define HAVE_VA_ARGS_MACRO

-# elif defined(__INTEL_CXX11_MODE__)

-# define HAVE_VA_ARGS_MACRO

-# elif RBIMPL_COMPILER_SINCE(MSVC, 16, 0, 0)

-# define HAVE_VA_ARGS_MACRO

-# else

-# /* NG, not known. */

-# endif

-#endif

-

-#if RBIMPL_COMPILER_BEFORE(GCC, 4, 9, 0)

-# /* See https://bugs.ruby-lang.org/issues/14221 */

-# undef HAVE_BUILTIN___BUILTIN_CHOOSE_EXPR_CONSTANT_P

-#endif

-

-#if RBIMPL_COMPILER_BEFORE(GCC, 5, 0, 0)

-# /* GCC 4.9.2 reportedly has this feature and is broken. The function is not

-# * officially documented below. Seems we should not use it.

-# * https://gcc.gnu.org/onlinedocs/gcc-4.9.4/gcc/Other-Builtins.html */

-# undef HAVE_BUILTIN___BUILTIN_ALLOCA_WITH_ALIGN

-#endif

-

-#ifndef STRINGIZE0

-# define STRINGIZE(expr) STRINGIZE0(expr)

-# define STRINGIZE0(expr) #expr

-#endif

-

-#ifdef AC_APPLE_UNIVERSAL_BUILD

-# undef WORDS_BIGENDIAN

-# ifdef __BIG_ENDIAN__

-# define WORDS_BIGENDIAN

-# endif

-#endif

-

-#ifndef DLEXT_MAXLEN

-# define DLEXT_MAXLEN 4

-#endif

-

-#ifndef RUBY_PLATFORM

-# define RUBY_PLATFORM "unknown-unknown"

-#endif

-

-#ifdef UNALIGNED_WORD_ACCESS

-# /* Take that. */

-#elif defined(__i386)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(__i386__)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(_M_IX86)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(__x86_64)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(__x86_64__)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(_M_AMD64)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(__powerpc64__)

-# define UNALIGNED_WORD_ACCESS 1

-#elif defined(__mc68020__)

-# define UNALIGNED_WORD_ACCESS 1

-#else

-# define UNALIGNED_WORD_ACCESS 0

-#endif

-

-/* Detection of __VA_OPT__ */

-#if ! defined(HAVE_VA_ARGS_MACRO)

-# undef HAVE___VA_OPT__

-

-#else

-# /* Idea taken from: https://stackoverflow.com/a/48045656 */

-# define RBIMPL_TEST3(q, w, e, ...) e

-# define RBIMPL_TEST2(...) RBIMPL_TEST3(__VA_OPT__(,),1,0,0)

-# define RBIMPL_TEST1() RBIMPL_TEST2("ruby")

-# if RBIMPL_TEST1()

-# define HAVE___VA_OPT__

-# else

-# undef HAVE___VA_OPT__

-# endif

-# undef RBIMPL_TEST1

-# undef RBIMPL_TEST2

-# undef RBIMPL_TEST3

-#endif /* HAVE_VA_ARGS_MACRO */

-

-#endif /* RBIMPL_CONFIG_H */

-#ifndef RBIMPL_CONSTANT_P_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_CONSTANT_P_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines #RBIMPL_CONSTANT_P.

- *

- * Note that __builtin_constant_p can be applicable inside of inline functions,

- * according to GCC manual. Clang lacks that feature, though.

- *

- * @see https://bugs.llvm.org/show_bug.cgi?id=4898

- * @see https://gcc.gnu.org/onlinedocs/gcc/Other-Builtins.html

- */

-#include "ruby/impl/has/builtin.h"

-

-#if RBIMPL_HAS_BUILTIN(__builtin_constant_p)

-# define RBIMPL_CONSTANT_P(expr) __builtin_constant_p(expr)

-#else

-# define RBIMPL_CONSTANT_P(expr) 0

-#endif

-

-#endif /* RBIMPL_CONSTANT_P_H */

-#ifndef RBIMPL_CORE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_CORE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Core data structures, definitions and manupulations.

- */

-#include "ruby/impl/core/rarray.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/core/rbignum.h"

-#include "ruby/impl/core/rclass.h"

-#include "ruby/impl/core/rdata.h"

-#include "ruby/impl/core/rfile.h"

-#include "ruby/impl/core/rhash.h"

-#include "ruby/impl/core/robject.h"

-#include "ruby/impl/core/rregexp.h"

-#include "ruby/impl/core/rstring.h"

-#include "ruby/impl/core/rstruct.h"

-#include "ruby/impl/core/rtypeddata.h"

-#endif /* RBIMPL_CORE_H */

-#ifndef RBIMPL_RARRAY_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RARRAY_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RArray.

- */

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/attr/maybe_unused.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/fl_type.h"

-#include "ruby/impl/rgengc.h"

-#include "ruby/impl/stdbool.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/assert.h"

-

-#ifndef USE_TRANSIENT_HEAP

-# define USE_TRANSIENT_HEAP 1

-#endif

-

-#define RARRAY(obj) RBIMPL_CAST((struct RArray *)(obj))

-#define RARRAY_EMBED_FLAG RARRAY_EMBED_FLAG

-#define RARRAY_EMBED_LEN_MASK RARRAY_EMBED_LEN_MASK

-#define RARRAY_EMBED_LEN_MAX RARRAY_EMBED_LEN_MAX

-#define RARRAY_EMBED_LEN_SHIFT RARRAY_EMBED_LEN_SHIFT

-#if USE_TRANSIENT_HEAP

-# define RARRAY_TRANSIENT_FLAG RARRAY_TRANSIENT_FLAG

-#else

-# define RARRAY_TRANSIENT_FLAG 0

-#endif

-#define RARRAY_LEN rb_array_len

-#define RARRAY_CONST_PTR rb_array_const_ptr

-#define RARRAY_CONST_PTR_TRANSIENT rb_array_const_ptr_transient

-

-/** @cond INTERNAL_MACRO */

-#if defined(__fcc__) || defined(__fcc_version) || \

- defined(__FCC__) || defined(__FCC_VERSION)

-/* workaround for old version of Fujitsu C Compiler (fcc) */

-# define FIX_CONST_VALUE_PTR(x) ((const VALUE *)(x))

-#else

-# define FIX_CONST_VALUE_PTR(x) (x)

-#endif

-

-#define RARRAY_EMBED_LEN RARRAY_EMBED_LEN

-#define RARRAY_LENINT RARRAY_LENINT

-#define RARRAY_TRANSIENT_P RARRAY_TRANSIENT_P

-#define RARRAY_ASET RARRAY_ASET

-#define RARRAY_PTR RARRAY_PTR

-/** @endcond */

-

-enum ruby_rarray_flags {

- RARRAY_EMBED_FLAG = RUBY_FL_USER1,

- /* RUBY_FL_USER2 is for ELTS_SHARED */

- RARRAY_EMBED_LEN_MASK = RUBY_FL_USER4 | RUBY_FL_USER3

-#if USE_TRANSIENT_HEAP

- ,

- RARRAY_TRANSIENT_FLAG = RUBY_FL_USER13

-#endif

-};

-

-enum ruby_rarray_consts {

- RARRAY_EMBED_LEN_SHIFT = RUBY_FL_USHIFT + 3,

- RARRAY_EMBED_LEN_MAX = RBIMPL_EMBED_LEN_MAX_OF(VALUE)

-};

-

-struct RArray {

- struct RBasic basic;

- union {

- struct {

- long len;

- union {

- long capa;

-#if defined(__clang__) /* <- clang++ is sane */ || \

- !defined(__cplusplus) /* <- C99 is sane */ || \

- (__cplusplus > 199711L) /* <- C++11 is sane */

- const

-#endif

- VALUE shared_root;

- } aux;

- const VALUE *ptr;

- } heap;

- const VALUE ary[RARRAY_EMBED_LEN_MAX];

- } as;

-};

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE *rb_ary_ptr_use_start(VALUE ary);

-void rb_ary_ptr_use_end(VALUE a);

-#if USE_TRANSIENT_HEAP

-void rb_ary_detransient(VALUE a);

-#endif

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline long

-RARRAY_EMBED_LEN(VALUE ary)

-{

- RBIMPL_ASSERT_TYPE(ary, RUBY_T_ARRAY);

- RBIMPL_ASSERT_OR_ASSUME(RB_FL_ANY_RAW(ary, RARRAY_EMBED_FLAG));

-

- VALUE f = RBASIC(ary)->flags;

- f &= RARRAY_EMBED_LEN_MASK;

- f >>= RARRAY_EMBED_LEN_SHIFT;

- return RBIMPL_CAST((long)f);

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-static inline long

-rb_array_len(VALUE a)

-{

- RBIMPL_ASSERT_TYPE(a, RUBY_T_ARRAY);

-

- if (RB_FL_ANY_RAW(a, RARRAY_EMBED_FLAG)) {

- return RARRAY_EMBED_LEN(a);

- }

- else {

- return RARRAY(a)->as.heap.len;

- }

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-RARRAY_LENINT(VALUE ary)

-{

- return rb_long2int(RARRAY_LEN(ary));

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-RARRAY_TRANSIENT_P(VALUE ary)

-{

- RBIMPL_ASSERT_TYPE(ary, RUBY_T_ARRAY);

-

-#if USE_TRANSIENT_HEAP

- return RB_FL_ANY_RAW(ary, RARRAY_TRANSIENT_FLAG);

-#else

- return false;

-#endif

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-/* internal function. do not use this function */

-static inline const VALUE *

-rb_array_const_ptr_transient(VALUE a)

-{

- RBIMPL_ASSERT_TYPE(a, RUBY_T_ARRAY);

-

- if (RB_FL_ANY_RAW(a, RARRAY_EMBED_FLAG)) {

- return FIX_CONST_VALUE_PTR(RARRAY(a)->as.ary);

- }

- else {

- return FIX_CONST_VALUE_PTR(RARRAY(a)->as.heap.ptr);

- }

-}

-

-#if ! USE_TRANSIENT_HEAP

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-#endif

-/* internal function. do not use this function */

-static inline const VALUE *

-rb_array_const_ptr(VALUE a)

-{

- RBIMPL_ASSERT_TYPE(a, RUBY_T_ARRAY);

-

-#if USE_TRANSIENT_HEAP

- if (RARRAY_TRANSIENT_P(a)) {

- rb_ary_detransient(a);

- }

-#endif

- return rb_array_const_ptr_transient(a);

-}

-

-/* internal function. do not use this function */

-static inline VALUE *

-rb_array_ptr_use_start(VALUE a,

- RBIMPL_ATTR_MAYBE_UNUSED()

- int allow_transient)

-{

- RBIMPL_ASSERT_TYPE(a, RUBY_T_ARRAY);

-

-#if USE_TRANSIENT_HEAP

- if (!allow_transient) {

- if (RARRAY_TRANSIENT_P(a)) {

- rb_ary_detransient(a);

- }

- }

-#endif

-

- return rb_ary_ptr_use_start(a);

-}

-

-/* internal function. do not use this function */

-static inline void

-rb_array_ptr_use_end(VALUE a,

- RBIMPL_ATTR_MAYBE_UNUSED()

- int allow_transient)

-{

- RBIMPL_ASSERT_TYPE(a, RUBY_T_ARRAY);

- rb_ary_ptr_use_end(a);

-}

-

-#define RBIMPL_RARRAY_STMT(flag, ary, var, expr) do { \

- RBIMPL_ASSERT_TYPE((ary), RUBY_T_ARRAY); \

- const VALUE rbimpl_ary = (ary); \

- VALUE *var = rb_array_ptr_use_start(rbimpl_ary, (flag)); \

- expr; \

- rb_array_ptr_use_end(rbimpl_ary, (flag)); \

-} while (0)

-

-#define RARRAY_PTR_USE_START(a) rb_array_ptr_use_start(a, 0)

-#define RARRAY_PTR_USE_END(a) rb_array_ptr_use_end(a, 0)

-#define RARRAY_PTR_USE(ary, ptr_name, expr) \

- RBIMPL_RARRAY_STMT(0, ary, ptr_name, expr)

-

-#define RARRAY_PTR_USE_START_TRANSIENT(a) rb_array_ptr_use_start(a, 1)

-#define RARRAY_PTR_USE_END_TRANSIENT(a) rb_array_ptr_use_end(a, 1)

-#define RARRAY_PTR_USE_TRANSIENT(ary, ptr_name, expr) \

- RBIMPL_RARRAY_STMT(1, ary, ptr_name, expr)

-

-static inline VALUE *

-RARRAY_PTR(VALUE ary)

-{

- RBIMPL_ASSERT_TYPE(ary, RUBY_T_ARRAY);

-

- VALUE tmp = RB_OBJ_WB_UNPROTECT_FOR(ARRAY, ary);

- return RBIMPL_CAST((VALUE *)RARRAY_CONST_PTR(tmp));

-}

-

-static inline void

-RARRAY_ASET(VALUE ary, long i, VALUE v)

-{

- RARRAY_PTR_USE_TRANSIENT(ary, ptr,

- RB_OBJ_WRITE(ary, &ptr[i], v));

-}

-

-/* RARRAY_AREF is used as a lvalue. Cannot be a function. */

-#if 0

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RARRAY_AREF(VALUE ary, long i)

-{

- RBIMPL_ASSERT_TYPE(ary, RUBY_T_ARRAY);

-

- return RARRAY_CONST_PTR_TRANSIENT(ary)[i];

-}

-#else

-# undef RARRAY_AREF

-# define RARRAY_AREF(a, i) RARRAY_CONST_PTR_TRANSIENT(a)[i]

-#endif

-

-#endif /* RBIMPL_RARRAY_H */

-#ifndef RBIMPL_RBASIC_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RBASIC_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RBasic.

- */

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/attr/forceinline.h"

-#include "ruby/impl/attr/noalias.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/special_consts.h"

-#include "ruby/impl/value.h"

-#include "ruby/assert.h"

-

-#define RBASIC(obj) RBIMPL_CAST((struct RBasic *)(obj))

-#define RBASIC_CLASS RBASIC_CLASS

-#define RVALUE_EMBED_LEN_MAX RVALUE_EMBED_LEN_MAX

-

-/** @cond INTERNAL_MACRO */

-#define RBIMPL_EMBED_LEN_MAX_OF(T) \

- RBIMPL_CAST((int)(sizeof(VALUE[RVALUE_EMBED_LEN_MAX]) / sizeof(T)))

-/** @endcond */

-

-enum ruby_rvalue_flags { RVALUE_EMBED_LEN_MAX = 3 };

-

-struct

-RUBY_ALIGNAS(SIZEOF_VALUE)

-RBasic {

- VALUE flags; /**< @see enum ::ruby_fl_type. */

- const VALUE klass;

-

-#ifdef __cplusplus

- public:

- RBIMPL_ATTR_CONSTEXPR(CXX11)

- RBIMPL_ATTR_ARTIFICIAL()

- RBIMPL_ATTR_FORCEINLINE()

- RBIMPL_ATTR_NOALIAS()

- /**

- * We need to define this explicit constructor because the field `klass` is

- * const-qualified above, which effectively defines the implicit default

- * constructor as "deleted" (as of C++11) -- No way but to define one by

- * ourselves.

- */

- RBasic() :

- flags(RBIMPL_VALUE_NULL),

- klass(RBIMPL_VALUE_NULL)

- {

- }

-#endif

-};

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_obj_hide(VALUE obj);

-VALUE rb_obj_reveal(VALUE obj, VALUE klass); /* do not use this API to change klass information */

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RBASIC_CLASS(VALUE obj)

-{

- RBIMPL_ASSERT_OR_ASSUME(! RB_SPECIAL_CONST_P(obj));

- return RBASIC(obj)->klass;

-}

-

-#endif /* RBIMPL_RBASIC_H */

-#ifndef RBIMPL_RBIGNUM_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RBIGNUM_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Routines to manipulate struct ::RBignum.

- */

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/impl/stdbool.h"

-

-#define RBIGNUM_SIGN rb_big_sign

-

-/** @cond INTERNAL_MACRO */

-#define RBIGNUM_POSITIVE_P RBIGNUM_POSITIVE_P

-#define RBIGNUM_NEGATIVE_P RBIGNUM_NEGATIVE_P

-/** @endcond */

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-int rb_big_sign(VALUE num);

-RBIMPL_SYMBOL_EXPORT_END()

-

-static inline bool

-RBIGNUM_POSITIVE_P(VALUE b) {

- RBIMPL_ASSERT_TYPE(b, RUBY_T_BIGNUM);

- return RBIGNUM_SIGN(b);

-}

-

-static inline bool

-RBIGNUM_NEGATIVE_P(VALUE b) {

- RBIMPL_ASSERT_TYPE(b, RUBY_T_BIGNUM);

- return ! RBIGNUM_POSITIVE_P(b);

-}

-

-#endif /* RBIMPL_RBIGNUM_H */

-#ifndef RBIMPL_RCLASS_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RCLASS_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Routines to manipulate struct ::RClass.

- */

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/cast.h"

-

-#define RMODULE_IS_OVERLAID RMODULE_IS_OVERLAID

-#define RMODULE_IS_REFINEMENT RMODULE_IS_REFINEMENT

-#define RMODULE_INCLUDED_INTO_REFINEMENT RMODULE_INCLUDED_INTO_REFINEMENT

-

-#define RCLASS(obj) RBIMPL_CAST((struct RClass *)(obj))

-#define RMODULE RCLASS

-#define RCLASS_SUPER rb_class_get_superclass

-

-enum ruby_rmodule_flags {

- RMODULE_IS_OVERLAID = RUBY_FL_USER2,

- RMODULE_IS_REFINEMENT = RUBY_FL_USER3,

- RMODULE_INCLUDED_INTO_REFINEMENT = RUBY_FL_USER4

-};

-

-struct RClass; /* Opaque, declared here for RCLASS() macro. */

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_class_get_superclass(VALUE);

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_RCLASS_H */

-#ifndef RBIMPL_RDATA_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RDATA_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RData.

- */

-#include "ruby/impl/config.h"

-

-#ifdef STDC_HEADERS

-# include <stddef.h>

-#endif

-

-#include "ruby/impl/attr/deprecated.h"

-#include "ruby/impl/attr/warning.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/fl_type.h"

-#include "ruby/impl/token_paste.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/defines.h"

-

-#ifdef RUBY_UNTYPED_DATA_WARNING

-# /* Take that. */

-#elif defined(RUBY_EXPORT)

-# define RUBY_UNTYPED_DATA_WARNING 1

-#else

-# define RUBY_UNTYPED_DATA_WARNING 0

-#endif

-

-/** @cond INTERNAL_MACRO */

-#define RBIMPL_DATA_FUNC(f) RBIMPL_CAST((void (*)(void *))(f))

-#define RBIMPL_ATTRSET_UNTYPED_DATA_FUNC() \

- RBIMPL_ATTR_WARNING(("untyped Data is unsafe; use TypedData instead")) \

- RBIMPL_ATTR_DEPRECATED(("by TypedData"))

-/** @endcond */

-

-#define RDATA(obj) RBIMPL_CAST((struct RData *)(obj))

-#define DATA_PTR(obj) RDATA(obj)->data

-#define RUBY_MACRO_SELECT RBIMPL_TOKEN_PASTE

-#define RUBY_DEFAULT_FREE RBIMPL_DATA_FUNC(-1)

-#define RUBY_NEVER_FREE RBIMPL_DATA_FUNC(0)

-#define RUBY_UNTYPED_DATA_FUNC(f) f RBIMPL_ATTRSET_UNTYPED_DATA_FUNC()

-

-/*

-#define RUBY_DATA_FUNC(func) ((void (*)(void*))(func))

-*/

-typedef void (*RUBY_DATA_FUNC)(void*);

-

-struct RData {

- struct RBasic basic;

- RUBY_DATA_FUNC dmark;

- RUBY_DATA_FUNC dfree;

- void *data;

-};

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_data_object_wrap(VALUE klass, void *datap, RUBY_DATA_FUNC dmark, RUBY_DATA_FUNC dfree);

-VALUE rb_data_object_zalloc(VALUE klass, size_t size, RUBY_DATA_FUNC dmark, RUBY_DATA_FUNC dfree);

-RBIMPL_SYMBOL_EXPORT_END()

-

-#define Data_Wrap_Struct(klass, mark, free, sval) \

- rb_data_object_wrap( \

- (klass), \

- (sval), \

- RBIMPL_DATA_FUNC(mark), \

- RBIMPL_DATA_FUNC(free))

-

-#define Data_Make_Struct0(result, klass, type, size, mark, free, sval) \

- VALUE result = rb_data_object_zalloc( \

- (klass), \

- (size), \

- RBIMPL_DATA_FUNC(mark), \

- RBIMPL_DATA_FUNC(free)); \

- (sval) = RBIMPL_CAST((type *)DATA_PTR(result)); \

- RBIMPL_CAST(/*suppress unused variable warnings*/(void)(sval))

-

-#ifdef HAVE_STMT_AND_DECL_IN_EXPR

-#define Data_Make_Struct(klass, type, mark, free, sval) \

- RB_GNUC_EXTENSION({ \

- Data_Make_Struct0( \

- data_struct_obj, \

- klass, \

- type, \

- sizeof(type), \

- mark, \

- free, \

- sval); \

- data_struct_obj; \

- })

-#else

-#define Data_Make_Struct(klass, type, mark, free, sval) \

- rb_data_object_make( \

- (klass), \

- RBIMPL_DATA_FUNC(mark), \

- RBIMPL_DATA_FUNC(free), \

- RBIMPL_CAST((void **)&(sval)), \

- sizeof(type))

-#endif

-

-#define Data_Get_Struct(obj, type, sval) \

- ((sval) = RBIMPL_CAST((type*)rb_data_object_get(obj)))

-

-RBIMPL_ATTRSET_UNTYPED_DATA_FUNC()

-static inline VALUE

-rb_data_object_wrap_warning(VALUE klass, void *ptr, RUBY_DATA_FUNC mark, RUBY_DATA_FUNC free)

-{

- return rb_data_object_wrap(klass, ptr, mark, free);

-}

-

-static inline void *

-rb_data_object_get(VALUE obj)

-{

- Check_Type(obj, RUBY_T_DATA);

- return DATA_PTR(obj);

-}

-

-RBIMPL_ATTRSET_UNTYPED_DATA_FUNC()

-static inline void *

-rb_data_object_get_warning(VALUE obj)

-{

- return rb_data_object_get(obj);

-}

-

-#if defined(HAVE_BUILTIN___BUILTIN_CHOOSE_EXPR_CONSTANT_P)

-# define rb_data_object_wrap_warning(klass, ptr, mark, free) \

- RB_GNUC_EXTENSION( \

- __builtin_choose_expr( \

- __builtin_constant_p(klass) && !(klass), \

- rb_data_object_wrap(klass, ptr, mark, free), \

- (rb_data_object_wrap_warning)(klass, ptr, mark, free)))

-#endif

-

-static inline VALUE

-rb_data_object_make(VALUE klass, RUBY_DATA_FUNC mark_func, RUBY_DATA_FUNC free_func, void **datap, size_t size)

-{

- Data_Make_Struct0(result, klass, void, size, mark_func, free_func, *datap);

- return result;

-}

-

-RBIMPL_ATTR_DEPRECATED(("by: rb_data_object_wrap"))

-static inline VALUE

-rb_data_object_alloc(VALUE klass, void *data, RUBY_DATA_FUNC dmark, RUBY_DATA_FUNC dfree)

-{

- return rb_data_object_wrap(klass, data, dmark, dfree);

-}

-

-#define rb_data_object_wrap_0 rb_data_object_wrap

-#define rb_data_object_wrap_1 rb_data_object_wrap_warning

-#define rb_data_object_wrap RUBY_MACRO_SELECT(rb_data_object_wrap_, RUBY_UNTYPED_DATA_WARNING)

-#define rb_data_object_get_0 rb_data_object_get

-#define rb_data_object_get_1 rb_data_object_get_warning

-#define rb_data_object_get RUBY_MACRO_SELECT(rb_data_object_get_, RUBY_UNTYPED_DATA_WARNING)

-#define rb_data_object_make_0 rb_data_object_make

-#define rb_data_object_make_1 rb_data_object_make_warning

-#define rb_data_object_make RUBY_MACRO_SELECT(rb_data_object_make_, RUBY_UNTYPED_DATA_WARNING)

-#endif /* RBIMPL_RDATA_H */

-#ifndef RBIMPL_RFILE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RFILE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RFile.

- */

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/cast.h"

-

-/* rb_io_t is in ruby/io.h. The header file has historically not been included

- * into ruby/ruby.h. We follow that tradition. */

-struct rb_io_t;

-

-struct RFile {

- struct RBasic basic;

- struct rb_io_t *fptr;

-};

-

-#define RFILE(obj) RBIMPL_CAST((struct RFile *)(obj))

-#endif /* RBIMPL_RFILE_H */

-#ifndef RBIMPL_RHASH_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RHASH_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Routines to manipulate struct ::RHash.

- *

- * Shyouhei really suffered agnish over placement of macros in this file. They

- * are half-brken. The situation (as of wriring) is:

- *

- * - #RHASH_TBL: works.

- * - #RHASH_ITER_LEV: compile-time error.

- * - #RHASH_IFNONE: compile-time error.

- * - #RHASH_SIZE: works.

- * - #RHASH_EMPTY_P: works.

- * - #RHASH_SET_IFNONE: works (why... given you cannot query).

- *

- * Shyouhei stopped thinking. Let them be as is.

- */

-#include "ruby/impl/config.h"

-

-#ifdef STDC_HEADERS

-# include <stddef.h>

-#endif

-

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-#if !defined RUBY_EXPORT && !defined RUBY_NO_OLD_COMPATIBILITY

-# include "ruby/backward.h"

-#endif

-

-#define RHASH_TBL(h) rb_hash_tbl(h, __FILE__, __LINE__)

-#define RHASH_ITER_LEV(h) rb_hash_iter_lev(h)

-#define RHASH_IFNONE(h) rb_hash_ifnone(h)

-#define RHASH_SIZE(h) rb_hash_size_num(h)

-#define RHASH_EMPTY_P(h) (RHASH_SIZE(h) == 0)

-#define RHASH_SET_IFNONE(h, ifnone) rb_hash_set_ifnone((VALUE)h, ifnone)

-

-struct st_table; /* in ruby/st.h */

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-size_t rb_hash_size_num(VALUE hash);

-struct st_table *rb_hash_tbl(VALUE, const char *file, int line);

-VALUE rb_hash_set_ifnone(VALUE hash, VALUE ifnone);

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_RHASH_H */

-#ifndef RBIMPL_RMATCH_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RMATCH_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RMatch.

- */

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/attr/returns_nonnull.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/assert.h"

-

-#define RMATCH(obj) RBIMPL_CAST((struct RMatch *)(obj))

-/** @cond INTERNAL_MACRO */

-#define RMATCH_REGS RMATCH_REGS

-/** @endcond */

-

-struct re_patter_buffer; /* a.k.a. OnigRegexType, defined in onigmo.h */

-struct re_registers; /* Also in onigmo.h */

-

-/* @shyouhei wonders: is anyone actively using this typedef ...? */

-typedef struct re_pattern_buffer Regexp;

-

-struct rmatch_offset {

- long beg;

- long end;

-};

-

-struct rmatch {

- struct re_registers regs;

-

- struct rmatch_offset *char_offset;

- int char_offset_num_allocated;

-};

-

-struct RMatch {

- struct RBasic basic;

- VALUE str;

- struct rmatch *rmatch;

- VALUE regexp; /* RRegexp */

-};

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_RETURNS_NONNULL()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline struct re_registers *

-RMATCH_REGS(VALUE match)

-{

- RBIMPL_ASSERT_TYPE(match, RUBY_T_MATCH);

- RBIMPL_ASSERT_OR_ASSUME(RMATCH(match)->rmatch != NULL);

- return &RMATCH(match)->rmatch->regs;

-}

-

-#endif /* RBIMPL_RMATCH_H */

-#ifndef RBIMPL_ROBJECT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ROBJECT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RObject.

- */

-#include "ruby/impl/config.h"

-

-#ifdef HAVE_STDINT_H

-# include <stdint.h>

-#endif

-

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/fl_type.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-

-#define ROBJECT(obj) RBIMPL_CAST((struct RObject *)(obj))

-#define ROBJECT_EMBED_LEN_MAX ROBJECT_EMBED_LEN_MAX

-#define ROBJECT_EMBED ROBJECT_EMBED

-/** @cond INTERNAL_MACRO */

-#define ROBJECT_NUMIV ROBJECT_NUMIV

-#define ROBJECT_IVPTR ROBJECT_IVPTR

-/** @endcond */

-

-enum ruby_robject_flags { ROBJECT_EMBED = RUBY_FL_USER1 };

-

-enum ruby_robject_consts { ROBJECT_EMBED_LEN_MAX = RBIMPL_EMBED_LEN_MAX_OF(VALUE) };

-

-struct RObject {

- struct RBasic basic;

- union {

- struct {

- uint32_t numiv;

- VALUE *ivptr;

- void *iv_index_tbl; /* shortcut for RCLASS_IV_INDEX_TBL(rb_obj_class(obj)) */

- } heap;

- VALUE ary[ROBJECT_EMBED_LEN_MAX];

- } as;

-};

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline uint32_t

-ROBJECT_NUMIV(VALUE obj)

-{

- RBIMPL_ASSERT_TYPE(obj, RUBY_T_OBJECT);

-

- if (RB_FL_ANY_RAW(obj, ROBJECT_EMBED)) {

- return ROBJECT_EMBED_LEN_MAX;

- }

- else {

- return ROBJECT(obj)->as.heap.numiv;

- }

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE *

-ROBJECT_IVPTR(VALUE obj)

-{

- RBIMPL_ASSERT_TYPE(obj, RUBY_T_OBJECT);

-

- struct RObject *const ptr = ROBJECT(obj);

-

- if (RB_FL_ANY_RAW(obj, ROBJECT_EMBED)) {

- return ptr->as.ary;

- }

- else {

- return ptr->as.heap.ivptr;

- }

-}

-

-#define ROBJECT_IV_INDEX_TBL(o) \

- ((RBASIC(o)->flags & ROBJECT_EMBED) ? \

- RCLASS_IV_INDEX_TBL(rb_obj_class(o)) : \

- ROBJECT(o)->as.heap.iv_index_tbl)

-

-#endif /* RBIMPL_ROBJECT_H */

-#ifndef RBIMPL_RREGEXP_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RREGEXP_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RRegexp.

- */

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/core/rstring.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-

-#define RREGEXP(obj) RBIMPL_CAST((struct RRegexp *)(obj))

-#define RREGEXP_PTR(obj) (RREGEXP(obj)->ptr)

-/** @cond INTERNAL_MACRO */

-#define RREGEXP_SRC RREGEXP_SRC

-#define RREGEXP_SRC_PTR RREGEXP_SRC_PTR

-#define RREGEXP_SRC_LEN RREGEXP_SRC_LEN

-#define RREGEXP_SRC_END RREGEXP_SRC_END

-/** @endcond */

-

-struct re_patter_buffer; /* a.k.a. OnigRegexType, defined in onigmo.h */

-

-struct RRegexp {

- struct RBasic basic;

- struct re_pattern_buffer *ptr;

- const VALUE src;

- unsigned long usecnt;

-};

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RREGEXP_SRC(VALUE rexp)

-{

- RBIMPL_ASSERT_TYPE(rexp, RUBY_T_REGEXP);

- VALUE ret = RREGEXP(rexp)->src;

- RBIMPL_ASSERT_TYPE(ret, RUBY_T_STRING);

- return ret;

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline char *

-RREGEXP_SRC_PTR(VALUE rexp)

-{

- return RSTRING_PTR(RREGEXP_SRC(rexp));

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline long

-RREGEXP_SRC_LEN(VALUE rexp)

-{

- return RSTRING_LEN(RREGEXP_SRC(rexp));

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline char *

-RREGEXP_SRC_END(VALUE rexp)

-{

- return RSTRING_END(RREGEXP_SRC(rexp));

-}

-

-#endif /* RBIMPL_RREGEXP_H */

-#ifndef RBIMPL_RSTRING_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RSTRING_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RString.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/fl_type.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/impl/warning_push.h"

-#include "ruby/assert.h"

-

-#define RSTRING(obj) RBIMPL_CAST((struct RString *)(obj))

-#define RSTRING_NOEMBED RSTRING_NOEMBED

-#define RSTRING_EMBED_LEN_MASK RSTRING_EMBED_LEN_MASK

-#define RSTRING_EMBED_LEN_SHIFT RSTRING_EMBED_LEN_SHIFT

-#define RSTRING_EMBED_LEN_MAX RSTRING_EMBED_LEN_MAX

-#define RSTRING_FSTR RSTRING_FSTR

-

-/** @cond INTERNAL_MACRO */

-#define RSTRING_EMBED_LEN RSTRING_EMBED_LEN

-#define RSTRING_LEN RSTRING_LEN

-#define RSTRING_LENINT RSTRING_LENINT

-#define RSTRING_PTR RSTRING_PTR

-#define RSTRING_END RSTRING_END

-/** @endcond */

-

-#define StringValue(v) rb_string_value(&(v))

-#define StringValuePtr(v) rb_string_value_ptr(&(v))

-#define StringValueCStr(v) rb_string_value_cstr(&(v))

-#define SafeStringValue(v) StringValue(v)

-#define ExportStringValue(v) do { \

- StringValue(v); \

- (v) = rb_str_export(v); \

-} while (0)

-

-enum ruby_rstring_flags {

- RSTRING_NOEMBED = RUBY_FL_USER1,

- RSTRING_EMBED_LEN_MASK = RUBY_FL_USER2 | RUBY_FL_USER3 | RUBY_FL_USER4 |

- RUBY_FL_USER5 | RUBY_FL_USER6,

- /* Actually, string encodings are also encoded into the flags, using

- * remaining bits.*/

- RSTRING_FSTR = RUBY_FL_USER17

-};

-

-enum ruby_rstring_consts {

- RSTRING_EMBED_LEN_SHIFT = RUBY_FL_USHIFT + 2,

- RSTRING_EMBED_LEN_MAX = RBIMPL_EMBED_LEN_MAX_OF(char) - 1

-};

-

-struct RString {

- struct RBasic basic;

- union {

- struct {

- long len;

- char *ptr;

- union {

- long capa;

- VALUE shared;

- } aux;

- } heap;

- char ary[RSTRING_EMBED_LEN_MAX + 1];

- } as;

-};

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_str_to_str(VALUE);

-VALUE rb_string_value(volatile VALUE*);

-char *rb_string_value_ptr(volatile VALUE*);

-char *rb_string_value_cstr(volatile VALUE*);

-VALUE rb_str_export(VALUE);

-VALUE rb_str_export_locale(VALUE);

-

-RBIMPL_ATTR_ERROR(("rb_check_safe_str() and Check_SafeStr() are obsolete; use StringValue() instead"))

-void rb_check_safe_str(VALUE);

-#define Check_SafeStr(v) rb_check_safe_str(RBIMPL_CAST((VALUE)(v)))

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline long

-RSTRING_EMBED_LEN(VALUE str)

-{

- RBIMPL_ASSERT_TYPE(str, RUBY_T_STRING);

- RBIMPL_ASSERT_OR_ASSUME(! RB_FL_ANY_RAW(str, RSTRING_NOEMBED));

-

- VALUE f = RBASIC(str)->flags;

- f &= RSTRING_EMBED_LEN_MASK;

- f >>= RSTRING_EMBED_LEN_SHIFT;

- return RBIMPL_CAST((long)f);

-}

-

-RBIMPL_WARNING_PUSH()

-#if RBIMPL_COMPILER_IS(Intel)

-RBIMPL_WARNING_IGNORED(413)

-#endif

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline struct RString

-rbimpl_rstring_getmem(VALUE str)

-{

- RBIMPL_ASSERT_TYPE(str, RUBY_T_STRING);

-

- if (RB_FL_ANY_RAW(str, RSTRING_NOEMBED)) {

- return *RSTRING(str);

- }

- else {

- /* Expecting compilers to optimize this on-stack struct away. */

- struct RString retval;

- retval.as.heap.len = RSTRING_EMBED_LEN(str);

- retval.as.heap.ptr = RSTRING(str)->as.ary;

- return retval;

- }

-}

-

-RBIMPL_WARNING_POP()

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline long

-RSTRING_LEN(VALUE str)

-{

- return rbimpl_rstring_getmem(str).as.heap.len;

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline char *

-RSTRING_PTR(VALUE str)

-{

- char *ptr = rbimpl_rstring_getmem(str).as.heap.ptr;

-

- if (RB_UNLIKELY(! ptr)) {

- /* :BEWARE: @shyouhei thinks that currently, there are rooms for this

- * function to return NULL. In the 20th century that was a pointless

- * concern. However struct RString can hold fake strings nowadays. It

- * seems no check against NULL are exercised around handling of them

- * (one of such usages is located in marshal.c, which scares

- * @shyouhei). Better check here for maximum safety.

- *

- * Also, this is not rb_warn() because RSTRING_PTR() can be called

- * during GC (see what obj_info() does). rb_warn() needs to allocate

- * Ruby objects. That is not possible at this moment. */

- fprintf(stderr, "%s\n",

- "RSTRING_PTR is returning NULL!! "

- "SIGSEGV is highly expected to follow immediately. "

- "If you could reproduce, attach your debugger here, "

- "and look at the passed string."

- );

- }

-

- return ptr;

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline char *

-RSTRING_END(VALUE str)

-{

- struct RString buf = rbimpl_rstring_getmem(str);

-

- if (RB_UNLIKELY(! buf.as.heap.ptr)) {

- /* Ditto. */

- fprintf(stderr, "%s\n",

- "RSTRING_END is returning NULL!! "

- "SIGSEGV is highly expected to follow immediately. "

- "If you could reproduce, attach your debugger here, "

- "and look at the passed string."

- );

- }

-

- return &buf.as.heap.ptr[buf.as.heap.len];

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-RSTRING_LENINT(VALUE str)

-{

- return rb_long2int(RSTRING_LEN(str));

-}

-

-#ifdef HAVE_STMT_AND_DECL_IN_EXPR

-# define RSTRING_GETMEM(str, ptrvar, lenvar) \

- __extension__ ({ \

- struct RString rbimpl_str = rbimpl_rstring_getmem(str); \

- (ptrvar) = rbimpl_str.as.heap.ptr; \

- (lenvar) = rbimpl_str.as.heap.len; \

- })

-#else

-# define RSTRING_GETMEM(str, ptrvar, lenvar) \

- ((ptrvar) = RSTRING_PTR(str), \

- (lenvar) = RSTRING_LEN(str))

-#endif /* HAVE_STMT_AND_DECL_IN_EXPR */

-#endif /* RBIMPL_RSTRING_H */

-#ifndef RBIMPL_RSTRUCT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RSTRUCT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Routines to manipulate struct ::RStruct.

- */

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/impl/arithmetic/long.h"

-#include "ruby/impl/arithmetic/int.h"

-#if !defined RUBY_EXPORT && !defined RUBY_NO_OLD_COMPATIBILITY

-# include "ruby/backward.h"

-#endif

-

-#define RSTRUCT_PTR(st) rb_struct_ptr(st)

-/** @cond INTERNAL_MACRO */

-#define RSTRUCT_LEN RSTRUCT_LEN

-#define RSTRUCT_SET RSTRUCT_SET

-#define RSTRUCT_GET RSTRUCT_GET

-/** @endcond */

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_struct_size(VALUE s);

-VALUE rb_struct_aref(VALUE, VALUE);

-VALUE rb_struct_aset(VALUE, VALUE, VALUE);

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline long

-RSTRUCT_LEN(VALUE st)

-{

- RBIMPL_ASSERT_TYPE(st, RUBY_T_STRUCT);

-

- return RB_NUM2LONG(rb_struct_size(st));

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RSTRUCT_SET(VALUE st, int k, VALUE v)

-{

- RBIMPL_ASSERT_TYPE(st, RUBY_T_STRUCT);

-

- return rb_struct_aset(st, INT2NUM(k), (v));

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RSTRUCT_GET(VALUE st, int k)

-{

- RBIMPL_ASSERT_TYPE(st, RUBY_T_STRUCT);

-

- return rb_struct_aref(st, INT2NUM(k));

-}

-

-#endif /* RBIMPL_RSTRUCT_H */

-#ifndef RBIMPL_RTYPEDDATA_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_RTYPEDDATA_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines struct ::RTypedData.

- */

-#include "ruby/impl/config.h"

-

-#ifdef STDC_HEADERS

-# include <stddef.h>

-#endif

-

-#include "ruby/impl/assume.h"

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/core/rdata.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/error.h"

-#include "ruby/impl/fl_type.h"

-#include "ruby/impl/stdbool.h"

-#include "ruby/impl/value_type.h"

-

-#define HAVE_TYPE_RB_DATA_TYPE_T 1

-#define HAVE_RB_DATA_TYPE_T_FUNCTION 1

-#define HAVE_RB_DATA_TYPE_T_PARENT 1

-#define RUBY_TYPED_DEFAULT_FREE RUBY_DEFAULT_FREE

-#define RUBY_TYPED_NEVER_FREE RUBY_NEVER_FREE

-#define RTYPEDDATA(obj) RBIMPL_CAST((struct RTypedData *)(obj))

-#define RTYPEDDATA_DATA(v) (RTYPEDDATA(v)->data)

-#define Check_TypedStruct(v, t) \

- rb_check_typeddata(RBIMPL_CAST((VALUE)(v)), (t))

-

-/** @cond INTERNAL_MACRO */

-#define RTYPEDDATA_P RTYPEDDATA_P

-#define RTYPEDDATA_TYPE RTYPEDDATA_TYPE

-#define RUBY_TYPED_FREE_IMMEDIATELY RUBY_TYPED_FREE_IMMEDIATELY

-#define RUBY_TYPED_WB_PROTECTED RUBY_TYPED_WB_PROTECTED

-#define RUBY_TYPED_PROMOTED1 RUBY_TYPED_PROMOTED1

-/** @endcond */

-

-/* bits for rb_data_type_struct::flags */

-enum rbimpl_typeddata_flags {

- RUBY_TYPED_FREE_IMMEDIATELY = 1,

- RUBY_TYPED_WB_PROTECTED = RUBY_FL_WB_PROTECTED, /* THIS FLAG DEPENDS ON Ruby version */

- RUBY_TYPED_PROMOTED1 = RUBY_FL_PROMOTED1 /* THIS FLAG DEPENDS ON Ruby version */

-};

-

-typedef struct rb_data_type_struct rb_data_type_t;

-

-struct rb_data_type_struct {

- const char *wrap_struct_name;

- struct {

- RUBY_DATA_FUNC dmark;

- RUBY_DATA_FUNC dfree;

- size_t (*dsize)(const void *);

- RUBY_DATA_FUNC dcompact;

- void *reserved[1]; /* For future extension.

- This array *must* be filled with ZERO. */

- } function;

- const rb_data_type_t *parent;

- void *data; /* This area can be used for any purpose

- by a programmer who define the type. */

- VALUE flags; /* RUBY_FL_WB_PROTECTED */

-};

-

-struct RTypedData {

- struct RBasic basic;

- const rb_data_type_t *type;

- VALUE typed_flag; /* 1 or not */

- void *data;

-};

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-VALUE rb_data_typed_object_wrap(VALUE klass, void *datap, const rb_data_type_t *);

-VALUE rb_data_typed_object_zalloc(VALUE klass, size_t size, const rb_data_type_t *type);

-int rb_typeddata_inherited_p(const rb_data_type_t *child, const rb_data_type_t *parent);

-int rb_typeddata_is_kind_of(VALUE obj, const rb_data_type_t *data_type);

-void *rb_check_typeddata(VALUE obj, const rb_data_type_t *data_type);

-RBIMPL_SYMBOL_EXPORT_END()

-

-#define TypedData_Wrap_Struct(klass,data_type,sval)\

- rb_data_typed_object_wrap((klass),(sval),(data_type))

-

-#define TypedData_Make_Struct0(result, klass, type, size, data_type, sval) \

- VALUE result = rb_data_typed_object_zalloc(klass, size, data_type); \

- (sval) = RBIMPL_CAST((type *)RTYPEDDATA_DATA(result)); \

- RBIMPL_CAST(/*suppress unused variable warnings*/(void)(sval))

-

-#ifdef HAVE_STMT_AND_DECL_IN_EXPR

-#define TypedData_Make_Struct(klass, type, data_type, sval) \

- RB_GNUC_EXTENSION({ \

- TypedData_Make_Struct0( \

- data_struct_obj, \

- klass, \

- type, \

- sizeof(type), \

- data_type, \

- sval); \

- data_struct_obj; \

- })

-#else

-#define TypedData_Make_Struct(klass, type, data_type, sval) \

- rb_data_typed_object_make( \

- (klass), \

- (data_type), \

- RBIMPL_CAST((void **)&(sval)), \

- sizeof(type))

-#endif

-

-#define TypedData_Get_Struct(obj,type,data_type,sval) \

- ((sval) = RBIMPL_CAST((type *)rb_check_typeddata((obj), (data_type))))

-

-RBIMPL_ATTR_PURE()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-rbimpl_rtypeddata_p(VALUE obj)

-{

- return RTYPEDDATA(obj)->typed_flag == 1;

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-RTYPEDDATA_P(VALUE obj)

-{

-#if ! RUBY_NDEBUG

- if (RB_UNLIKELY(! RB_TYPE_P(obj, RUBY_T_DATA))) {

- Check_Type(obj, RUBY_T_DATA);

- RBIMPL_UNREACHABLE_RETURN(false);

- }

-#endif

-

- return rbimpl_rtypeddata_p(obj);

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-/* :TODO: can this function be __attribute__((returns_nonnull)) or not? */

-static inline const struct rb_data_type_struct *

-RTYPEDDATA_TYPE(VALUE obj)

-{

-#if ! RUBY_NDEBUG

- if (RB_UNLIKELY(! RTYPEDDATA_P(obj))) {

- rb_unexpected_type(obj, RUBY_T_DATA);

- RBIMPL_UNREACHABLE_RETURN(NULL);

- }

-#endif

-

- return RTYPEDDATA(obj)->type;

-}

-

-static inline VALUE

-rb_data_typed_object_make(VALUE klass, const rb_data_type_t *type, void **datap, size_t size)

-{

- TypedData_Make_Struct0(result, klass, void, size, type, *datap);

- return result;

-}

-

-RBIMPL_ATTR_DEPRECATED(("by: rb_data_typed_object_wrap"))

-static inline VALUE

-rb_data_typed_object_alloc(VALUE klass, void *datap, const rb_data_type_t *type)

-{

- return rb_data_typed_object_wrap(klass, datap, type);

-}

-

-#endif /* RBIMPL_RTYPEDDATA_H */

-#ifndef RBIMPL_CTYPE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_CTYPE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Our own, locale independent, character handling routines.

- */

-#include "ruby/impl/config.h"

-

-#ifdef STDC_HEADERS

-# include <ctype.h>

-#endif

-

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/const.h"

-#include "ruby/impl/attr/constexpr.h"

-#include "ruby/impl/dllexport.h"

-

-#ifndef ISPRINT

-# define ISASCII rb_isascii

-# define ISPRINT rb_isprint

-# define ISGRAPH rb_isgraph

-# define ISSPACE rb_isspace

-# define ISUPPER rb_isupper

-# define ISLOWER rb_islower

-# define ISALNUM rb_isalnum

-# define ISALPHA rb_isalpha

-# define ISDIGIT rb_isdigit

-# define ISXDIGIT rb_isxdigit

-# define ISBLANK rb_isblank

-# define ISCNTRL rb_iscntrl

-# define ISPUNCT rb_ispunct

-#endif

-

-#define TOUPPER rb_toupper

-#define TOLOWER rb_tolower

-#define STRCASECMP st_locale_insensitive_strcasecmp

-#define STRNCASECMP st_locale_insensitive_strncasecmp

-#define STRTOUL ruby_strtoul

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-/* locale insensitive functions */

-int st_locale_insensitive_strcasecmp(const char *s1, const char *s2);

-int st_locale_insensitive_strncasecmp(const char *s1, const char *s2, size_t n);

-unsigned long ruby_strtoul(const char *str, char **endptr, int base);

-RBIMPL_SYMBOL_EXPORT_END()

-

-/*

- * We are making the functions below to return `int` instead of `bool`. They

- * have been as such since their birth at 5f237d79033b2109afb768bc889611fa9630.

- */

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isascii(int c)

-{

- return '\0' <= c && c <= '\x7f';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isupper(int c)

-{

- return 'A' <= c && c <= 'Z';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_islower(int c)

-{

- return 'a' <= c && c <= 'z';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isalpha(int c)

-{

- return rb_isupper(c) || rb_islower(c);

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isdigit(int c)

-{

- return '0' <= c && c <= '9';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isalnum(int c)

-{

- return rb_isalpha(c) || rb_isdigit(c);

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isxdigit(int c)

-{

- return rb_isdigit(c) || ('A' <= c && c <= 'F') || ('a' <= c && c <= 'f');

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isblank(int c)

-{

- return c == ' ' || c == '\t';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isspace(int c)

-{

- return c == ' ' || ('\t' <= c && c <= '\r');

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_iscntrl(int c)

-{

- return ('\0' <= c && c < ' ') || c == '\x7f';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isprint(int c)

-{

- return ' ' <= c && c <= '\x7e';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_ispunct(int c)

-{

- return !rb_isalnum(c);

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_isgraph(int c)

-{

- return '!' <= c && c <= '\x7e';

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_tolower(int c)

-{

- return rb_isupper(c) ? (c|0x20) : c;

-}

-

-RBIMPL_ATTR_CONST()

-RBIMPL_ATTR_CONSTEXPR(CXX11)

-RBIMPL_ATTR_ARTIFICIAL()

-static inline int

-rb_toupper(int c)

-{

- return rb_islower(c) ? (c&0x5f) : c;

-}

-

-#endif /* RBIMPL_CTYPE_H */

-#ifndef RBIMPL_DLLEXPORT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_DLLEXPORT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Tewaking visibility of C variables/functions.

- */

-#include "ruby/impl/config.h"

-#include "ruby/impl/compiler_is.h"

-

-/* For MinGW, we need __declspec(dllimport) for RUBY_EXTERN on MJIT.

- mswin's RUBY_EXTERN already has that. See also: win32/Makefile.sub */

-#undef RUBY_EXTERN

-#if defined(MJIT_HEADER) && defined(_WIN32)

-# define RUBY_EXTERN extern __declspec(dllimport)

-#elif defined(RUBY_EXPORT)

-# define RUBY_EXTERN extern

-#elif defined(_WIN32)

-# define RUBY_EXTERN extern __declspec(dllimport)

-#else

-# define RUBY_EXTERN extern

-#endif

-

-#ifndef RUBY_SYMBOL_EXPORT_BEGIN

-# define RUBY_SYMBOL_EXPORT_BEGIN /* begin */

-#endif

-

-#ifndef RUBY_SYMBOL_EXPORT_END

-# define RUBY_SYMBOL_EXPORT_END /* end */

-#endif

-

-#ifndef RUBY_FUNC_EXPORTED

-# define RUBY_FUNC_EXPORTED /* void */

-#endif

-

-/* These macros are used for functions which are exported only for MJIT

- and NOT ensured to be exported in future versions. */

-

-#if ! defined(MJIT_HEADER)

-# define MJIT_FUNC_EXPORTED RUBY_FUNC_EXPORTED

-#elif ! RBIMPL_COMPILER_IS(MSVC)

-# define MJIT_FUNC_EXPORTED RUBY_FUNC_EXPORTED

-#else

-# define MJIT_FUNC_EXPORTED static

-#endif

-

-#define MJIT_SYMBOL_EXPORT_BEGIN RUBY_SYMBOL_EXPORT_BEGIN

-#define MJIT_SYMBOL_EXPORT_END RUBY_SYMBOL_EXPORT_END

-

-/* On mswin, MJIT header transformation can't be used since cl.exe can't output

- preprocessed output preserving macros. So this `MJIT_STATIC` is needed

- to force non-static function to static on MJIT header to avoid symbol conflict. */

-#ifdef MJIT_HEADER

-# define MJIT_STATIC static

-#else

-# define MJIT_STATIC

-#endif

-

-/** Shortcut macro equivalent to `RUBY_SYMBOL_EXPORT_BEGIN extern "C" {`.

- * \@shyouhei finds it handy. */

-#if defined(__DOXYGEN__)

-# define RBIMPL_SYMBOL_EXPORT_BEGIN() /* void */

-#elif defined(__cplusplus)

-# define RBIMPL_SYMBOL_EXPORT_BEGIN() RUBY_SYMBOL_EXPORT_BEGIN extern "C" {

-#else

-# define RBIMPL_SYMBOL_EXPORT_BEGIN() RUBY_SYMBOL_EXPORT_BEGIN

-#endif

-

-/** Counterpart of #RBIMPL_SYMBOL_EXPORT_BEGIN */

-#if defined(__DOXYGEN__)

-# define RBIMPL_SYMBOL_EXPORT_END() /* void */

-#elif defined(__cplusplus)

-# define RBIMPL_SYMBOL_EXPORT_END() } RUBY_SYMBOL_EXPORT_END

-#else

-# define RBIMPL_SYMBOL_EXPORT_END() RUBY_SYMBOL_EXPORT_END

-#endif

-#endif /* RBIMPL_DLLEXPORT_H */

-#ifndef RBIMPL_DOSISH_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_DOSISH_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Support for so-called dosish systems.

- */

-#ifdef __CYGWIN__

-#undef _WIN32

-#endif

-

-#if defined(_WIN32)

-/*

- DOSISH mean MS-Windows style filesystem.

- But you should use more precise macros like DOSISH_DRIVE_LETTER, PATH_SEP,

- ENV_IGNORECASE or CASEFOLD_FILESYSTEM.

- */

-#define DOSISH 1

-# define DOSISH_DRIVE_LETTER

-#endif

-

-#ifdef _WIN32

-#include "ruby/win32.h"

-#endif

-

-#if defined(DOSISH)

-#define PATH_SEP ";"

-#else

-#define PATH_SEP ":"

-#endif

-

-#define PATH_SEP_CHAR PATH_SEP[0]

-

-#define PATH_ENV "PATH"

-

-#if defined(DOSISH)

-#define ENV_IGNORECASE

-#endif

-

-#ifndef CASEFOLD_FILESYSTEM

-# if defined DOSISH

-# define CASEFOLD_FILESYSTEM 1

-# else

-# define CASEFOLD_FILESYSTEM 0

-# endif

-#endif

-

-#endif /* RBIMPL_DOSISH_H */

-#ifndef RBIMPL_ERROR_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_ERROR_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Declares ::rb_raise().

- */

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-#include "ruby/backward/2/attributes.h"

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-

-VALUE rb_errinfo(void);

-void rb_set_errinfo(VALUE);

-

-/* for rb_readwrite_sys_fail first argument */

-enum rb_io_wait_readwrite {RB_IO_WAIT_READABLE, RB_IO_WAIT_WRITABLE};

-#define RB_IO_WAIT_READABLE RB_IO_WAIT_READABLE

-#define RB_IO_WAIT_WRITABLE RB_IO_WAIT_WRITABLE

-

-PRINTF_ARGS(NORETURN(void rb_raise(VALUE, const char*, ...)), 2, 3);

-PRINTF_ARGS(NORETURN(void rb_fatal(const char*, ...)), 1, 2);

-COLDFUNC PRINTF_ARGS(NORETURN(void rb_bug(const char*, ...)), 1, 2);

-NORETURN(void rb_bug_errno(const char*, int));

-NORETURN(void rb_sys_fail(const char*));

-NORETURN(void rb_sys_fail_str(VALUE));

-NORETURN(void rb_mod_sys_fail(VALUE, const char*));

-NORETURN(void rb_mod_sys_fail_str(VALUE, VALUE));

-NORETURN(void rb_readwrite_sys_fail(enum rb_io_wait_readwrite, const char*));

-NORETURN(void rb_iter_break(void));

-NORETURN(void rb_iter_break_value(VALUE));

-NORETURN(void rb_exit(int));

-NORETURN(void rb_notimplement(void));

-VALUE rb_syserr_new(int, const char *);

-VALUE rb_syserr_new_str(int n, VALUE arg);

-NORETURN(void rb_syserr_fail(int, const char*));

-NORETURN(void rb_syserr_fail_str(int, VALUE));

-NORETURN(void rb_mod_syserr_fail(VALUE, int, const char*));

-NORETURN(void rb_mod_syserr_fail_str(VALUE, int, VALUE));

-NORETURN(void rb_readwrite_syserr_fail(enum rb_io_wait_readwrite, int, const char*));

-NORETURN(void rb_unexpected_type(VALUE,int));

-

-VALUE *rb_ruby_verbose_ptr(void);

-VALUE *rb_ruby_debug_ptr(void);

-#define ruby_verbose (*rb_ruby_verbose_ptr())

-#define ruby_debug (*rb_ruby_debug_ptr())

-

-/* reports if `-W' specified */

-PRINTF_ARGS(void rb_warning(const char*, ...), 1, 2);

-PRINTF_ARGS(void rb_compile_warning(const char *, int, const char*, ...), 3, 4);

-PRINTF_ARGS(void rb_sys_warning(const char*, ...), 1, 2);

-/* reports always */

-COLDFUNC PRINTF_ARGS(void rb_warn(const char*, ...), 1, 2);

-PRINTF_ARGS(void rb_compile_warn(const char *, int, const char*, ...), 3, 4);

-

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_ERROR_H */

-#ifndef RBIMPL_EVAL_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_EVAL_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Declares ::rb_eval_string().

- */

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-

-VALUE rb_eval_string(const char*);

-VALUE rb_eval_string_protect(const char*, int*);

-VALUE rb_eval_string_wrap(const char*, int*);

-VALUE rb_funcall(VALUE, ID, int, ...);

-VALUE rb_funcallv(VALUE, ID, int, const VALUE*);

-VALUE rb_funcallv_kw(VALUE, ID, int, const VALUE*, int);

-VALUE rb_funcallv_public(VALUE, ID, int, const VALUE*);

-VALUE rb_funcallv_public_kw(VALUE, ID, int, const VALUE*, int);

-#define rb_funcall2 rb_funcallv

-#define rb_funcall3 rb_funcallv_public

-VALUE rb_funcall_passing_block(VALUE, ID, int, const VALUE*);

-VALUE rb_funcall_passing_block_kw(VALUE, ID, int, const VALUE*, int);

-VALUE rb_funcall_with_block(VALUE, ID, int, const VALUE*, VALUE);

-VALUE rb_funcall_with_block_kw(VALUE, ID, int, const VALUE*, VALUE, int);

-VALUE rb_call_super(int, const VALUE*);

-VALUE rb_call_super_kw(int, const VALUE*, int);

-VALUE rb_current_receiver(void);

-int rb_get_kwargs(VALUE keyword_hash, const ID *table, int required, int optional, VALUE *);

-VALUE rb_extract_keywords(VALUE *orighash);

-

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_EVAL_H */

-#ifndef RBIMPL_EVENT_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_EVENT_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Debugging and tracing APIs.

- */

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/value.h"

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-

-/* traditional set_trace_func events */

-#define RUBY_EVENT_NONE 0x0000

-#define RUBY_EVENT_LINE 0x0001

-#define RUBY_EVENT_CLASS 0x0002

-#define RUBY_EVENT_END 0x0004

-#define RUBY_EVENT_CALL 0x0008

-#define RUBY_EVENT_RETURN 0x0010

-#define RUBY_EVENT_C_CALL 0x0020

-#define RUBY_EVENT_C_RETURN 0x0040

-#define RUBY_EVENT_RAISE 0x0080

-#define RUBY_EVENT_ALL 0x00ff

-

-/* for TracePoint extended events */

-#define RUBY_EVENT_B_CALL 0x0100

-#define RUBY_EVENT_B_RETURN 0x0200

-#define RUBY_EVENT_THREAD_BEGIN 0x0400

-#define RUBY_EVENT_THREAD_END 0x0800

-#define RUBY_EVENT_FIBER_SWITCH 0x1000

-#define RUBY_EVENT_SCRIPT_COMPILED 0x2000

-#define RUBY_EVENT_TRACEPOINT_ALL 0xffff

-

-/* special events */

-#define RUBY_EVENT_RESERVED_FOR_INTERNAL_USE 0x030000

-

-/* internal events */

-#define RUBY_INTERNAL_EVENT_SWITCH 0x040000

-#define RUBY_EVENT_SWITCH 0x040000 /* obsolete name. this macro is for compatibility */

- /* 0x080000 */

-#define RUBY_INTERNAL_EVENT_NEWOBJ 0x100000

-#define RUBY_INTERNAL_EVENT_FREEOBJ 0x200000

-#define RUBY_INTERNAL_EVENT_GC_START 0x400000

-#define RUBY_INTERNAL_EVENT_GC_END_MARK 0x800000

-#define RUBY_INTERNAL_EVENT_GC_END_SWEEP 0x1000000

-#define RUBY_INTERNAL_EVENT_GC_ENTER 0x2000000

-#define RUBY_INTERNAL_EVENT_GC_EXIT 0x4000000

-#define RUBY_INTERNAL_EVENT_OBJSPACE_MASK 0x7f00000

-#define RUBY_INTERNAL_EVENT_MASK 0xffff0000

-

-typedef uint32_t rb_event_flag_t;

-typedef void (*rb_event_hook_func_t)(rb_event_flag_t evflag, VALUE data, VALUE self, ID mid, VALUE klass);

-

-#define RB_EVENT_HOOKS_HAVE_CALLBACK_DATA 1

-void rb_add_event_hook(rb_event_hook_func_t func, rb_event_flag_t events, VALUE data);

-int rb_remove_event_hook(rb_event_hook_func_t func);

-

-RBIMPL_SYMBOL_EXPORT_END()

-

-#endif /* RBIMPL_EVENT_H */

-#ifndef RBIMPL_FL_TYPE_H /*-*-C++-*-vi:se ft=cpp:*/

-#define RBIMPL_FL_TYPE_H

-/**

- * @file

- * @author Ruby developers <[email protected]>

- * @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.

- * @warning Symbols prefixed with either `RBIMPL` or `rbimpl` are

- * implementation details. Don't take them as canon. They could

- * rapidly appear then vanish. The name (path) of this header file

- * is also an implementation detail. Do not expect it to persist

- * at the place it is now. Developers are free to move it anywhere

- * anytime at will.

- * @note To ruby-core: remember that this header can be possibly

- * recursively included from extension libraries written in C++.

- * Do not expect for instance `__VA_ARGS__` is always available.

- * We assume C99 for ruby itself but we don't assume languages of

- * extension libraries. They could be written in C++98.

- * @brief Defines enum ::ruby_fl_type.

- */

-#include "ruby/impl/config.h" /* for ENUM_OVER_INT */

-#include "ruby/impl/attr/artificial.h"

-#include "ruby/impl/attr/flag_enum.h"

-#include "ruby/impl/attr/forceinline.h"

-#include "ruby/impl/attr/noalias.h"

-#include "ruby/impl/attr/pure.h"

-#include "ruby/impl/cast.h"

-#include "ruby/impl/core/rbasic.h"

-#include "ruby/impl/dllexport.h"

-#include "ruby/impl/special_consts.h"

-#include "ruby/impl/stdbool.h"

-#include "ruby/impl/value.h"

-#include "ruby/impl/value_type.h"

-#include "ruby/assert.h"

-#include "ruby/defines.h"

-

-/** @cond INTERNAL_MACRO */

-#ifdef ENUM_OVER_INT

-# define RBIMPL_WIDER_ENUM 1

-#elif SIZEOF_INT * CHAR_BIT > 12+19+1

-# define RBIMPL_WIDER_ENUM 1

-#else

-# define RBIMPL_WIDER_ENUM 0

-#endif

-/** @endcond */

-

-#define FL_SINGLETON RBIMPL_CAST((VALUE)RUBY_FL_SINGLETON)

-#define FL_WB_PROTECTED RBIMPL_CAST((VALUE)RUBY_FL_WB_PROTECTED)

-#define FL_PROMOTED0 RBIMPL_CAST((VALUE)RUBY_FL_PROMOTED0)

-#define FL_PROMOTED1 RBIMPL_CAST((VALUE)RUBY_FL_PROMOTED1)

-#define FL_FINALIZE RBIMPL_CAST((VALUE)RUBY_FL_FINALIZE)

-#define FL_TAINT RBIMPL_CAST((VALUE)RUBY_FL_TAINT)

-#define FL_UNTRUSTED RBIMPL_CAST((VALUE)RUBY_FL_UNTRUSTED)

-#define FL_SEEN_OBJ_ID RBIMPL_CAST((VALUE)RUBY_FL_SEEN_OBJ_ID)

-#define FL_EXIVAR RBIMPL_CAST((VALUE)RUBY_FL_EXIVAR)

-#define FL_FREEZE RBIMPL_CAST((VALUE)RUBY_FL_FREEZE)

-

-#define FL_USHIFT RBIMPL_CAST((VALUE)RUBY_FL_USHIFT)

-

-#define FL_USER0 RBIMPL_CAST((VALUE)RUBY_FL_USER0)

-#define FL_USER1 RBIMPL_CAST((VALUE)RUBY_FL_USER1)

-#define FL_USER2 RBIMPL_CAST((VALUE)RUBY_FL_USER2)

-#define FL_USER3 RBIMPL_CAST((VALUE)RUBY_FL_USER3)

-#define FL_USER4 RBIMPL_CAST((VALUE)RUBY_FL_USER4)

-#define FL_USER5 RBIMPL_CAST((VALUE)RUBY_FL_USER5)

-#define FL_USER6 RBIMPL_CAST((VALUE)RUBY_FL_USER6)

-#define FL_USER7 RBIMPL_CAST((VALUE)RUBY_FL_USER7)

-#define FL_USER8 RBIMPL_CAST((VALUE)RUBY_FL_USER8)

-#define FL_USER9 RBIMPL_CAST((VALUE)RUBY_FL_USER9)

-#define FL_USER10 RBIMPL_CAST((VALUE)RUBY_FL_USER10)

-#define FL_USER11 RBIMPL_CAST((VALUE)RUBY_FL_USER11)

-#define FL_USER12 RBIMPL_CAST((VALUE)RUBY_FL_USER12)

-#define FL_USER13 RBIMPL_CAST((VALUE)RUBY_FL_USER13)

-#define FL_USER14 RBIMPL_CAST((VALUE)RUBY_FL_USER14)

-#define FL_USER15 RBIMPL_CAST((VALUE)RUBY_FL_USER15)

-#define FL_USER16 RBIMPL_CAST((VALUE)RUBY_FL_USER16)

-#define FL_USER17 RBIMPL_CAST((VALUE)RUBY_FL_USER17)

-#define FL_USER18 RBIMPL_CAST((VALUE)RUBY_FL_USER18)

-#define FL_USER19 RBIMPL_CAST((VALUE)(unsigned int)RUBY_FL_USER19)

-

-#define ELTS_SHARED RUBY_ELTS_SHARED

-#define RUBY_ELTS_SHARED RUBY_ELTS_SHARED

-#define RB_OBJ_FREEZE rb_obj_freeze_inline

-

-/** @cond INTERNAL_MACRO */

-#define RB_FL_ABLE RB_FL_ABLE

-#define RB_FL_ALL RB_FL_ALL

-#define RB_FL_ALL_RAW RB_FL_ALL_RAW

-#define RB_FL_ANY RB_FL_ANY

-#define RB_FL_ANY_RAW RB_FL_ANY_RAW

-#define RB_FL_REVERSE RB_FL_REVERSE

-#define RB_FL_REVERSE_RAW RB_FL_REVERSE_RAW

-#define RB_FL_SET RB_FL_SET

-#define RB_FL_SET_RAW RB_FL_SET_RAW

-#define RB_FL_TEST RB_FL_TEST

-#define RB_FL_TEST_RAW RB_FL_TEST_RAW

-#define RB_FL_UNSET RB_FL_UNSET

-#define RB_FL_UNSET_RAW RB_FL_UNSET_RAW

-#define RB_OBJ_FREEZE_RAW RB_OBJ_FREEZE_RAW

-#define RB_OBJ_FROZEN RB_OBJ_FROZEN

-#define RB_OBJ_FROZEN_RAW RB_OBJ_FROZEN_RAW

-#define RB_OBJ_INFECT RB_OBJ_INFECT

-#define RB_OBJ_INFECT_RAW RB_OBJ_INFECT_RAW

-#define RB_OBJ_TAINT RB_OBJ_TAINT

-#define RB_OBJ_TAINTABLE RB_OBJ_TAINTABLE

-#define RB_OBJ_TAINTED RB_OBJ_TAINTED

-#define RB_OBJ_TAINTED_RAW RB_OBJ_TAINTED_RAW

-#define RB_OBJ_TAINT_RAW RB_OBJ_TAINT_RAW

-#define RB_OBJ_UNTRUST RB_OBJ_UNTRUST

-#define RB_OBJ_UNTRUSTED RB_OBJ_UNTRUSTED

-/** @endcond */

-

-/**

- * @defgroup deprecated_macros deprecated macro APIs

- * @{

- * These macros are deprecated. Prefer their `RB_`-prefixed versions.

- */

-#define FL_ABLE RB_FL_ABLE

-#define FL_ALL RB_FL_ALL

-#define FL_ALL_RAW RB_FL_ALL_RAW

-#define FL_ANY RB_FL_ANY

-#define FL_ANY_RAW RB_FL_ANY_RAW

-#define FL_REVERSE RB_FL_REVERSE

-#define FL_REVERSE_RAW RB_FL_REVERSE_RAW

-#define FL_SET RB_FL_SET

-#define FL_SET_RAW RB_FL_SET_RAW

-#define FL_TEST RB_FL_TEST

-#define FL_TEST_RAW RB_FL_TEST_RAW

-#define FL_UNSET RB_FL_UNSET

-#define FL_UNSET_RAW RB_FL_UNSET_RAW

-#define OBJ_FREEZE RB_OBJ_FREEZE

-#define OBJ_FREEZE_RAW RB_OBJ_FREEZE_RAW

-#define OBJ_FROZEN RB_OBJ_FROZEN

-#define OBJ_FROZEN_RAW RB_OBJ_FROZEN_RAW

-#define OBJ_INFECT RB_OBJ_INFECT

-#define OBJ_INFECT_RAW RB_OBJ_INFECT_RAW

-#define OBJ_TAINT RB_OBJ_TAINT

-#define OBJ_TAINTABLE RB_OBJ_TAINTABLE

-#define OBJ_TAINTED RB_OBJ_TAINTED

-#define OBJ_TAINTED_RAW RB_OBJ_TAINTED_RAW

-#define OBJ_TAINT_RAW RB_OBJ_TAINT_RAW

-#define OBJ_UNTRUST RB_OBJ_UNTRUST

-#define OBJ_UNTRUSTED RB_OBJ_UNTRUSTED

-/** @} */

-

-/* This is an enum because GDB wants it (rather than a macro) */

-enum ruby_fl_ushift { RUBY_FL_USHIFT = 12 };

-

-/* > The expression that defines the value of an enumeration constant shall be

- * > an integer constant expression that has a value representable as an `int`.

- *

- * -- ISO/IEC 9899:2018 section 6.7.2.2

- *

- * So ENUM_OVER_INT situation is an extension to the standard. Note however

- * that we do not support 16 bit `int` environment. */

-RB_GNUC_EXTENSION

-enum

-RBIMPL_ATTR_FLAG_ENUM()

-ruby_fl_type {

- RUBY_FL_WB_PROTECTED = (1<<5),

- RUBY_FL_PROMOTED0 = (1<<5),

- RUBY_FL_PROMOTED1 = (1<<6),

- RUBY_FL_PROMOTED = RUBY_FL_PROMOTED0 | RUBY_FL_PROMOTED1,

- RUBY_FL_FINALIZE = (1<<7),

- RUBY_FL_TAINT = (1<<8),

- RUBY_FL_UNTRUSTED = RUBY_FL_TAINT,

- RUBY_FL_SEEN_OBJ_ID = (1<<9),

- RUBY_FL_EXIVAR = (1<<10),

- RUBY_FL_FREEZE = (1<<11),

-

-#define RBIMPL_FL_USER_N(n) RUBY_FL_USER##n = (1<<(RUBY_FL_USHIFT+n))

- RBIMPL_FL_USER_N(0),

- RBIMPL_FL_USER_N(1),

- RBIMPL_FL_USER_N(2),

- RBIMPL_FL_USER_N(3),

- RBIMPL_FL_USER_N(4),

- RBIMPL_FL_USER_N(5),

- RBIMPL_FL_USER_N(6),

- RBIMPL_FL_USER_N(7),

- RBIMPL_FL_USER_N(8),

- RBIMPL_FL_USER_N(9),

- RBIMPL_FL_USER_N(10),

- RBIMPL_FL_USER_N(11),

- RBIMPL_FL_USER_N(12),

- RBIMPL_FL_USER_N(13),

- RBIMPL_FL_USER_N(14),

- RBIMPL_FL_USER_N(15),

- RBIMPL_FL_USER_N(16),

- RBIMPL_FL_USER_N(17),

- RBIMPL_FL_USER_N(18),

-#if ENUM_OVER_INT

- RBIMPL_FL_USER_N(19),

-#else

-# define RUBY_FL_USER19 (RBIMPL_VALUE_ONE<<(RUBY_FL_USHIFT+19))

-#endif

-#undef RBIMPL_FL_USER_N

-#undef RBIMPL_WIDER_ENUM

-

- RUBY_ELTS_SHARED = RUBY_FL_USER2,

- RUBY_FL_SINGLETON = RUBY_FL_USER0,

-};

-

-enum { RUBY_FL_DUPPED = RUBY_T_MASK | RUBY_FL_EXIVAR | RUBY_FL_TAINT };

-

-RBIMPL_SYMBOL_EXPORT_BEGIN()

-void rb_obj_infect(VALUE victim, VALUE carrier);

-void rb_freeze_singleton_class(VALUE klass);

-RBIMPL_SYMBOL_EXPORT_END()

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-RBIMPL_ATTR_FORCEINLINE()

-static bool

-RB_FL_ABLE(VALUE obj)

-{

- if (RB_SPECIAL_CONST_P(obj)) {

- return false;

- }

- else if (RB_TYPE_P(obj, RUBY_T_NODE)) {

- return false;

- }

- else {

- return true;

- }

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RB_FL_TEST_RAW(VALUE obj, VALUE flags)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FL_ABLE(obj));

- return RBASIC(obj)->flags & flags;

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline VALUE

-RB_FL_TEST(VALUE obj, VALUE flags)

-{

- if (RB_FL_ABLE(obj)) {

- return RB_FL_TEST_RAW(obj, flags);

- }

- else {

- return RBIMPL_VALUE_NULL;

- }

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-RB_FL_ANY_RAW(VALUE obj, VALUE flags)

-{

- return RB_FL_TEST_RAW(obj, flags);

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-RB_FL_ANY(VALUE obj, VALUE flags)

-{

- return RB_FL_TEST(obj, flags);

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-RB_FL_ALL_RAW(VALUE obj, VALUE flags)

-{

- return RB_FL_TEST_RAW(obj, flags) == flags;

-}

-

-RBIMPL_ATTR_PURE_ON_NDEBUG()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline bool

-RB_FL_ALL(VALUE obj, VALUE flags)

-{

- return RB_FL_TEST(obj, flags) == flags;

-}

-

-RBIMPL_ATTR_NOALIAS()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-rbimpl_fl_set_raw_raw(struct RBasic *obj, VALUE flags)

-{

- obj->flags |= flags;

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-RB_FL_SET_RAW(VALUE obj, VALUE flags)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FL_ABLE(obj));

- rbimpl_fl_set_raw_raw(RBASIC(obj), flags);

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-RB_FL_SET(VALUE obj, VALUE flags)

-{

- if (RB_FL_ABLE(obj)) {

- RB_FL_SET_RAW(obj, flags);

- }

-}

-

-RBIMPL_ATTR_NOALIAS()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-rbimpl_fl_unset_raw_raw(struct RBasic *obj, VALUE flags)

-{

- obj->flags &= ~flags;

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-RB_FL_UNSET_RAW(VALUE obj, VALUE flags)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FL_ABLE(obj));

- rbimpl_fl_unset_raw_raw(RBASIC(obj), flags);

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-RB_FL_UNSET(VALUE obj, VALUE flags)

-{

- if (RB_FL_ABLE(obj)) {

- RB_FL_UNSET_RAW(obj, flags);

- }

-}

-

-RBIMPL_ATTR_NOALIAS()

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-rbimpl_fl_reverse_raw_raw(struct RBasic *obj, VALUE flags)

-{

- obj->flags ^= flags;

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-RB_FL_REVERSE_RAW(VALUE obj, VALUE flags)

-{

- RBIMPL_ASSERT_OR_ASSUME(RB_FL_ABLE(obj));

- rbimpl_fl_reverse_raw_raw(RBASIC(obj), flags);

-}

-

-RBIMPL_ATTR_ARTIFICIAL()

-static inline void

-RB_FL_REVERSE(VALUE obj, VALUE flags)

-{

- if (RB_FL_ABLE(obj)) {

- RB_FL_REVERSE_RAW(obj, flags);

- }

-}

-