diff options
| author | pthomas <pthomas@138bc75d-0d04-0410-961f-82ee72b054a4> | 2002-02-04 15:58:51 +0000 |
|---|---|---|
| committer | pthomas <pthomas@138bc75d-0d04-0410-961f-82ee72b054a4> | 2002-02-04 15:58:51 +0000 |
| commit | 1ff4e7e1b21a19deece7f5a48e94f207df647363 (patch) | |
| tree | 2a725c3e5bd80811f13876c72691a5330fe4fd70 /gcc/f/lex.c | |
| parent | 64f977d69ca562b907fbb7264d2792f3699d8fb8 (diff) | |
| download | gcc-1ff4e7e1b21a19deece7f5a48e94f207df647363.tar.gz | |
2002-02-04 Philipp Thomas <pthomas@suse.de>
* bad.def com.c expr.c implic.c lex.c stb.c ste.c stu.c:
Insert comments to mark messages as not being printf style
where appropriate.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@49477 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/f/lex.c')
| -rw-r--r-- | gcc/f/lex.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/f/lex.c b/gcc/f/lex.c index acbb4d336c7..ddca27013d9 100644 --- a/gcc/f/lex.c +++ b/gcc/f/lex.c @@ -269,6 +269,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) case 'x': if (warn_traditional) { + /* xgettext:no-c-format */ ffebad_start_msg_lex ("The meaning of `\\x' (at %0) varies with -traditional", FFEBAD_severityWARNING); ffelex_bad_here_ (0, line, column); @@ -319,6 +320,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) case 'a': if (warn_traditional) { + /* xgettext:no-c-format */ ffebad_start_msg_lex ("The meaning of `\\a' (at %0) varies with -traditional", FFEBAD_severityWARNING); ffelex_bad_here_ (0, line, column); @@ -348,6 +350,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) m[0] = c; m[1] = '\0'; + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Non-ISO-C-standard escape sequence `\\%A' at %0", FFEBAD_severityPEDANTIC); ffelex_bad_here_ (0, line, column); @@ -366,6 +369,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) m[0] = c; m[1] = '\0'; + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Unknown escape sequence `\\%A' at %0", FFEBAD_severityPEDANTIC); ffelex_bad_here_ (0, line, column); @@ -374,6 +378,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) } else if (c == EOF) { + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Unterminated escape sequence `\\' at %0", FFEBAD_severityPEDANTIC); ffelex_bad_here_ (0, line, column); @@ -384,6 +389,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) char m[20]; sprintf (&m[0], "%x", c); + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Unknown escape sequence `\\' followed by char code 0x%A at %0", FFEBAD_severityPEDANTIC); ffelex_bad_here_ (0, line, column); @@ -411,6 +417,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) if (! nonnull) { + /* xgettext:no-c-format */ ffebad_start_msg_lex ("\\x used at %0 with no following hex digits", FFEBAD_severityFATAL); ffelex_bad_here_ (0, line, column); @@ -424,6 +431,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) && ((1 << (TYPE_PRECISION (integer_type_node) - (count - 1) * 4)) <= (int) firstdig))) { + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Hex escape at %0 out of range", FFEBAD_severityPEDANTIC); ffelex_bad_here_ (0, line, column); @@ -457,6 +465,7 @@ ffelex_backslash_ (int c, ffewhereColumnNumber col) && TYPE_PRECISION (char_type_node) < HOST_BITS_PER_INT && code >= (1 << TYPE_PRECISION (char_type_node))) { + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Escape sequence at %0 out of range for character", FFEBAD_severityFATAL); ffelex_bad_here_ (0, line, column); @@ -1462,6 +1471,7 @@ ffelex_image_char_ (int c, ffewhereColumnNumber column) ffelex_bad_line_ = TRUE; strcpy (&ffelex_card_image_[column], "[\\0]"); ffelex_card_length_ = column + 4; + /* xgettext:no-c-format */ ffebad_start_msg_lex ("Null character at %0 -- line ignored", FFEBAD_severityFATAL); ffelex_bad_here_ (0, ffelex_linecount_current_, column + 1); |