Fix onetrueawk#83 (#84)
This commit is contained in:
parent
cef5180110
commit
e5a89e63fe
6
b.c
6
b.c
@ -1105,6 +1105,12 @@ rescan:
|
|||||||
if (!adjbuf((char **) &buf, &bufsz, bp-buf+1, 100, (char **) &bp, "relex2"))
|
if (!adjbuf((char **) &buf, &bufsz, bp-buf+1, 100, (char **) &bp, "relex2"))
|
||||||
FATAL("out of space for reg expr %.10s...", lastre);
|
FATAL("out of space for reg expr %.10s...", lastre);
|
||||||
if (cc->cc_func(i)) {
|
if (cc->cc_func(i)) {
|
||||||
|
/* escape backslash */
|
||||||
|
if (i == '\\') {
|
||||||
|
*bp++ = '\\';
|
||||||
|
n++;
|
||||||
|
}
|
||||||
|
|
||||||
*bp++ = i;
|
*bp++ = i;
|
||||||
n++;
|
n++;
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user