aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/frontend-passes.c
diff options
context:
space:
mode:
authorThomas Koenig <tkoenig@gcc.gnu.org>2016-01-24 18:15:08 +0000
committerThomas Koenig <tkoenig@gcc.gnu.org>2016-01-24 18:15:08 +0000
commita220f43d1154946c71a2208bd13fa10c945fcef5 (patch)
treeef6a9e37716b28358a2394980a9419f4f4deba3e /gcc/fortran/frontend-passes.c
parenta59b92b0c723fd0fdf646660a68bc786fede4b61 (diff)
downloadgcc-a220f43d1154946c71a2208bd13fa10c945fcef5.zip
gcc-a220f43d1154946c71a2208bd13fa10c945fcef5.tar.gz
gcc-a220f43d1154946c71a2208bd13fa10c945fcef5.tar.bz2
re PR fortran/66094 (Handle transpose(A) in inline matmul)
2016-01-24 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/66094 * frontend-passes.c (matmul_lhs_realloc): Add forgotten break statement. From-SVN: r232779
Diffstat (limited to 'gcc/fortran/frontend-passes.c')
-rw-r--r--gcc/fortran/frontend-passes.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/frontend-passes.c b/gcc/fortran/frontend-passes.c
index 340fd6e..76edbae 100644
--- a/gcc/fortran/frontend-passes.c
+++ b/gcc/fortran/frontend-passes.c
@@ -2251,6 +2251,7 @@ matmul_lhs_realloc (gfc_expr *c, gfc_expr *a, gfc_expr *b,
get_array_inq_function (GFC_ISYM_SIZE, c, 2),
get_array_inq_function (GFC_ISYM_SIZE, b, 1));
cond = build_logical_expr (INTRINSIC_OR, ne1, ne2);
+ break;
case A2B1:
ar->start[0] = get_array_inq_function (GFC_ISYM_SIZE, a, 1);