testsuite: Fix up libgomp.fortran/pr100981-2.f90 testcase [PR100981]

The dsdotr and dsdoti variables uninitialized and the testcase fails e.g.
on i686-linux.  Fixed by zero initialization.

2021-06-10  Jakub Jelinek  <jakub@redhat.com>

	PR tree-optimization/100981
	* testsuite/libgomp.fortran/pr100981-2.f90 (cdcdot): Initialize
	dsdotr and dsdoti to 0.
This commit is contained in:
Jakub Jelinek 2021-06-10 09:31:06 +02:00
parent 2d2ed777b2
commit 7d19a50ea1

View file

@ -9,6 +9,8 @@ complex function cdcdot(n, cx)
double precision :: dsdotr, dsdoti, dt1, dt3
kx = 1
dsdotr = 0
dsdoti = 0
do i = 1, n
dt1 = real(cx(kx))
dt3 = aimag(cx(kx))