cppfiles.c (read_and_prescan): When emitting deferred newlines...

2000-02-13   Neil Booth  <NeilB@earthling.net>

	* cppfiles.c (read_and_prescan): When emitting deferred
	newlines, test speccase[] again instead	of checking each
	possible whitespace character in turn.  When we encounter \r,
	look behind for \n first, then ahead.

From-SVN: r31963
This commit is contained in:
Neil Booth 2000-02-14 06:31:20 +00:00 committed by Zack Weinberg
parent 4eadede7c1
commit 67b8719a74
2 changed files with 13 additions and 5 deletions

View File

@ -1,3 +1,10 @@
2000-02-13 Neil Booth <NeilB@earthling.net>
* cppfiles.c (read_and_prescan): When emitting deferred
newlines, test speccase[] again instead of checking each
possible whitespace character in turn. When we encounter \r,
look behind for \n first, then ahead.
2000-02-13 Zack Weinberg <zack@wolery.cumb.org>
* cse.c (cse_altered): New internal flag.

View File

@ -904,8 +904,9 @@ read_and_prescan (pfile, fp, desc, len)
memcpy (op, ip, span);
op += span;
ip += span;
if (*ip == '\n' || *ip == '\t'
|| *ip == ' ' || *ip == ' ')
/* If ip[0] is SPECCASE_EMPTY, we have hit white space.
Dump out the remaining deferred \-newlines. */
if (speccase[ip[0]] == SPECCASE_EMPTY)
while (deferred_newlines)
deferred_newlines--, *op++ = '\r';
span = 0;
@ -924,15 +925,15 @@ read_and_prescan (pfile, fp, desc, len)
goto read_next;
case SPECCASE_CR: /* \r */
if (*ip == '\n')
if (ip[-2] == '\n')
continue;
else if (*ip == '\n')
ip++;
else if (*ip == '\0')
{
*--ibase = '\r';
goto read_next;
}
else if (ip[-2] == '\n')
continue;
*op++ = '\n';
break;