* parse.y (parse_regx): handle backslash escaping of delimiter here.

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

1 files changed, 6 insertions, 4 deletions

diff --git a/parse.y b/parse.y
index c6b3736d40..df796cdf17 100644
--- a/parse.y
+++ b/parse.y
@@ -2241,7 +2241,8 @@ read_escape()
 }
 
 static int
-tokadd_escape()
+tokadd_escape(term)
+    int term;
 {
     int c;
 
@@ -2302,7 +2303,7 @@ tokadd_escape()
 	tokadd('\\'); tokadd('c');
       escaped:
 	if ((c = nextc()) == '\\') {
-	    return tokadd_escape();
+	    return tokadd_escape(term);
 	}
 	else if (c == -1) goto eof;
 	tokadd(c);
@@ -2314,7 +2315,8 @@ tokadd_escape()
 	return -1;
 
       default:
-	tokadd('\\');
+	if (c != term)
+	    tokadd('\\');
 	tokadd(c);
     }
     return 0;
@@ -2345,7 +2347,7 @@ parse_regx(term, paren)
 	    continue;
 
 	  case '\\':
-	    if (tokadd_escape() < 0)
+	    if (tokadd_escape(term) < 0)
 		return 0;
 	    continue;