From f18fee823bb765b1efab04025d28fcf9315fb80b Mon Sep 17 00:00:00 2001 From: "Steven G. Kargl" Date: Sat, 20 Jan 2018 06:15:55 +0000 Subject: re PR fortran/83900 (ICE in gfc_simplify_matmul, at fortran/simplify.c:4593) 2018-01-19 Steven G. Kargl PR fortran/83900 * simplify.c (gfc_simplify_matmul): Delete bogus assertion. 2018-01-19 Steven G. Kargl PR fortran/83900 * gfortran.dg/matmul_17.f90: New test. From-SVN: r256912 --- gcc/fortran/simplify.c | 1 - 1 file changed, 1 deletion(-) (limited to 'gcc/fortran/simplify.c') diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index b7c6b02..0c48e7c 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -4590,7 +4590,6 @@ gfc_simplify_matmul (gfc_expr *matrix_a, gfc_expr *matrix_b) || !is_constant_array_expr (matrix_b)) return NULL; - gcc_assert (gfc_compare_types (&matrix_a->ts, &matrix_b->ts)); result = gfc_get_array_expr (matrix_a->ts.type, matrix_a->ts.kind, &matrix_a->where); -- cgit v1.1