diff options
Diffstat (limited to 'gcc/fortran/data.c')
| -rw-r--r-- | gcc/fortran/data.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/data.c b/gcc/fortran/data.c index 5d0651e..8e072ee 100644 --- a/gcc/fortran/data.c +++ b/gcc/fortran/data.c @@ -324,7 +324,7 @@ gfc_assign_data_value (gfc_expr *lvalue, gfc_expr *rvalue, mpz_t index, > LOCATION_LINE (rvalue->where.lb->location)) ? con->expr : rvalue; if (gfc_notify_std (GFC_STD_GNU, - "re-initialization of '%s' at %L", + "re-initialization of %qs at %L", symbol->name, &exprd->where) == false) return false; } @@ -490,7 +490,7 @@ gfc_assign_data_value (gfc_expr *lvalue, gfc_expr *rvalue, mpz_t index, > LOCATION_LINE (rvalue->where.lb->location)) ? init : rvalue; if (gfc_notify_std (GFC_STD_GNU, - "re-initialization of '%s' at %L", + "re-initialization of %qs at %L", symbol->name, &expr->where) == false) return false; } |