diff options
author | Tobias Burnus <burnus@net-b.de> | 2015-12-09 20:29:46 +0100 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2015-12-09 20:29:46 +0100 |
commit | 811582ec147f4eb722b75578faba4a94c5cfd829 (patch) | |
tree | 6aca1041926ede1a67f736435d11018ecdd9644e /gcc/fortran/decl.c | |
parent | 1326155711cd4af6bdbf347b51e2a7337cf07414 (diff) | |
download | gcc-811582ec147f4eb722b75578faba4a94c5cfd829.zip gcc-811582ec147f4eb722b75578faba4a94c5cfd829.tar.gz gcc-811582ec147f4eb722b75578faba4a94c5cfd829.tar.bz2 |
re PR fortran/68815 (Error/warning diagnostic: '%s' should be converted to %qs-like or %<%s%>-like string strings)
2015-12-09 Tobias Burnus <burnus@net-b.de>
PR fortran/68815
* decl.c (gfc_verify_c_interop_param, variable_decl): Use
%< ... %> for quoting in diagnostics.
* io.c (check_format): Ditto.
* resolve.c (resolve_operator): Ditto.
* symbol.c (check_conflict): Ditto.
* trans-common.c (translate_common): Ditto.
From-SVN: r231472
Diffstat (limited to 'gcc/fortran/decl.c')
-rw-r--r-- | gcc/fortran/decl.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c index bff23e1..b03dadf 100644 --- a/gcc/fortran/decl.c +++ b/gcc/fortran/decl.c @@ -1194,7 +1194,7 @@ gfc_verify_c_interop_param (gfc_symbol *sym) if (sym->as != NULL && sym->as->type == AS_ASSUMED_SHAPE && !gfc_notify_std (GFC_STD_F2008_TS, "Assumed-shape array %qs " "at %L as dummy argument to the BIND(C) " - "procedure '%s' at %L", sym->name, + "procedure %qs at %L", sym->name, &(sym->declared_at), sym->ns->proc_name->name, &(sym->ns->proc_name->declared_at))) @@ -2023,9 +2023,9 @@ variable_decl (int elem) if (sym != NULL && (sym->attr.dummy || sym->attr.result)) { m = MATCH_ERROR; - gfc_error ("'%s' at %C is a redefinition of the declaration " + gfc_error ("%qs at %C is a redefinition of the declaration " "in the corresponding interface for MODULE " - "PROCEDURE '%s'", sym->name, + "PROCEDURE %qs", sym->name, gfc_current_ns->proc_name->name); goto cleanup; } |