removed bug for identifiers starting with L

This commit is contained in:
eck 1989-10-24 15:06:23 +00:00
parent 9286928275
commit d186cb605f

View file

@ -233,11 +233,12 @@ preprocess(fn)
} }
continue; continue;
case STELL: case STELL:
c = GetChar();
UnGetChar();
if (c == '"' || c == '\'') { if (c == '"' || c == '\'') {
echo(c); echo('L');
continue; continue;
} }
UnGetChar();
c = 'L'; c = 'L';
case STIDF: { case STIDF: {
extern int idfsize; /* ??? */ extern int idfsize; /* ??? */