* parse.y (rb_intern): should handle multibyte name.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3890 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

2 files changed, 6 insertions, 2 deletions

diff --git a/ChangeLog b/ChangeLog
index 3d328f1254..ec66eb13e1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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.
diff --git a/parse.y b/parse.y
index c9ef8932f9..c5f5d8cea5 100644
--- a/parse.y
+++ b/parse.y
@@ -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;