re PR fortran/85938 (Spurious assert failure for matmul with reshaped array)

2018-06-02  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR fortran/85938
	* gfortran.dg/pr85938.f90: Fixed by revision r261081

From-SVN: r261125
This commit is contained in:
Steven G. Kargl 2018-06-03 05:23:59 +00:00
parent 432e70af3e
commit 12193bf1b0
2 changed files with 14 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2018-06-02 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/85938
* gfortran.dg/pr85938.f90: Fixed by revision r261081
2018-06-02 Eric Botcazou <ebotcazou@adacore.com>
* gnat.dg/specs/opt3.ads: New test.

View File

@ -0,0 +1,9 @@
! { dg-do run }
! PR fortran/85938
program foo
real a(9), b(3)
integer :: n = 3
a = 1.0
b = 1.0
if (any(matmul(reshape(A, (/ n, n /)), b) /= 3.)) stop 1
end program