aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gcc/ChangeLog7
-rw-r--r--gcc/cpplex.c44
2 files changed, 36 insertions, 15 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 5eb9f2b..5830c4c 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,12 @@
2000-07-14 Neil Booth <NeilB@earthling.net>
+ * cpplex.c (adjust_column): New funcion.
+ (skip_whitespace): Use it.
+ (skip_block_comment): Use it, and warn about /*/* with
+ -Wcomments.
+
+2000-07-14 Neil Booth <NeilB@earthling.net>
+
* cpphash.c (struct macro_info): Add new members.
(_cpp_free_definition): Delete the macro directly.
(count_params): Return void, with first token of
diff --git a/gcc/cpplex.c b/gcc/cpplex.c
index 6c40173..fa5b638 100644
--- a/gcc/cpplex.c
+++ b/gcc/cpplex.c
@@ -114,6 +114,7 @@ static const unsigned char *backslash_start PARAMS ((cpp_reader *,
const unsigned char *));
static int skip_block_comment PARAMS ((cpp_reader *));
static int skip_line_comment PARAMS ((cpp_reader *));
+static void adjust_column PARAMS ((cpp_reader *, const U_CHAR *));
static void skip_whitespace PARAMS ((cpp_reader *, int));
static const U_CHAR *parse_name PARAMS ((cpp_reader *, cpp_token *,
const U_CHAR *, const U_CHAR *));
@@ -906,15 +907,8 @@ skip_block_comment (pfile)
{
cpp_buffer *buffer = pfile->buffer;
const unsigned char *char_after_star = 0;
- register const unsigned char *cur = buffer->cur;
- int seen_eof = 0;
+ const unsigned char *cur = buffer->cur;
- /* Inner loop would think the comment has ended if the first comment
- character is a '/'. Avoid this and keep the inner loop clean by
- skipping such a character. */
- if (cur < buffer->rlimit && cur[0] == '/')
- cur++;
-
for (; cur < buffer->rlimit; )
{
unsigned char c = *cur++;
@@ -923,8 +917,13 @@ skip_block_comment (pfile)
'/' instead for efficiency. */
if (c == '/')
{
- if (cur[-2] == '*' || cur - 1 == char_after_star)
- goto out;
+ /* Don't view / then * then / as finishing the comment. */
+ if ((cur[-2] == '*' && cur - 1 > buffer->cur)
+ || cur - 1 == char_after_star)
+ {
+ buffer->cur = cur;
+ return 0;
+ }
/* Warn about potential nested comments, but not when
the final character inside the comment is a '/'.
@@ -948,12 +947,12 @@ skip_block_comment (pfile)
else
char_after_star = 0;
}
+ else if (c == '\t')
+ adjust_column (pfile, cur - 1);
}
- seen_eof = 1;
- out:
buffer->cur = cur;
- return seen_eof;
+ return 1;
}
/* Skip a C++ line comment. Handles escaped newlines. Returns
@@ -986,6 +985,22 @@ skip_line_comment (pfile)
return multiline;
}
+/* TAB points to a \t character. Update col_adjust so we track the
+ column correctly. */
+static void
+adjust_column (pfile, tab)
+ cpp_reader *pfile;
+ const U_CHAR *tab;
+{
+ /* Zero-based column. */
+ unsigned int col = CPP_BUF_COLUMN (pfile->buffer, tab);
+
+ /* Round it up to multiple of the tabstop, but subtract 1 since the
+ tab itself occupies a character position. */
+ pfile->col_adjust += (CPP_OPTION (pfile, tabstop)
+ - col % CPP_OPTION (pfile, tabstop)) - 1;
+}
+
/* Skips whitespace, stopping at next non-whitespace character.
Adjusts pfile->col_adjust to account for tabs. This enables tokens
to be assigned the correct column. */
@@ -1010,8 +1025,7 @@ skip_whitespace (pfile, in_directive)
if (c == ' ')
continue;
else if (c == '\t')
- pfile->col_adjust += CPP_OPTION (pfile, tabstop) - 1
- - (CPP_BUF_COL (buffer) - 1) % CPP_OPTION(pfile, tabstop);
+ adjust_column (pfile, buffer->cur - 1);
/* Must be \f \v or \0. */
else if (c == '\0')
{