aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran
diff options
context:
space:
mode:
authorThomas Koenig <tkoenig@gcc.gnu.org>2014-08-21 18:52:58 +0000
committerThomas Koenig <tkoenig@gcc.gnu.org>2014-08-21 18:52:58 +0000
commitdc2c36fd935fd50c97bb03b5e3e2a9683f4271d1 (patch)
treed2feca75137109dcc3c7499ef05fa489724d21c9 /gcc/fortran
parent4e502930574c9980ae53fd204090c9e39b0265bd (diff)
downloadgcc-dc2c36fd935fd50c97bb03b5e3e2a9683f4271d1.zip
gcc-dc2c36fd935fd50c97bb03b5e3e2a9683f4271d1.tar.gz
gcc-dc2c36fd935fd50c97bb03b5e3e2a9683f4271d1.tar.bz2
re PR fortran/62214 (Problem with spread plus concatenation for characters)
2014-08-21 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/62214 * frontend-passes.c (optimize_binop_array_assignment): Do not try to optimize the array assignment for string concatenation. 2014-08-21 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/62214 * gfortran.dg/array_assignment_5.f90: New test. From-SVN: r214281
Diffstat (limited to 'gcc/fortran')
-rw-r--r--gcc/fortran/ChangeLog7
-rw-r--r--gcc/fortran/frontend-passes.c4
2 files changed, 11 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 91330ff..fcb4a7b 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2014-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
+
+ PR fortran/62214
+ * frontend-passes.c (optimize_binop_array_assignment):
+ Do not try to optimize the array assignment for string
+ concatenation.
+
2014-08-21 Manuel López-Ibáñez <manu@gcc.gnu.org>
PR fortran/44054
diff --git a/gcc/fortran/frontend-passes.c b/gcc/fortran/frontend-passes.c
index edf6348..23a8ece 100644
--- a/gcc/fortran/frontend-passes.c
+++ b/gcc/fortran/frontend-passes.c
@@ -903,6 +903,10 @@ optimize_binop_array_assignment (gfc_code *c, gfc_expr **rhs, bool seen_op)
return true;
break;
+ case INTRINSIC_CONCAT:
+ /* Do not do string concatenations. */
+ break;
+
default:
/* Binary operators. */
if (optimize_binop_array_assignment (c, &e->value.op.op1, true))