re PR fortran/84354 (Replace '%qs' with %qs in fortran/decl.c)

2018-02-16  Dominique d'Humieres <dominiq@gcc.gnu.org>

	PR fortran/84354
	* decl.c (gfc_get_pdt_instance): Replace '%qs' with %qs.

From-SVN: r257750

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 481004e..1c06bfd 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2018-02-16  Dominique d'Humieres <dominiq@gcc.gnu.org>
+
+       PR fortran/84354
+       * decl.c (gfc_get_pdt_instance): Replace '%qs' with %qs.
+
 2018-02-15  Janus Weil  <janus@gcc.gnu.org>
 
        PR fortran/84409

diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c
index 307caa2..e275be3 100644 (file)
--- a/gcc/fortran/decl.c
+++ b/gcc/fortran/decl.c
@@ -3302,7 +3302,7 @@ gfc_get_pdt_instance (gfc_actual_arglist *param_list, gfc_symbol **sym,
                kind_expr = gfc_copy_expr (c1->initializer);
              else if (!(actual_param && param->attr.pdt_len))
                {
-                 gfc_error ("The derived parameter '%qs' at %C does not "
+                 gfc_error ("The derived parameter %qs at %C does not "
                             "have a default value", param->name);
                  goto error_return;
                }
@@ -3362,14 +3362,14 @@ gfc_get_pdt_instance (gfc_actual_arglist *param_list, gfc_symbol **sym,
          && (actual_param->spec_type == SPEC_ASSUMED
              || actual_param->spec_type == SPEC_DEFERRED))
        {
-         gfc_error ("The KIND parameter '%qs' at %C cannot either be "
+         gfc_error ("The KIND parameter %qs at %C cannot either be "
                     "ASSUMED or DEFERRED", param->name);
          goto error_return;
        }
 
       if (!kind_expr || !gfc_is_constant_expr (kind_expr))
        {
-         gfc_error ("The value for the KIND parameter '%qs' at %C does not "
+         gfc_error ("The value for the KIND parameter %qs at %C does not "
                     "reduce to a constant expression", param->name);
          goto error_return;
        }