re PR fortran/46020 (Improve error string for BIND(C) diagnostic for len>1 character...

2018-11-02  Thomas Koenig  <tkoenig@gcc.gnu.org>

    PR fortran/46020
    * decl.c (verify_bind_c_sym): Remove unnecessary space
    in error message.

From-SVN: r265757

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 134c43db644a2566b91dcb5357ecd3f33f75fc4f..689c754e4ebfe93b4bc7a4cd6294e562cceab5bc 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2018-11-02  Thomas Koenig  <tkoenig@gcc.gnu.org>
+
+       PR fortran/46020
+       * decl.c (verify_bind_c_sym): Remove unnecessary space
+       in error message.
+
 2018-11-01  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
        PR fortran/87782

diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c
index 47c939ca85ee3f4682edef28587d56a751311db6..2b77d950abb216c881b1cd1d36160268b7009943 100644 (file)
--- a/gcc/fortran/decl.c
+++ b/gcc/fortran/decl.c
@@ -5648,7 +5648,7 @@ verify_bind_c_sym (gfc_symbol *tmp_sym, gfc_typespec *ts,
            || tmp_sym->ts.u.cl->length->expr_type != EXPR_CONSTANT
            || mpz_cmp_si (tmp_sym->ts.u.cl->length->value.integer, 1) != 0)
          gfc_error ("Return type of BIND(C) function %qs of character "
-                    "type at %L must have length 1 ", tmp_sym->name,
+                    "type at %L must have length 1", tmp_sym->name,
                         &(tmp_sym->declared_at));
     }