2020-04-10 01:11:40 -04:00
|
|
|
#ifndef INTERNAL_OBJECT_H /*-*-C-*-vi:se ft=c:*/
|
|
|
|
#define INTERNAL_OBJECT_H
|
|
|
|
/**
|
2019-11-29 01:18:34 -05:00
|
|
|
* @file
|
2020-04-08 00:28:13 -04:00
|
|
|
* @author Ruby developers <ruby-core@ruby-lang.org>
|
2019-11-29 01:18:34 -05:00
|
|
|
* @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.
|
2020-04-08 00:28:13 -04:00
|
|
|
* @brief Internal header for Object.
|
2019-11-29 01:18:34 -05:00
|
|
|
*/
|
2019-12-03 21:43:51 -05:00
|
|
|
#include "ruby/ruby.h" /* for VALUE */
|
2020-08-17 00:51:23 -04:00
|
|
|
#include "internal/class.h" /* for RCLASS_IV_INDEX_TBL */
|
|
|
|
|
|
|
|
#ifdef ROBJECT_IV_INDEX_TBL
|
|
|
|
# undef ROBJECT_IV_INDEX_TBL
|
|
|
|
#endif
|
2019-11-29 01:18:34 -05:00
|
|
|
|
|
|
|
/* object.c */
|
|
|
|
VALUE rb_class_search_ancestor(VALUE klass, VALUE super);
|
|
|
|
NORETURN(void rb_undefined_alloc(VALUE klass));
|
|
|
|
double rb_num_to_dbl(VALUE val);
|
|
|
|
VALUE rb_obj_dig(int argc, VALUE *argv, VALUE self, VALUE notfound);
|
|
|
|
VALUE rb_immutable_obj_clone(int, VALUE *, VALUE);
|
|
|
|
VALUE rb_check_convert_type_with_id(VALUE,int,const char*,ID);
|
|
|
|
int rb_bool_expected(VALUE, const char *);
|
2019-12-03 21:43:51 -05:00
|
|
|
static inline void RBASIC_CLEAR_CLASS(VALUE obj);
|
|
|
|
static inline void RBASIC_SET_CLASS_RAW(VALUE obj, VALUE klass);
|
|
|
|
static inline void RBASIC_SET_CLASS(VALUE obj, VALUE klass);
|
2020-08-17 00:51:23 -04:00
|
|
|
static inline struct st_table *ROBJECT_IV_INDEX_TBL_inline(VALUE obj);
|
2019-11-29 01:18:34 -05:00
|
|
|
|
|
|
|
RUBY_SYMBOL_EXPORT_BEGIN
|
|
|
|
/* object.c (export) */
|
|
|
|
int rb_opts_exception_p(VALUE opts, int default_value);
|
|
|
|
RUBY_SYMBOL_EXPORT_END
|
|
|
|
|
2019-12-03 21:43:51 -05:00
|
|
|
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);
|
2020-07-09 22:49:50 -04:00
|
|
|
VALUE rb_obj_size(VALUE self, VALUE args, VALUE obj);
|
2019-12-03 21:43:51 -05:00
|
|
|
MJIT_SYMBOL_EXPORT_END
|
|
|
|
|
|
|
|
static inline void
|
|
|
|
RBASIC_SET_CLASS_RAW(VALUE obj, VALUE klass)
|
|
|
|
{
|
2021-03-02 01:22:22 -05:00
|
|
|
const VALUE *ptr = &RBASIC(obj)->klass;
|
|
|
|
*(VALUE *)ptr = klass;
|
2019-12-03 21:43:51 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
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);
|
|
|
|
}
|
2020-08-17 00:51:23 -04:00
|
|
|
|
|
|
|
RBIMPL_ATTR_PURE()
|
|
|
|
static inline struct st_table *
|
|
|
|
ROBJECT_IV_INDEX_TBL_inline(VALUE obj)
|
|
|
|
{
|
|
|
|
if (RB_FL_ANY_RAW(obj, ROBJECT_EMBED)) {
|
|
|
|
VALUE klass = rb_obj_class(obj);
|
|
|
|
return RCLASS_IV_INDEX_TBL(klass);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
const struct RObject *const ptr = ROBJECT(obj);
|
|
|
|
return ptr->as.heap.iv_index_tbl;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#define ROBJECT_IV_INDEX_TBL ROBJECT_IV_INDEX_TBL_inline
|
|
|
|
|
2019-11-29 01:18:34 -05:00
|
|
|
#endif /* INTERNAL_OBJECT_H */
|