From: Jakub Jelinek <jakub@redhat.com>
Date: Thu, 10 Jun 2021 07:31:06 +0000 (+0200)
Subject: testsuite: Fix up libgomp.fortran/pr100981-2.f90 testcase [PR100981]
X-Git-Tag: upstream/12.2.0~7342
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2;p=platform%2Fupstream%2Fgcc.git

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.
---

diff --git a/libgomp/testsuite/libgomp.fortran/pr100981-2.f90 b/libgomp/testsuite/libgomp.fortran/pr100981-2.f90
index 12836d4..9814224 100644
--- a/libgomp/testsuite/libgomp.fortran/pr100981-2.f90
+++ b/libgomp/testsuite/libgomp.fortran/pr100981-2.f90
@@ -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))