Commit db29a25a authored by Tatsuhiko Kubo's avatar Tatsuhiko Kubo

Rename functions for avoinding symbol confiliction.

Add prefix(mrb) to noregexp() and regexp_check().
parent d958aa2c
...@@ -107,8 +107,8 @@ mrb_int mrb_str_hash(mrb_state *mrb, mrb_value str); ...@@ -107,8 +107,8 @@ mrb_int mrb_str_hash(mrb_state *mrb, mrb_value str);
mrb_value mrb_str_dump(mrb_state *mrb, mrb_value str); mrb_value mrb_str_dump(mrb_state *mrb, mrb_value str);
mrb_value mrb_str_inspect(mrb_state *mrb, mrb_value str); mrb_value mrb_str_inspect(mrb_state *mrb, mrb_value str);
void noregexp(mrb_state *mrb, mrb_value self); void mrb_noregexp(mrb_state *mrb, mrb_value self);
void regexp_check(mrb_state *mrb, mrb_value obj); void mrb_regexp_check(mrb_state *mrb, mrb_value obj);
/* For backward compatibility */ /* For backward compatibility */
#define mrb_str_cat2(mrb, str, ptr) mrb_str_cat_cstr(mrb, str, ptr) #define mrb_str_cat2(mrb, str, ptr) mrb_str_cat_cstr(mrb, str, ptr)
......
...@@ -255,7 +255,7 @@ mrb_str_aref(mrb_state *mrb, mrb_value str, mrb_value indx) ...@@ -255,7 +255,7 @@ mrb_str_aref(mrb_state *mrb, mrb_value str, mrb_value indx)
{ {
mrb_int idx; mrb_int idx;
regexp_check(mrb, indx); mrb_regexp_check(mrb, indx);
switch (mrb_type(indx)) { switch (mrb_type(indx)) {
case MRB_TT_FIXNUM: case MRB_TT_FIXNUM:
idx = mrb_fixnum(indx); idx = mrb_fixnum(indx);
...@@ -300,7 +300,7 @@ mrb_str_aref_m(mrb_state *mrb, mrb_value str) ...@@ -300,7 +300,7 @@ mrb_str_aref_m(mrb_state *mrb, mrb_value str)
argc = mrb_get_args(mrb, "o|o", &a1, &a2); argc = mrb_get_args(mrb, "o|o", &a1, &a2);
if (argc == 2) { if (argc == 2) {
regexp_check(mrb, a1); mrb_regexp_check(mrb, a1);
return str_substr(mrb, str, mrb_fixnum(a1), mrb_fixnum(a2)); return str_substr(mrb, str, mrb_fixnum(a1), mrb_fixnum(a2));
} }
if (argc != 1) { if (argc != 1) {
...@@ -331,7 +331,7 @@ mrb_str_index_m(mrb_state *mrb, mrb_value str) ...@@ -331,7 +331,7 @@ mrb_str_index_m(mrb_state *mrb, mrb_value str)
sub = mrb_nil_value(); sub = mrb_nil_value();
} }
regexp_check(mrb, sub); mrb_regexp_check(mrb, sub);
if (pos < 0) { if (pos < 0) {
pos += RSTRING_LEN(str); pos += RSTRING_LEN(str);
if (pos < 0) { if (pos < 0) {
...@@ -410,7 +410,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str) ...@@ -410,7 +410,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str)
if (pos < 0) { if (pos < 0) {
pos += len; pos += len;
if (pos < 0) { if (pos < 0) {
regexp_check(mrb, sub); mrb_regexp_check(mrb, sub);
return mrb_nil_value(); return mrb_nil_value();
} }
} }
...@@ -423,7 +423,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str) ...@@ -423,7 +423,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str)
else else
sub = mrb_nil_value(); sub = mrb_nil_value();
} }
regexp_check(mrb, sub); mrb_regexp_check(mrb, sub);
if (mrb_type(sub) == MRB_TT_FIXNUM) { if (mrb_type(sub) == MRB_TT_FIXNUM) {
sub = mrb_fixnum_chr(mrb, sub); sub = mrb_fixnum_chr(mrb, sub);
...@@ -533,7 +533,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str) ...@@ -533,7 +533,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str)
} }
} }
else { else {
noregexp(mrb, str); mrb_noregexp(mrb, str);
} }
} }
...@@ -603,7 +603,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str) ...@@ -603,7 +603,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str)
beg = ptr - temp; beg = ptr - temp;
} }
else { else {
noregexp(mrb, str); mrb_noregexp(mrb, str);
} }
if (RSTRING_LEN(str) > 0 && (lim_p || RSTRING_LEN(str) > beg || lim < 0)) { if (RSTRING_LEN(str) > 0 && (lim_p || RSTRING_LEN(str) > beg || lim < 0)) {
if (RSTRING_LEN(str) == beg) { if (RSTRING_LEN(str) == beg) {
......
...@@ -638,16 +638,16 @@ mrb_string_value_ptr(mrb_state *mrb, mrb_value ptr) ...@@ -638,16 +638,16 @@ mrb_string_value_ptr(mrb_state *mrb, mrb_value ptr)
} }
void void
noregexp(mrb_state *mrb, mrb_value self) mrb_noregexp(mrb_state *mrb, mrb_value self)
{ {
mrb_raise(mrb, E_NOTIMP_ERROR, "Regexp class not implemented"); mrb_raise(mrb, E_NOTIMP_ERROR, "Regexp class not implemented");
} }
void void
regexp_check(mrb_state *mrb, mrb_value obj) mrb_regexp_check(mrb_state *mrb, mrb_value obj)
{ {
if (mrb_regexp_p(mrb, obj)) { if (mrb_regexp_p(mrb, obj)) {
noregexp(mrb, obj); mrb_noregexp(mrb, obj);
} }
} }
...@@ -737,7 +737,7 @@ mrb_str_aref(mrb_state *mrb, mrb_value str, mrb_value indx) ...@@ -737,7 +737,7 @@ mrb_str_aref(mrb_state *mrb, mrb_value str, mrb_value indx)
{ {
mrb_int idx; mrb_int idx;
regexp_check(mrb, indx); mrb_regexp_check(mrb, indx);
switch (mrb_type(indx)) { switch (mrb_type(indx)) {
case MRB_TT_FIXNUM: case MRB_TT_FIXNUM:
idx = mrb_fixnum(indx); idx = mrb_fixnum(indx);
...@@ -819,7 +819,7 @@ mrb_str_aref_m(mrb_state *mrb, mrb_value str) ...@@ -819,7 +819,7 @@ mrb_str_aref_m(mrb_state *mrb, mrb_value str)
argc = mrb_get_args(mrb, "o|o", &a1, &a2); argc = mrb_get_args(mrb, "o|o", &a1, &a2);
if (argc == 2) { if (argc == 2) {
regexp_check(mrb, a1); mrb_regexp_check(mrb, a1);
return mrb_str_substr(mrb, str, mrb_fixnum(a1), mrb_fixnum(a2)); return mrb_str_substr(mrb, str, mrb_fixnum(a1), mrb_fixnum(a2));
} }
if (argc != 1) { if (argc != 1) {
...@@ -1283,7 +1283,7 @@ mrb_str_index_m(mrb_state *mrb, mrb_value str) ...@@ -1283,7 +1283,7 @@ mrb_str_index_m(mrb_state *mrb, mrb_value str)
else else
sub = mrb_nil_value(); sub = mrb_nil_value();
} }
regexp_check(mrb, sub); mrb_regexp_check(mrb, sub);
if (pos < 0) { if (pos < 0) {
pos += RSTRING_LEN(str); pos += RSTRING_LEN(str);
if (pos < 0) { if (pos < 0) {
...@@ -1622,7 +1622,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str) ...@@ -1622,7 +1622,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str)
if (pos < 0) { if (pos < 0) {
pos += len; pos += len;
if (pos < 0) { if (pos < 0) {
regexp_check(mrb, sub); mrb_regexp_check(mrb, sub);
return mrb_nil_value(); return mrb_nil_value();
} }
} }
...@@ -1635,7 +1635,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str) ...@@ -1635,7 +1635,7 @@ mrb_str_rindex_m(mrb_state *mrb, mrb_value str)
else else
sub = mrb_nil_value(); sub = mrb_nil_value();
} }
regexp_check(mrb, sub); mrb_regexp_check(mrb, sub);
switch (mrb_type(sub)) { switch (mrb_type(sub)) {
case MRB_TT_FIXNUM: { case MRB_TT_FIXNUM: {
...@@ -1745,7 +1745,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str) ...@@ -1745,7 +1745,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str)
} }
} }
else { else {
noregexp(mrb, str); mrb_noregexp(mrb, str);
} }
} }
...@@ -1814,7 +1814,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str) ...@@ -1814,7 +1814,7 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str)
beg = ptr - temp; beg = ptr - temp;
} }
else { else {
noregexp(mrb, str); mrb_noregexp(mrb, str);
} }
if (RSTRING_LEN(str) > 0 && (lim_p || RSTRING_LEN(str) > beg || lim < 0)) { if (RSTRING_LEN(str) > 0 && (lim_p || RSTRING_LEN(str) > beg || lim < 0)) {
if (RSTRING_LEN(str) == beg) { if (RSTRING_LEN(str) == beg) {
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment