diff options
| -rw-r--r-- | include/mruby/value.h | 1 | ||||
| -rw-r--r-- | src/etc.c | 6 |
2 files changed, 7 insertions, 0 deletions
diff --git a/include/mruby/value.h b/include/mruby/value.h index 899ec30eb..0bea02706 100644 --- a/include/mruby/value.h +++ b/include/mruby/value.h @@ -339,6 +339,7 @@ mrb_float_value(struct mrb_state *mrb, mrb_float f) #define mrb_hash_p(o) (mrb_type(o) == MRB_TT_HASH) #define mrb_cptr_p(o) (mrb_type(o) == MRB_TT_CPTR) #define mrb_test(o) mrb_bool(o) +mrb_bool mrb_regexp_p(struct mrb_state*, mrb_value); #define MRB_OBJECT_HEADER \ enum mrb_vtype tt:8;\ @@ -8,6 +8,7 @@ #include "mruby/string.h" #include "mruby/data.h" #include "mruby/class.h" +#include "mruby/re.h" struct RData* mrb_data_object_alloc(mrb_state *mrb, struct RClass *klass, void *ptr, const mrb_data_type *type) @@ -176,3 +177,8 @@ mrb_cptr_value(mrb_state *mrb, void *p) } #endif /* MRB_WORD_BOXING */ +mrb_bool +mrb_regexp_p(mrb_state *mrb, mrb_value v) +{ + return mrb_class_defined(mrb, REGEXP_CLASS) && mrb_obj_is_kind_of(mrb, v, mrb_class_get(mrb, REGEXP_CLASS)); +} |