diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2021-06-10 09:31:06 +0200 |
|---|---|---|
| committer | Jakub Jelinek <jakub@redhat.com> | 2021-06-10 09:31:06 +0200 |
| commit | 7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2 (patch) | |
| tree | 1ab2f5f42ab6d9f49bfcf942ad2d5197770d1b81 | |
| parent | 2d2ed777b23ab6503027039e0adbfe1162f52b2f (diff) | |
| download | gcc-7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2.zip gcc-7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2.tar.gz gcc-7d19a50ea1e5e9858bb7cd258fa4f9db89ecfcb2.tar.bz2 | |
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.
| -rw-r--r-- | libgomp/testsuite/libgomp.fortran/pr100981-2.f90 | 2 |
1 files changed, 2 insertions, 0 deletions
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)) |