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

[Jakub Jelinek]

https://gcc.gnu.org/g:7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2

commit r12-1355-g7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2
Author: Jakub Jelinek <jakub@redhat.com>
Date:   Thu Jun 10 09:31:06 2021 +0200

    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:
---
 libgomp/testsuite/libgomp.fortran/pr100981-2.f90 | 2 ++
 1 file changed, 2 insertions(+)

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