1#ifndef INTERNAL_IMEMO_H
2#define INTERNAL_IMEMO_H
11#include "ruby/internal/config.h"
14#include "internal/array.h"
18#define IMEMO_MASK 0x0f
21#define IMEMO_FL_USHIFT (FL_USHIFT + 4)
22#define IMEMO_FL_USER0 FL_USER4
23#define IMEMO_FL_USER1 FL_USER5
24#define IMEMO_FL_USER2 FL_USER6
25#define IMEMO_FL_USER3 FL_USER7
26#define IMEMO_FL_USER4 FL_USER8
27#define IMEMO_FL_USER5 FL_USER9
28#define IMEMO_FL_USER6 FL_USER10
42 imemo_constcache = 12,
61 const VALUE throw_obj;
66#define THROW_DATA_CONSUMED IMEMO_FL_USER0
71#if SIZEOF_INT * 2 > SIZEOF_VALUE
92#define IFUNC_YIELD_OPTIMIZABLE IMEMO_FL_USER0
119#define IMEMO_NEW(T, type, v0) ((T *)rb_imemo_new((type), (v0), sizeof(T)))
123#define THROW_DATA_P(err) imemo_throw_data_p((VALUE)err)
124#define MEMO_CAST(m) ((struct MEMO *)(m))
125#define MEMO_FOR(type, value) ((type *)RARRAY_PTR(value))
126#define NEW_MEMO_FOR(type, value) \
127 ((value) = rb_ary_hidden_new_fill(type_roomof(type, VALUE)), MEMO_FOR(type, value))
128#define NEW_PARTIAL_MEMO_FOR(type, value, member) \
129 ((value) = rb_ary_hidden_new_fill(type_roomof(type, VALUE)), \
130 rb_ary_set_len((value), offsetof(type, member) / sizeof(VALUE)), \
131 MEMO_FOR(type, value))
133#ifndef RUBY_RUBYPARSER_H
138static inline enum imemo_type imemo_type(
VALUE imemo);
139static inline int imemo_type_p(
VALUE imemo,
enum imemo_type imemo_type);
140static inline bool imemo_throw_data_p(
VALUE imemo);
142static inline VALUE rb_imemo_tmpbuf_auto_free_pointer(
void);
143static inline void *RB_IMEMO_TMPBUF_PTR(
VALUE v);
144static inline void *rb_imemo_tmpbuf_set_ptr(
VALUE v,
void *ptr);
145static inline VALUE rb_imemo_tmpbuf_auto_free_pointer_new_from_an_RString(
VALUE str);
146static inline void MEMO_V1_SET(
struct MEMO *m,
VALUE v);
147static inline void MEMO_V2_SET(
struct MEMO *m,
VALUE v);
149size_t rb_imemo_memsize(
VALUE obj);
150void rb_imemo_mark_and_move(
VALUE obj,
bool reference_updating);
151void rb_imemo_free(
VALUE obj);
153RUBY_SYMBOL_EXPORT_BEGIN
155const char *rb_imemo_name(
enum imemo_type
type);
156RUBY_SYMBOL_EXPORT_END
158static inline struct MEMO *
161 struct MEMO *memo = IMEMO_NEW(
struct MEMO, imemo_memo, 0);
162 *((
VALUE *)&memo->v1) = a;
163 *((
VALUE *)&memo->v2) = b;
164 *((
VALUE *)&memo->u3.value) = c;
169static inline enum imemo_type
170imemo_type(
VALUE imemo)
176imemo_type_p(
VALUE imemo,
enum imemo_type imemo_type)
183 return expected_type == (
RBASIC(imemo)->flags & mask);
190#define IMEMO_TYPE_P(v, t) imemo_type_p((VALUE)(v), t)
193imemo_throw_data_p(
VALUE imemo)
205rb_imemo_tmpbuf_auto_free_pointer(
void)
211RB_IMEMO_TMPBUF_PTR(
VALUE v)
218rb_imemo_tmpbuf_set_ptr(
VALUE v,
void *ptr)
224rb_imemo_tmpbuf_auto_free_pointer_new_from_an_RString(
VALUE str)
234 imemo = rb_imemo_tmpbuf_auto_free_pointer();
236 len = RSTRING_LEN(str);
237 src = RSTRING_PTR(str);
238 dst = ruby_xmalloc(
len);
239 memcpy(dst, src,
len);
273#define OBJ_FIELD_EXTERNAL IMEMO_FL_USER0
274#define IMEMO_OBJ_FIELDS(fields) ((struct rb_fields *)fields)
280void rb_imemo_fields_clear(
VALUE fields_obj);
283rb_imemo_fields_ptr(
VALUE obj_fields)
289 RUBY_ASSERT(IMEMO_TYPE_P(obj_fields, imemo_fields));
291 if (RB_UNLIKELY(
FL_TEST_RAW(obj_fields, OBJ_FIELD_EXTERNAL))) {
292 return IMEMO_OBJ_FIELDS(obj_fields)->as.external.ptr;
295 return IMEMO_OBJ_FIELDS(obj_fields)->as.embed.fields;
300rb_imemo_fields_complex_tbl(
VALUE obj_fields)
306 RUBY_ASSERT(IMEMO_TYPE_P(obj_fields, imemo_fields));
308 return IMEMO_OBJ_FIELDS(obj_fields)->as.complex.table;
#define RUBY_ASSERT(...)
Asserts that the given expression is truthy if and only if RUBY_DEBUG is truthy.
#define T_IMEMO
Old name of RUBY_T_IMEMO.
#define FL_TEST_RAW
Old name of RB_FL_TEST_RAW.
#define FL_USHIFT
Old name of RUBY_FL_USHIFT.
#define RB_OBJ_WRITE(old, slot, young)
Declaration of a "back" pointer.
#define UNLIMITED_ARGUMENTS
This macro is used in conjunction with rb_check_arity().
int capa
Designed capacity of the buffer.
int len
Length of the buffer.
rb_block_call_func * rb_block_call_func_t
Shorthand type that represents an iterator-written-in-C function pointer.
VALUE type(ANYARGS)
ANYARGS-ed function type.
#define RBASIC(obj)
Convenient casting macro.
#define StringValue(v)
Ensures that the parameter object is a String.
static bool RB_SPECIAL_CONST_P(VALUE obj)
Checks if the given object is of enum ruby_special_consts.
Ruby object's base components.
IFUNC (Internal FUNCtion)
const VALUE cref_or_me
class reference or rb_method_entry_t
#define SIZEOF_VALUE
Identical to sizeof(VALUE), except it is a macro that can also be used inside of preprocessor directi...
uintptr_t VALUE
Type that represents a Ruby object.
static bool RB_TYPE_P(VALUE obj, enum ruby_value_type t)
Queries if the given object is of given type.
@ RUBY_T_MASK
Bitmask of ruby_value_type.