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

Fixed preprocessor problem with empty macro bodies

Browse Source
This commit is contained in:
ceriel 1991-02-21 12:08:13 +00:00
parent a9f739b35d
commit b0471ef883
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lang/cem/cemcom.ansi/replace.c
View File

@ -171,7 +171,9 @@ expand_macro(repl, idf)
three tokens: + + ID. Therefore a token separator is
inserted after the replacement.
*/
if (*(repl->r_ptr - 1) != TOKSEP) add2repl(repl, TOKSEP);
if (repl->r_text == repl->r_ptr || *(repl->r_ptr - 1) != TOKSEP) {
add2repl(repl, TOKSEP);
}
return 1;
}
@ -665,7 +667,7 @@ macro2buffer(repl, idf, args)
while (*q)
add2repl(repl, *q++);
if (*(repl->r_ptr - 1) != TOKSEP)
if (repl->r_text == repl->r_ptr || *(repl->r_ptr - 1) != TOKSEP)
add2repl(repl, TOKSEP);
} else {
add2repl(repl, *ptr++);

6
lang/cem/cpp.ansi/replace.c
View File

@ -160,7 +160,9 @@ expand_macro(repl, idf)
three tokens: + + ID. Therefore a token separator is
inserted after the replacement.
*/
if (*(repl->r_ptr -1) != TOKSEP) add2repl(repl, TOKSEP);
if (repl->r_text == repl->r_ptr || *(repl->r_ptr -1) != TOKSEP) {
add2repl(repl, TOKSEP);
}
return 1;
}
@ -651,7 +653,7 @@ macro2buffer(repl, idf, args)
while (*q)
add2repl(repl, *q++);
if (*(repl->r_ptr-1) != TOKSEP)
if (repl->r_text == repl->r_ptr || *(repl->r_ptr-1) != TOKSEP)
add2repl(repl, TOKSEP);
} else {
add2repl(repl, *ptr++);