some fixes, f.i. process # in actual parameter list
This commit is contained in:
@@ -16,12 +16,17 @@ skipspaces(ch, skipnl)
|
||||
/* skipspaces() skips any white space and returns the first
|
||||
non-space character.
|
||||
*/
|
||||
register int nlseen = 0;
|
||||
|
||||
for (;;) {
|
||||
while (class(ch) == STSKIP)
|
||||
while (class(ch) == STSKIP) {
|
||||
nlseen = 0;
|
||||
LoadChar(ch);
|
||||
}
|
||||
if (skipnl && class(ch) == STNL) {
|
||||
LoadChar(ch);
|
||||
++LineNumber;
|
||||
nlseen++;
|
||||
continue;
|
||||
}
|
||||
/* How about "\\\n"????????? */
|
||||
@@ -36,7 +41,13 @@ skipspaces(ch, skipnl)
|
||||
return '/';
|
||||
}
|
||||
}
|
||||
else
|
||||
else if (nlseen && ch == '#') {
|
||||
domacro();
|
||||
LoadChar(ch);
|
||||
/* ch is the first character of a line. This means
|
||||
* that nlseen will still be true.
|
||||
*/
|
||||
} else
|
||||
return ch;
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user