まつもと ゆきひろです

In message "[ruby-list:12629] trouble on ruby-perllib"
    on 99/03/08, ymaekawa / trd.tmg.nec.co.jp <ymaekawa / trd.tmg.nec.co.jp> writes:

|rubyのバグ(恐らく)にぶつかりました。うまい対処法があればご教授願います。

|変な文字コードがおしりに付加されます。これは文字列中にシングルクォート
|(')があると起こるようです。

バグです．1.3系では直してたんですけど1.2系に反映するのを忘れ
てました．パッチ付けときます．

--- string.c	1998/11/09 09:11:51	1.1.1.2.2.48
+++ string.c	1999/03/08 03:17:26
@@ -580,3 +580,3 @@
     len = RSTRING(sub)->len;
-    e = s + RSTRING(str)->len - len + 1;
+    e = RSTRING(str)->ptr + RSTRING(str)->len - len + 1;
     while (s < e) {
@@ -1476,3 +1476,3 @@
 
-VALUE
+static VALUE
 str_dump(str)
@@ -1490,3 +1490,3 @@
 	switch (c) {
-	  case '"':  case '\'':
+	  case '"':  case '\\':
 	  case '\n': case '\r':
@@ -1539,3 +1539,3 @@
 	}
-	else if (c == '\13') {
+	else if (c == '\013') {
 	    *q++ = '\\';
@@ -1547,3 +1547,3 @@
 	}
-	else if (c == 033) {
+	else if (c == '\033') {
 	    *q++ = '\\';