From 92df1544e933bf75b598eee7de7b5b7770f0d2ca Mon Sep 17 00:00:00 2001 From: Jan Hubicka Date: Tue, 14 Sep 2010 18:27:15 +0200 Subject: [PATCH] fast-math-pr38968.f90: Add common to prevent folding. * gfortran.dg/vect/fast-math-pr38968.f90: Add common to prevent folding. From-SVN: r164282 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/vect/fast-math-pr38968.f90 | 1 + 2 files changed, 6 insertions(+) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e7877fb7d25..14904a89a71 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2010-09-14 Jan Hubicka + + * gfortran.dg/vect/fast-math-pr38968.f90: Add common to prevent + folding. + 2010-09-14 Jakub Jelinek PR middle-end/45567 diff --git a/gcc/testsuite/gfortran.dg/vect/fast-math-pr38968.f90 b/gcc/testsuite/gfortran.dg/vect/fast-math-pr38968.f90 index 29fafdb7f2e..e009f7105e1 100644 --- a/gcc/testsuite/gfortran.dg/vect/fast-math-pr38968.f90 +++ b/gcc/testsuite/gfortran.dg/vect/fast-math-pr38968.f90 @@ -10,6 +10,7 @@ program mymatmul complex(kp), dimension(n,n) :: a,b,c real :: t1, t2 integer :: i, j, k + common // a,b,c do j = 1, n do k = 1, n -- 2.30.2