diff options
Diffstat (limited to 'gcc/fortran/symbol.c')
| -rw-r--r-- | gcc/fortran/symbol.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/fortran/symbol.c b/gcc/fortran/symbol.c index 57811f25484..acae453e72c 100644 --- a/gcc/fortran/symbol.c +++ b/gcc/fortran/symbol.c @@ -905,9 +905,8 @@ gfc_add_procedure (symbol_attribute * attr, procedure_type t, if (attr->proc != PROC_UNKNOWN) { - gfc_error ("%s procedure at %L is already %s %s procedure", + gfc_error ("%s procedure at %L is already declared as %s procedure", gfc_code2string (procedures, t), where, - gfc_article (gfc_code2string (procedures, attr->proc)), gfc_code2string (procedures, attr->proc)); return FAILURE; |
