internal/object.h rework
Eliminated macros. As a side effect struct RBasicRaw is no longer required because we can now define anonymous structs inside of inline functions.
This commit is contained in:
parent
c27bcd7057
commit
d0e0c884bb
Notes:
git
2019-12-26 20:45:59 +09:00
@ -9,37 +9,52 @@
|
|||||||
* modify this file, provided that the conditions mentioned in the
|
* modify this file, provided that the conditions mentioned in the
|
||||||
* file COPYING are met. Consult the file for details.
|
* file COPYING are met. Consult the file for details.
|
||||||
*/
|
*/
|
||||||
|
#include "ruby/ruby.h" /* for VALUE */
|
||||||
|
|
||||||
/* object.c */
|
/* object.c */
|
||||||
void rb_obj_copy_ivar(VALUE dest, VALUE obj);
|
|
||||||
CONSTFUNC(VALUE rb_obj_equal(VALUE obj1, VALUE obj2));
|
|
||||||
CONSTFUNC(VALUE rb_obj_not(VALUE obj));
|
|
||||||
VALUE rb_class_search_ancestor(VALUE klass, VALUE super);
|
VALUE rb_class_search_ancestor(VALUE klass, VALUE super);
|
||||||
NORETURN(void rb_undefined_alloc(VALUE klass));
|
NORETURN(void rb_undefined_alloc(VALUE klass));
|
||||||
double rb_num_to_dbl(VALUE val);
|
double rb_num_to_dbl(VALUE val);
|
||||||
VALUE rb_obj_dig(int argc, VALUE *argv, VALUE self, VALUE notfound);
|
VALUE rb_obj_dig(int argc, VALUE *argv, VALUE self, VALUE notfound);
|
||||||
VALUE rb_immutable_obj_clone(int, VALUE *, VALUE);
|
VALUE rb_immutable_obj_clone(int, VALUE *, VALUE);
|
||||||
VALUE rb_obj_not_equal(VALUE obj1, VALUE obj2);
|
|
||||||
VALUE rb_convert_type_with_id(VALUE,int,const char*,ID);
|
|
||||||
VALUE rb_check_convert_type_with_id(VALUE,int,const char*,ID);
|
VALUE rb_check_convert_type_with_id(VALUE,int,const char*,ID);
|
||||||
int rb_bool_expected(VALUE, const char *);
|
int rb_bool_expected(VALUE, const char *);
|
||||||
|
static inline void RBASIC_CLEAR_CLASS(VALUE obj);
|
||||||
struct RBasicRaw {
|
static inline void RBASIC_SET_CLASS_RAW(VALUE obj, VALUE klass);
|
||||||
VALUE flags;
|
static inline void RBASIC_SET_CLASS(VALUE obj, VALUE klass);
|
||||||
VALUE klass;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define RBASIC_CLEAR_CLASS(obj) memset(&(((struct RBasicRaw *)((VALUE)(obj)))->klass), 0, sizeof(VALUE))
|
|
||||||
#define RBASIC_SET_CLASS_RAW(obj, cls) memcpy(&((struct RBasicRaw *)((VALUE)(obj)))->klass, &(cls), sizeof(VALUE))
|
|
||||||
#define RBASIC_SET_CLASS(obj, cls) do { \
|
|
||||||
VALUE _obj_ = (obj); \
|
|
||||||
RB_OBJ_WRITE(_obj_, &((struct RBasicRaw *)(_obj_))->klass, cls); \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
RUBY_SYMBOL_EXPORT_BEGIN
|
RUBY_SYMBOL_EXPORT_BEGIN
|
||||||
/* object.c (export) */
|
/* object.c (export) */
|
||||||
int rb_opts_exception_p(VALUE opts, int default_value);
|
int rb_opts_exception_p(VALUE opts, int default_value);
|
||||||
RUBY_SYMBOL_EXPORT_END
|
RUBY_SYMBOL_EXPORT_END
|
||||||
|
|
||||||
|
MJIT_SYMBOL_EXPORT_BEGIN
|
||||||
|
CONSTFUNC(VALUE rb_obj_equal(VALUE obj1, VALUE obj2));
|
||||||
|
CONSTFUNC(VALUE rb_obj_not(VALUE obj));
|
||||||
|
VALUE rb_obj_not_equal(VALUE obj1, VALUE obj2);
|
||||||
|
void rb_obj_copy_ivar(VALUE dest, VALUE obj);
|
||||||
|
VALUE rb_false(VALUE obj);
|
||||||
|
VALUE rb_convert_type_with_id(VALUE v, int t, const char* nam, ID mid);
|
||||||
|
MJIT_SYMBOL_EXPORT_END
|
||||||
|
|
||||||
|
static inline void
|
||||||
|
RBASIC_SET_CLASS_RAW(VALUE obj, VALUE klass)
|
||||||
|
{
|
||||||
|
struct { VALUE flags; VALUE klass; } *ptr = (void *)obj;
|
||||||
|
ptr->klass = klass;
|
||||||
|
}
|
||||||
|
|
||||||
|
static inline void
|
||||||
|
RBASIC_CLEAR_CLASS(VALUE obj)
|
||||||
|
{
|
||||||
|
RBASIC_SET_CLASS_RAW(obj, 0);
|
||||||
|
}
|
||||||
|
|
||||||
|
static inline void
|
||||||
|
RBASIC_SET_CLASS(VALUE obj, VALUE klass)
|
||||||
|
{
|
||||||
|
VALUE oldv = RBASIC_CLASS(obj);
|
||||||
|
RBASIC_SET_CLASS_RAW(obj, klass);
|
||||||
|
RB_OBJ_WRITTEN(obj, oldv, klass);
|
||||||
|
}
|
||||||
#endif /* INTERNAL_OBJECT_H */
|
#endif /* INTERNAL_OBJECT_H */
|
||||||
|
Loading…
x
Reference in New Issue
Block a user