From: Andre Vehreschild <vehre@gcc.gnu.org>
Date: Thu, 20 Aug 2020 15:50:16 +0000 (+0200)
Subject: Fix obvious typo were errmsg_len was assigned to errmsg.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=05814dde7024a8fa05a735cafcda72b5eb5ec0c0;p=gcc.git

Fix obvious typo were errmsg_len was assigned to errmsg.

gcc/fortran/ChangeLog:

2020-08-20  Andre Vehreschild  <vehre@gcc.gnu.org>

	PR fortran/94958
	* trans-array.c (gfc_bcast_alloc_comp): Use the correct variable.
---

diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c
index 7a1b2fc74c9..73a45cd2dcf 100644
--- a/gcc/fortran/trans-array.c
+++ b/gcc/fortran/trans-array.c
@@ -9732,7 +9732,7 @@ gfc_bcast_alloc_comp (gfc_symbol *derived, gfc_expr *expr, int rank,
   args.image_index = image_index;
   args.stat = stat;
   args.errmsg = errmsg;
-  args.errmsg = errmsg_len;
+  args.errmsg_len = errmsg_len;
 
   if (rank == 0)
     {