mirror of
https://github.com/mruby/mruby
synced 2026-06-08 16:11:16 +00:00
Yukihiro "Matz" Matsumoto
8a87549315
- `MRB_WITHOUT_FLOAT` => `MRB_NO_FLOAT` - `MRB_USE_FLOAT` => `MRB_USE_FLOAT32` The former is to use `USE_XXX` naming convention. The latter is to make sure `float` is 32bit float and not floating point number in general.
104 lines
2.7 KiB
C
104 lines
2.7 KiB
C
/**
|
|
** @file mruby/class.h - Class class
|
|
**
|
|
** See Copyright Notice in mruby.h
|
|
*/
|
|
|
|
#ifndef MRUBY_CLASS_H
|
|
#define MRUBY_CLASS_H
|
|
|
|
#include "common.h"
|
|
|
|
/**
|
|
* Class class
|
|
*/
|
|
MRB_BEGIN_DECL
|
|
|
|
struct RClass {
|
|
MRB_OBJECT_HEADER;
|
|
struct iv_tbl *iv;
|
|
struct kh_mt *mt;
|
|
struct RClass *super;
|
|
};
|
|
|
|
#define mrb_class_ptr(v) ((struct RClass*)(mrb_ptr(v)))
|
|
|
|
MRB_INLINE struct RClass*
|
|
mrb_class(mrb_state *mrb, mrb_value v)
|
|
{
|
|
switch (mrb_type(v)) {
|
|
case MRB_TT_FALSE:
|
|
if (mrb_fixnum(v))
|
|
return mrb->false_class;
|
|
return mrb->nil_class;
|
|
case MRB_TT_TRUE:
|
|
return mrb->true_class;
|
|
case MRB_TT_SYMBOL:
|
|
return mrb->symbol_class;
|
|
case MRB_TT_FIXNUM:
|
|
return mrb->fixnum_class;
|
|
#ifndef MRB_NO_FLOAT
|
|
case MRB_TT_FLOAT:
|
|
return mrb->float_class;
|
|
#endif
|
|
case MRB_TT_CPTR:
|
|
return mrb->object_class;
|
|
case MRB_TT_ENV:
|
|
return NULL;
|
|
default:
|
|
return mrb_obj_ptr(v)->c;
|
|
}
|
|
}
|
|
|
|
/* flags:
|
|
20: frozen
|
|
19: is_prepended
|
|
18: is_origin
|
|
17: is_inherited (used by method cache)
|
|
16: unused
|
|
0-15: instance type
|
|
*/
|
|
#define MRB_FL_CLASS_IS_PREPENDED (1 << 19)
|
|
#define MRB_FL_CLASS_IS_ORIGIN (1 << 18)
|
|
#define MRB_CLASS_ORIGIN(c) do {\
|
|
if ((c)->flags & MRB_FL_CLASS_IS_PREPENDED) {\
|
|
(c) = (c)->super;\
|
|
while (!((c)->flags & MRB_FL_CLASS_IS_ORIGIN)) {\
|
|
(c) = (c)->super;\
|
|
}\
|
|
}\
|
|
} while (0)
|
|
#define MRB_FL_CLASS_IS_INHERITED (1 << 17)
|
|
#define MRB_INSTANCE_TT_MASK (0xFF)
|
|
#define MRB_SET_INSTANCE_TT(c, tt) ((c)->flags = (((c)->flags & ~MRB_INSTANCE_TT_MASK) | (char)(tt)))
|
|
#define MRB_INSTANCE_TT(c) (enum mrb_vtype)((c)->flags & MRB_INSTANCE_TT_MASK)
|
|
|
|
struct RClass *mrb_vm_define_class(mrb_state*, mrb_value, mrb_value, mrb_sym);
|
|
struct RClass *mrb_vm_define_module(mrb_state*, mrb_value, mrb_sym);
|
|
MRB_API void mrb_define_method_raw(mrb_state*, struct RClass*, mrb_sym, mrb_method_t);
|
|
MRB_API void mrb_alias_method(mrb_state*, struct RClass *c, mrb_sym a, mrb_sym b);
|
|
|
|
MRB_API mrb_method_t mrb_method_search_vm(mrb_state*, struct RClass**, mrb_sym);
|
|
MRB_API mrb_method_t mrb_method_search(mrb_state*, struct RClass*, mrb_sym);
|
|
|
|
MRB_API struct RClass* mrb_class_real(struct RClass* cl);
|
|
mrb_value mrb_instance_new(mrb_state *mrb, mrb_value cv);
|
|
|
|
void mrb_class_name_class(mrb_state*, struct RClass*, struct RClass*, mrb_sym);
|
|
mrb_bool mrb_const_name_p(mrb_state*, const char*, mrb_int);
|
|
mrb_value mrb_class_find_path(mrb_state*, struct RClass*);
|
|
mrb_value mrb_mod_to_s(mrb_state*, mrb_value);
|
|
void mrb_gc_mark_mt(mrb_state*, struct RClass*);
|
|
size_t mrb_gc_mark_mt_size(mrb_state*, struct RClass*);
|
|
void mrb_gc_free_mt(mrb_state*, struct RClass*);
|
|
|
|
#ifndef MRB_NO_METHOD_CACHE
|
|
void mrb_mc_clear_by_class(mrb_state *mrb, struct RClass* c);
|
|
#else
|
|
#define mrb_mc_clear_by_class(mrb,c)
|
|
#endif
|
|
|
|
MRB_END_DECL
|
|
|
|
#endif /* MRUBY_CLASS_H */
|