* encoding.c (enc_compatible_p): use TYPE not BUILTIN_TYPE.

[ruby-dev:36048]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@18934 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
naruse 2008-08-29 23:10:25 +00:00
Родитель 5159f500fd
Коммит 727625d9d4
2 изменённых файлов: 8 добавлений и 4 удалений

Просмотреть файл

@ -1,6 +1,12 @@
Sat Aug 30 08:09:36 2008 NARUSE, Yui <naruse@ruby-lang.org>
* encoding.c (enc_compatible_p): use TYPE not BUILTIN_TYPE.
[ruby-dev:36048]
Sat Aug 30 07:48:48 2008 NARUSE, Yui <naruse@ruby-lang.org>
* encoding.c (enc_compatible_p): add SPECIAL_CONST_P check.
[ruby-dev:36048]
* test/ruby/test_m17n.rb (test_compatible): fix test.

Просмотреть файл

@ -880,13 +880,11 @@ enc_compatible_p(VALUE klass, VALUE str1, VALUE str2)
{
rb_encoding *enc;
if (SPECIAL_CONST_P(str1) ||
BUILTIN_TYPE(str1) != T_STRING && BUILTIN_TYPE(str1) != T_REGEXP) {
if (SPECIAL_CONST_P(str1) || TYPE(str1) != T_STRING && TYPE(str1) != T_REGEXP) {
rb_raise(rb_eTypeError, "wrong argument type %s (expected String or Regexp)",
rb_obj_classname(str1));
}
if (SPECIAL_CONST_P(str2) ||
BUILTIN_TYPE(str2) != T_STRING && BUILTIN_TYPE(str2) != T_REGEXP) {
if (SPECIAL_CONST_P(str2) || TYPE(str2) != T_STRING && TYPE(str2) != T_REGEXP) {
rb_raise(rb_eTypeError, "wrong argument type %s (expected String or Regexp)",
rb_obj_classname(str2));
}