diff options
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | parse.y | 4 |
2 files changed, 6 insertions, 2 deletions
@@ -1,3 +1,7 @@ +Sat May 31 04:36:54 2003 Nobuyoshi Nakada <nobu.nokada@softhome.net> + + * parse.y (rb_intern): should handle multibyte name. + Fri May 30 23:18:01 2003 why the lucky stiff <ruby-cvs@whytheluckystiff.net> * ext/syck/rubyext.c (rb_syck_mktime): seconds calculated wrong. @@ -5781,6 +5781,7 @@ rb_intern(name) if (st_lookup(sym_tbl, (st_data_t)name, (st_data_t *)&id)) return id; + last = strlen(name)-1; id = 0; switch (*name) { case '$': @@ -5812,7 +5813,6 @@ rb_intern(name) } } - last = strlen(name)-1; if (name[last] == '=') { /* attribute assignment */ char *buf = ALLOCA_N(char,last+1); @@ -5835,7 +5835,7 @@ rb_intern(name) break; } while (*m && is_identchar(*m)) { - m++; + m += mblen(m, name + last - m + 1); } if (*m) id = ID_JUNK; id |= ++last_id << ID_SCOPE_SHIFT; |