diff options
author | Philipp Thomas <pthomas@suse.de> | 2002-02-04 15:58:51 +0000 |
---|---|---|
committer | Philipp Thomas <pthomas@gcc.gnu.org> | 2002-02-04 15:58:51 +0000 |
commit | 5987ca1c3806cf5e6d829ba2a92961499aea2da0 (patch) | |
tree | 2a725c3e5bd80811f13876c72691a5330fe4fd70 /gcc/f/expr.c | |
parent | f3e9edff6a370713067611836309c614a7a6b66a (diff) | |
download | gcc-5987ca1c3806cf5e6d829ba2a92961499aea2da0.zip gcc-5987ca1c3806cf5e6d829ba2a92961499aea2da0.tar.gz gcc-5987ca1c3806cf5e6d829ba2a92961499aea2da0.tar.bz2 |
bad.def [...]: Insert comments to mark messages as not being printf style where appropriate.
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.
From-SVN: r49477
Diffstat (limited to 'gcc/f/expr.c')
-rw-r--r-- | gcc/f/expr.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/f/expr.c b/gcc/f/expr.c index 63a3a41..1772727 100644 --- a/gcc/f/expr.c +++ b/gcc/f/expr.c @@ -9609,6 +9609,7 @@ ffeexpr_exprstack_push_unary_ (ffeexprExpr_ e) <= FFEEXPR_operatorprecedenceLOWARITH_) && (e->u.operator.prec <= FFEEXPR_operatorprecedenceLOWARITH_)) { + /* xgettext:no-c-format */ ffebad_start_msg ("Two arithmetic operators in a row at %0 and %1 -- use parentheses", ffe_is_pedantic () ? FFEBAD_severityPEDANTIC @@ -9658,6 +9659,7 @@ ffeexpr_exprstack_push_binary_ (ffeexprExpr_ e) && (e->u.operator.prec < ffeexpr_stack_->exprstack->previous->u.operator.prec)) { + /* xgettext:no-c-format */ ffebad_start_msg ("Operator at %0 has lower precedence than that at %1 -- use parentheses", FFEBAD_severityWARNING); ffebad_here (0, ffelex_token_where_line (ffeexpr_stack_->exprstack->previous->token), @@ -10518,6 +10520,7 @@ ffeexpr_reduced_eqop2_ (ffebld reduced, ffeexprExpr_ l, ffeexprExpr_ op, if ((lbt == FFEINFO_basictypeLOGICAL) && (rbt == FFEINFO_basictypeLOGICAL)) { + /* xgettext:no-c-format */ if (ffebad_start_msg ("Use .EQV./.NEQV. instead of .EQ./.NE. at %0 for LOGICAL operands at %1 and %2", FFEBAD_severityFATAL)) { @@ -10888,6 +10891,7 @@ ffeexpr_reduced_power_ (ffebld reduced, ffeexprExpr_ l, ffeexprExpr_ op, } if (rkt == FFEINFO_kindtypeINTEGER4) { + /* xgettext:no-c-format */ ffebad_start_msg ("Unsupported operand for ** at %1 -- converting to default INTEGER", FFEBAD_severityWARNING); ffebad_here (0, ffelex_token_where_line (r->token), ffelex_token_where_column (r->token)); |