diff options
| -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) { |