Fix onetrueawk#83 (#84)

2020-06-25 19:33:52 +01:00 · 2020-06-25 19:33:52 +01:00 · e5a89e63fe
commit e5a89e63fe
parent cef5180110
1 changed files with 6 additions and 0 deletions
--- a/b.c
+++ b/b.c
@ -1105,6 +1105,12 @@ rescan:
 						if (!adjbuf((char **) &buf, &bufsz, bp-buf+1, 100, (char **) &bp, "relex2"))
 						    FATAL("out of space for reg expr %.10s...", lastre);
 						if (cc->cc_func(i)) {
+							/* escape backslash */
+							if (i == '\\') {
+								*bp++ = '\\';
+								n++;
+							}
+
 							*bp++ = i;
 							n++;
 						}