[270] | 1 | /*
|
---|
| 2 | ** mruby/boxing_no.h - unboxed mrb_value definition
|
---|
| 3 | **
|
---|
| 4 | ** See Copyright Notice in mruby.h
|
---|
| 5 | */
|
---|
| 6 |
|
---|
| 7 | #ifndef MRUBY_BOXING_NO_H
|
---|
| 8 | #define MRUBY_BOXING_NO_H
|
---|
| 9 |
|
---|
| 10 | #define MRB_FIXNUM_SHIFT 0
|
---|
| 11 | #define MRB_TT_HAS_BASIC MRB_TT_OBJECT
|
---|
| 12 |
|
---|
| 13 | typedef struct mrb_value {
|
---|
| 14 | union {
|
---|
| 15 | mrb_float f;
|
---|
| 16 | void *p;
|
---|
| 17 | mrb_int i;
|
---|
| 18 | mrb_sym sym;
|
---|
| 19 | } value;
|
---|
| 20 | enum mrb_vtype tt;
|
---|
| 21 | } mrb_value;
|
---|
| 22 |
|
---|
| 23 | #define mrb_float_pool(mrb,f) mrb_float_value(mrb,f)
|
---|
| 24 |
|
---|
| 25 | #define mrb_ptr(o) (o).value.p
|
---|
| 26 | #define mrb_cptr(o) mrb_ptr(o)
|
---|
| 27 | #define mrb_float(o) (o).value.f
|
---|
| 28 | #define mrb_fixnum(o) (o).value.i
|
---|
| 29 | #define mrb_symbol(o) (o).value.sym
|
---|
| 30 | #define mrb_type(o) (o).tt
|
---|
| 31 |
|
---|
| 32 | #define BOXNIX_SET_VALUE(o, ttt, attr, v) do {\
|
---|
| 33 | (o).tt = ttt;\
|
---|
| 34 | (o).attr = v;\
|
---|
| 35 | } while (0)
|
---|
| 36 |
|
---|
| 37 | #define SET_NIL_VALUE(r) BOXNIX_SET_VALUE(r, MRB_TT_FALSE, value.i, 0)
|
---|
| 38 | #define SET_FALSE_VALUE(r) BOXNIX_SET_VALUE(r, MRB_TT_FALSE, value.i, 1)
|
---|
| 39 | #define SET_TRUE_VALUE(r) BOXNIX_SET_VALUE(r, MRB_TT_TRUE, value.i, 1)
|
---|
| 40 | #define SET_BOOL_VALUE(r,b) BOXNIX_SET_VALUE(r, b ? MRB_TT_TRUE : MRB_TT_FALSE, value.i, 1)
|
---|
| 41 | #define SET_INT_VALUE(r,n) BOXNIX_SET_VALUE(r, MRB_TT_FIXNUM, value.i, (n))
|
---|
| 42 | #define SET_FLOAT_VALUE(mrb,r,v) BOXNIX_SET_VALUE(r, MRB_TT_FLOAT, value.f, (v))
|
---|
| 43 | #define SET_SYM_VALUE(r,v) BOXNIX_SET_VALUE(r, MRB_TT_SYMBOL, value.sym, (v))
|
---|
| 44 | #define SET_OBJ_VALUE(r,v) BOXNIX_SET_VALUE(r, (((struct RObject*)(v))->tt), value.p, (v))
|
---|
| 45 | #define SET_CPTR_VALUE(mrb,r,v) BOXNIX_SET_VALUE(r, MRB_TT_CPTR, value.p, v)
|
---|
| 46 | #define SET_UNDEF_VALUE(r) BOXNIX_SET_VALUE(r, MRB_TT_UNDEF, value.i, 0)
|
---|
| 47 |
|
---|
| 48 | #endif /* MRUBY_BOXING_NO_H */
|
---|