godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

improved domacro when NOPP defined

Browse Source
This commit is contained in:
eck
1989-10-24 15:02:02 +00:00
parent 451259712d
commit ed8602e247
2 changed files with 6 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lang/cem/cemcom.ansi/domacro.c
View File

@@ -720,19 +720,15 @@ domacro()
EoiForNewline = 1;
if ((tok = GetToken(&tk)) == IDENTIFIER) {
if (! strcmp(tk.tk_idf->id_text, "line")) {
tok = GetToken(&tk);
if (tok == INTEGER) {
do_line((unsigned int) tk.tk_ival);
EoiForNewline = 0;
return;
}
}
else if (! strcmp(tk.tk_idf->id_text, "pragma")) {
if (! strcmp(tk.tk_idf->id_text, "pragma")) {
do_pragma();
EoiForNewline = 0;
return;
}
} else if (tok == INTEGER) {
do_line((unsigned int) tk.tk_ival);
EoiForNewline = 0;
return;
}
error("illegal # line");
EoiForNewline = 0;