d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Did not handle quotes in C comments right

Browse source
This commit is contained in:
ceriel 1990-08-23 15:53:13 +00:00
parent 97d1275cfe
commit 8401d7b9ec
1 changed files with 1 additions and 28 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
util/LLgen/src/gencode.c
View file

@ -749,16 +749,14 @@ getaction(flag) {
* flag = 1 if it is an action, * flag = 1 if it is an action,
* 0 when reading parameters * 0 when reading parameters
*/ */
register int match,ch; register int ch;
register FILE *f; register FILE *f;
register int newline;
int mark = 0; int mark = 0;
if (flag == 1) { if (flag == 1) {
controlline(); controlline();
} }
f = fpars; f = fpars;
newline = 0;
for (;;) { for (;;) {
ch = gettok(); ch = gettok();
switch(ch) { switch(ch) {
@ -770,37 +768,12 @@ getaction(flag) {
if (mark) return; if (mark) return;
mark = 1; mark = 1;
continue; continue;
case '\n':
newline = 1;
break;
case '\'' :
case '"' :
if (newline) {
newline = 0;
}
match = ch;
for (;;) {
putc(ch,f);
ch = getc(fact);
if (ch == match || !ch) break;
if (ch == '\\') {
putc(ch,f);
ch = getc(fact);
}
}
break;
case IDENT : case IDENT :
if (newline) {
newline = 0;
}
fputs(ltext,f); fputs(ltext,f);
continue; continue;
} }
mark = 0; mark = 0;
if (ch == ENDDECL) break; if (ch == ENDDECL) break;
if (newline && ch != '\n') {
newline = 0;
}
putc(ch,f); putc(ch,f);
} }
if (flag) fputs("\n",f); if (flag) fputs("\n",f);