aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/matchexp.c
diff options
context:
space:
mode:
authorTobias Burnus <burnus@net-b.de>2014-12-13 00:12:06 +0100
committerTobias Burnus <burnus@gcc.gnu.org>2014-12-13 00:12:06 +0100
commita4d9b2212cbf2912387c215da744c217de80f5d2 (patch)
tree142ed494ce58fe546f97386fe9da7a4610d92270 /gcc/fortran/matchexp.c
parent33948765f16435febf518b9ce4843b4b1e386677 (diff)
downloadgcc-a4d9b2212cbf2912387c215da744c217de80f5d2.zip
gcc-a4d9b2212cbf2912387c215da744c217de80f5d2.tar.gz
gcc-a4d9b2212cbf2912387c215da744c217de80f5d2.tar.bz2
error.c (gfc_error): Add variant which takes a va_list.
2014-12-13 Tobias Burnus <burnus@net-b.de> Manuel López-Ibáñez <manu@gcc.gnu.org> fortran/ * error.c (gfc_error): Add variant which takes a va_list. (gfc_notify_std): Convert to common diagnostic. * array.c: Use %qs, %<...%> in more gfc_error calls and for gfc_notify_std. * check.c: Ditto. * data.c: Ditto. * decl.c: Ditto. * expr.c: Ditto. * interface.c: Ditto. * intrinsic.c: Ditto. * io.c: Ditto. * match.c: Ditto. * matchexp.c: Ditto. * module.c: Ditto. * openmp.c: Ditto. * parse.c: Ditto. * primary.c: Ditto. * resolve.c: Ditto. * simplify.c: Ditto. * symbol.c: Ditto. * trans-common.c: Ditto. * trans-intrinsic.c: Ditto. gcc/testsuite/ * gfortran.dg/realloc_on_assign_21.f90: Update dg-error. * gfortran.dg/warnings_are_errors_1.f: Ditto. * gfortran.dg/warnings_are_errors_1.f90: Ditto. Co-Authored-By: Manuel López-Ibáñez <manu@gcc.gnu.org> From-SVN: r218694
Diffstat (limited to 'gcc/fortran/matchexp.c')
-rw-r--r--gcc/fortran/matchexp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/matchexp.c b/gcc/fortran/matchexp.c
index 1320b96..303dee1 100644
--- a/gcc/fortran/matchexp.c
+++ b/gcc/fortran/matchexp.c
@@ -69,7 +69,7 @@ gfc_match_defined_op_name (char *result, int error_flag)
for (i = 0; name[i]; i++)
if (!ISALPHA (name[i]))
{
- gfc_error ("Bad character '%c' in OPERATOR name at %C", name[i]);
+ gfc_error ("Bad character %<%c%> in OPERATOR name at %C", name[i]);
return MATCH_ERROR;
}
@@ -77,7 +77,7 @@ gfc_match_defined_op_name (char *result, int error_flag)
return MATCH_YES;
error:
- gfc_error ("The name '%s' cannot be used as a defined operator at %C",
+ gfc_error ("The name %qs cannot be used as a defined operator at %C",
name);
gfc_current_locus = old_loc;