From ca7c662be5debb85b38063807c6f3034d1156d5f Mon Sep 17 00:00:00 2001 From: Yukihiro Matz Matsumoto Date: Sun, 4 Nov 2012 05:07:44 +0900 Subject: remove reference to ruby_verbose and ruby_debug --- include/mruby.h | 2 -- 1 file changed, 2 deletions(-) (limited to 'include/mruby.h') diff --git a/include/mruby.h b/include/mruby.h index 94fa393ea..a35d92804 100644 --- a/include/mruby.h +++ b/include/mruby.h @@ -46,8 +46,6 @@ typedef void* (*mrb_allocf) (struct mrb_state *mrb, void*, size_t, void *ud); #ifndef MRB_ARENA_SIZE #define MRB_ARENA_SIZE 1024 #endif -#define ruby_debug (mrb_nil_value()) -#define ruby_verbose (mrb_nil_value()) typedef struct { mrb_sym mid; -- cgit v1.2.3 From e429905597bff1e0fefb426ef22d5b3ea80e76f5 Mon Sep 17 00:00:00 2001 From: Yukihiro Matz Matsumoto Date: Sun, 4 Nov 2012 05:11:39 +0900 Subject: replace SYM2ID() by mrb_symbol() --- include/mruby.h | 2 -- src/etc.c | 4 ++-- src/re.c | 5 ++--- src/struct.c | 10 +++++----- src/symbol.c | 4 ++-- src/variable.c | 2 +- 6 files changed, 12 insertions(+), 15 deletions(-) (limited to 'include/mruby.h') diff --git a/include/mruby.h b/include/mruby.h index a35d92804..f33c9cfc0 100644 --- a/include/mruby.h +++ b/include/mruby.h @@ -302,8 +302,6 @@ void mrb_bug(const char *fmt, ...); #define E_KEY_ERROR (mrb_class_obj_get(mrb, "KeyError")) -#define SYM2ID(x) ((x).value.sym) - #define NUM2CHR_internal(x) (((mrb_type(x) == MRB_TT_STRING)&&(RSTRING_LEN(x)>=1))?\ RSTRING_PTR(x)[0]:(char)(mrb_fixnum_number(x)&0xff)) #ifdef __GNUC__ diff --git a/src/etc.c b/src/etc.c index c38f2a0bc..3d861320d 100644 --- a/src/etc.c +++ b/src/etc.c @@ -103,7 +103,7 @@ mrb_to_id(mrb_state *mrb, mrb_value name) name = mrb_str_intern(mrb, name); /* fall through */ case MRB_TT_SYMBOL: - return SYM2ID(name); + return mrb_symbol(name); } return id; } @@ -156,7 +156,7 @@ mrb_obj_id(mrb_value obj) case MRB_TT_TRUE: return MakeID(1); case MRB_TT_SYMBOL: - return MakeID(SYM2ID(obj)); + return MakeID(mrb_symbol(obj)); case MRB_TT_FIXNUM: return MakeID2(float_id((mrb_float)mrb_fixnum(obj)), MRB_TT_FLOAT); case MRB_TT_FLOAT: diff --git a/src/re.c b/src/re.c index ff637aecb..e2363d07a 100644 --- a/src/re.c +++ b/src/re.c @@ -260,7 +260,7 @@ match_backref_number(mrb_state *mrb, mrb_value match, mrb_value backref) return mrb_fixnum(backref); case MRB_TT_SYMBOL: - name = mrb_sym2name(mrb, SYM2ID(backref)); + name = mrb_sym2name(mrb, mrb_symbol(backref)); break; case MRB_TT_STRING: @@ -1192,8 +1192,7 @@ mrb_match_aref(mrb_state *mrb, /*int argc, mrb_value *argv,*/ mrb_value match) switch (mrb_type(idx)) { case MRB_TT_SYMBOL: - //p = mrb_id2name(SYM2ID(idx)); - p = mrb_sym2name(mrb, SYM2ID(idx)); + p = mrb_sym2name(mrb, mrb_symbol(idx)); goto name_to_backref; break; case MRB_TT_STRING: diff --git a/src/struct.c b/src/struct.c index 2ae904fa5..85d0fa094 100644 --- a/src/struct.c +++ b/src/struct.c @@ -220,7 +220,7 @@ mrb_struct_set(mrb_state *mrb, mrb_value obj, mrb_value val) ptr = RSTRUCT_PTR(obj); for (i=0; i Date: Sun, 4 Nov 2012 05:15:58 +0900 Subject: remove NUM2CHR macro --- include/mruby.h | 5 ----- 1 file changed, 5 deletions(-) (limited to 'include/mruby.h') diff --git a/include/mruby.h b/include/mruby.h index f33c9cfc0..01e9657cf 100644 --- a/include/mruby.h +++ b/include/mruby.h @@ -302,11 +302,6 @@ void mrb_bug(const char *fmt, ...); #define E_KEY_ERROR (mrb_class_obj_get(mrb, "KeyError")) -#define NUM2CHR_internal(x) (((mrb_type(x) == MRB_TT_STRING)&&(RSTRING_LEN(x)>=1))?\ - RSTRING_PTR(x)[0]:(char)(mrb_fixnum_number(x)&0xff)) -#ifdef __GNUC__ -# define NUM2CHR(x) __extension__ ({mrb_value num2chr_x = (x); NUM2CHR_internal(num2chr_x);}) -#else /* TODO: there is no definitions of RSTRING_* here, so cannot compile. static inline char NUM2CHR(mrb_value x) -- cgit v1.2.3 From 3e22c939e6f1968c46e251c363de49c1fd0fd9f1 Mon Sep 17 00:00:00 2001 From: Yukihiro Matz Matsumoto Date: Sun, 4 Nov 2012 05:16:44 +0900 Subject: remove NUM2CHR macro --- include/mruby.h | 10 ---------- 1 file changed, 10 deletions(-) (limited to 'include/mruby.h') diff --git a/include/mruby.h b/include/mruby.h index 01e9657cf..4a5b5ce88 100644 --- a/include/mruby.h +++ b/include/mruby.h @@ -302,16 +302,6 @@ void mrb_bug(const char *fmt, ...); #define E_KEY_ERROR (mrb_class_obj_get(mrb, "KeyError")) -/* TODO: there is no definitions of RSTRING_* here, so cannot compile. -static inline char -NUM2CHR(mrb_value x) -{ - return NUM2CHR_internal(x); -} -*/ -#define NUM2CHR(x) NUM2CHR_internal(x) -#endif - mrb_value mrb_yield(mrb_state *mrb, mrb_value v, mrb_value blk); mrb_value mrb_yield_argv(mrb_state *mrb, mrb_value b, int argc, mrb_value *argv); mrb_value mrb_class_new_instance(mrb_state *mrb, int, mrb_value*, struct RClass *); -- cgit v1.2.3