diff options
author | Andre Vehreschild <vehre@gcc.gnu.org> | 2020-08-20 17:50:16 +0200 |
---|---|---|
committer | Andre Vehreschild <vehre@gcc.gnu.org> | 2020-08-20 17:50:39 +0200 |
commit | 05814dde7024a8fa05a735cafcda72b5eb5ec0c0 (patch) | |
tree | 4386a60c334add62131e03dea5506f1febd594d9 /gcc/fortran/trans-array.c | |
parent | 91d206adfe39ce063f6a5731b92a03c05e82e94a (diff) | |
download | gcc-05814dde7024a8fa05a735cafcda72b5eb5ec0c0.zip gcc-05814dde7024a8fa05a735cafcda72b5eb5ec0c0.tar.gz gcc-05814dde7024a8fa05a735cafcda72b5eb5ec0c0.tar.bz2 |
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.
Diffstat (limited to 'gcc/fortran/trans-array.c')
-rw-r--r-- | gcc/fortran/trans-array.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index 7a1b2fc..73a45cd 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) { |