From c19358ee50e6f553142d9424bed72738856049ff Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 22 Oct 1986 13:36:22 +0000 Subject: [PATCH] Bug fix involving '\\'. --- util/LLgen/src/tokens.g | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/util/LLgen/src/tokens.g b/util/LLgen/src/tokens.g index be7d17e57..321a9de80 100644 --- a/util/LLgen/src/tokens.g +++ b/util/LLgen/src/tokens.g @@ -115,7 +115,6 @@ scanner() { register int ch; /* Current char */ register char *p = ltext; int reserved = 0; /* reserved word? */ - int last; /* Char before current char */ char *max = <ext[LTEXTSZ - 1]; if (ch = savedtok.t_tokno) { @@ -138,13 +137,16 @@ scanner() { switch(c_class[ch]) { case ISLIT : for (;;) { - last = ch; ch = input(); if (ch == '\n' || ch == EOF) { error(linecount,"missing '"); break; } - if (ch == '\'' && last != '\\') break; + if (ch == '\'') break; + if (ch == '\\') { + *p++ = ch; + ch = input(); + } *p++ = ch; if (p > max) p--; } -- 2.34.1