mirror of
https://github.com/mruby/mruby
synced 2026-06-08 16:11:16 +00:00
Mitchell Blank Jr
9e336b00e5
One of the biggest set of changes needed to make C++ compile, is that you
can't autoconvert "void*" to a different pointer type without a cast (you
can of course, convert pointers *to* "void*"!)
For the first part, convert the users of "mrb_obj_alloc". Since it has
to return something, make it RBasic* (that's what mrb_obj_alloc() is
operating on anyway). This way, even in C you'll get a warning if you
don't cast it.
For places where there are a lot of similar calls to mrb_obj_alloc(),
this can be easily hidden through a macro. I did this in string.c:
#define mrb_obj_alloc_string(mrb) ((struct RString *) mrb_obj_alloc((mrb), MRB_TT_STRING, (mrb)->string_class))
I also updated the mrb_object() macro to also return a RBasic* -- my
previous commit changed that from "void*" -> "RObject*", but I figure
it should be consistent with mrb_obj_alloc()
88 lines
2.5 KiB
C
88 lines
2.5 KiB
C
/*
|
|
** class.h - Class class
|
|
**
|
|
** See Copyright Notice in mruby.h
|
|
*/
|
|
|
|
#ifndef MRUBY_CLASS_H
|
|
#define MRUBY_CLASS_H
|
|
|
|
#if defined(__cplusplus)
|
|
extern "C" {
|
|
#endif
|
|
|
|
struct RClass {
|
|
MRUBY_OBJECT_HEADER;
|
|
struct kh_iv *iv;
|
|
struct kh_mt *mt;
|
|
struct RClass *super;
|
|
};
|
|
|
|
#define mrb_class_ptr(v) ((struct RClass*)((v).value.p))
|
|
#define RCLASS_SUPER(v) (((struct RClass*)((v).value.p))->super)
|
|
#define RCLASS_IV_TBL(v) (((struct RClass*)((v).value.p))->iv)
|
|
#define RCLASS_M_TBL(v) (((struct RClass*)((v).value.p))->mt)
|
|
|
|
static inline struct RClass*
|
|
mrb_class(mrb_state *mrb, mrb_value v)
|
|
{
|
|
switch (mrb_type(v)) {
|
|
case MRB_TT_FALSE:
|
|
if (v.value.p)
|
|
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;
|
|
case MRB_TT_FLOAT:
|
|
return mrb->float_class;
|
|
|
|
#ifdef INCLUDE_REGEXP
|
|
// case MRB_TT_REGEX:
|
|
// return mrb->regex_class;
|
|
// case MRB_TT_MATCH:
|
|
// return mrb->match_class;
|
|
// case MRB_TT_DATA:
|
|
// return mrb->encode_class;
|
|
#else
|
|
case MRB_TT_REGEX:
|
|
case MRB_TT_MATCH:
|
|
mrb_raise(mrb, E_TYPE_ERROR, "type mismatch: %s given",
|
|
mrb_obj_classname(mrb, v));
|
|
return mrb->nil_class; /* not reach */
|
|
#endif
|
|
default:
|
|
return mrb_object(v)->c;
|
|
}
|
|
}
|
|
|
|
#define MRB_SET_INSTANCE_TT(c, tt) c->flags = ((c->flags & ~0xff) | (char)tt)
|
|
#define MRB_INSTANCE_TT(c) (enum mrb_vtype)(c->flags & 0xff)
|
|
|
|
struct RClass* mrb_define_class_id(mrb_state*, mrb_sym, struct RClass*);
|
|
struct RClass* mrb_define_module_id(mrb_state*, mrb_sym);
|
|
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);
|
|
void mrb_define_method_vm(mrb_state*, struct RClass*, mrb_sym, mrb_value);
|
|
void mrb_define_method_raw(mrb_state*, struct RClass*, mrb_sym, struct RProc *);
|
|
void mrb_define_method_id(mrb_state *mrb, struct RClass *c, mrb_sym mid, mrb_func_t func, int aspec);
|
|
|
|
struct RClass *mrb_class_outer_module(mrb_state*, struct RClass *);
|
|
struct RProc *mrb_method_search_vm(mrb_state*, struct RClass**, mrb_sym);
|
|
struct RProc *mrb_method_search(mrb_state*, struct RClass*, mrb_sym);
|
|
|
|
int mrb_respond_to(mrb_state *mrb, mrb_value obj, mrb_sym mid);
|
|
int mrb_obj_is_instance_of(mrb_state *mrb, mrb_value obj, struct RClass* c);
|
|
struct RClass* mrb_class_real(struct RClass* cl);
|
|
|
|
void mrb_obj_call_init(mrb_state *mrb, mrb_value obj, int argc, mrb_value *argv);
|
|
|
|
#if defined(__cplusplus)
|
|
} /* extern "C" { */
|
|
#endif
|
|
|
|
#endif /* MRUBY_CLASS_H */
|