summaryrefslogtreecommitdiff
path: root/gcc/f/expr.c
diff options
context:
space:
mode:
authorpthomas <pthomas@138bc75d-0d04-0410-961f-82ee72b054a4>2002-02-04 15:58:51 +0000
committerpthomas <pthomas@138bc75d-0d04-0410-961f-82ee72b054a4>2002-02-04 15:58:51 +0000
commit1ff4e7e1b21a19deece7f5a48e94f207df647363 (patch)
tree2a725c3e5bd80811f13876c72691a5330fe4fd70 /gcc/f/expr.c
parent64f977d69ca562b907fbb7264d2792f3699d8fb8 (diff)
downloadgcc-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/expr.c')
-rw-r--r--gcc/f/expr.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/f/expr.c b/gcc/f/expr.c
index 63a3a419ff3..1772727bd85 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));