Add missing closing parenthises in error message.

2020-02-23  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/93889
	* interface.c (compare_parameter): Fix error message.

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 5f889fb312091183b937d987c5794d7653e9c6ac..1ed6a97366e9d40431dba9ec95aedf62fb43bdaf 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2020-02-23  Thomas Koenig  <tkoenig@gcc.gnu.org>
+
+       PR fortran/93889
+       * interface.c (compare_parameter): Fix error message.
+
 2020-02-23  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
        PR fortran/93890

diff --git a/gcc/fortran/interface.c b/gcc/fortran/interface.c
index 4106fe5831b3de7811e461e9619830dea453a567..14d03c27759d2b86858d23f4d41859b5b8a9a48d 100644 (file)
--- a/gcc/fortran/interface.c
+++ b/gcc/fortran/interface.c
@@ -2223,7 +2223,7 @@ argument_rank_mismatch (const char *name, locus *where,
                       where, where_formal, rank1);
       else
        gfc_error_opt (0, "Rank mismatch between actual argument at %L "
-                      "and actual argument at %L (rank-%d and rank-%d", where,
+                      "and actual argument at %L (rank-%d and rank-%d)", where,
                       where_formal, rank1, rank2);
     }
 }