suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix backslash-s handling in a char-string regexp

Browse Source 
svn: r5588
This commit is contained in:
Matthew Flatt 2007-02-12 00:19:10 +00:00
parent 9d8cc6f55f
commit 5d9ee938d6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/mzscheme/src/regexp.c
View File

@ -4318,10 +4318,10 @@ static int translate(unsigned char *s, int len, char **result, int pcre)
if (((c >= 'a') && (c <= 'z')) if (((c >= 'a') && (c <= 'z'))
|| ((c >= 'A') && (c <= 'Z'))) { || ((c >= 'A') && (c <= 'Z'))) {
regcharclass(c, simple_on); regcharclass(c, simple_on);
p++; p += 2;
} else if (c < 128) { } else if (c < 128) {
simple_on[c] = 1; simple_on[c] = 1;
p++; p += 2;
} else { } else {
/* Let next iteration handle it. /* Let next iteration handle it.
(There's no danger of using it as a meta-character.) */ (There's no danger of using it as a meta-character.) */