Fix Fortran DO loop fallback

	* gfortran.dg/ldist-1.f90: Revert change introduces in r238114.
	* gfortran.dg/vect/pr62283.f: Add -fno-ipa-icf to additional
	options.
	* gfortran.dg/pr42108.f90: Update expected dump scan.

From-SVN: r238300

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 92a7cb63ebf94000091af9a939ce7b321085c702..321957e9e9a0f84f43428eafe455686b6ce80c1a 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2016-07-13  Martin Liska  <mliska@suse.cz>
+
+       * gfortran.dg/ldist-1.f90: Revert change introduces in r238114.
+       * gfortran.dg/vect/pr62283.f: Add -fno-ipa-icf to additional
+       options.
+       * gfortran.dg/pr42108.f90: Update expected dump scan.
+
 2016-07-13  Richard Biener  <rguenther@suse.de>
 
        PR tree-optimization/24574

diff --git a/gcc/testsuite/gfortran.dg/ldist-1.f90 b/gcc/testsuite/gfortran.dg/ldist-1.f90
index 203032859b53ff502fc2d69d4e7aaafc4948366b..ea3990d12b4456b9916c85dfaec791db7966e6b8 100644 (file)
--- a/gcc/testsuite/gfortran.dg/ldist-1.f90
+++ b/gcc/testsuite/gfortran.dg/ldist-1.f90
@@ -32,4 +32,4 @@ end Subroutine PADEC
 ! There are 5 legal partitions in this code.  Based on the data
 ! locality heuristic, this loop should not be split.
 
-! { dg-final { scan-tree-dump "distributed: split to" "ldist" } }
+! { dg-final { scan-tree-dump-not "distributed: split to" "ldist" } }

diff --git a/gcc/testsuite/gfortran.dg/pr42108.f90 b/gcc/testsuite/gfortran.dg/pr42108.f90
index eb93604e6b035973b0a1c74059f3ad0a7b470be3..a913aa4fafbe686815d2f2abca4ec6e28695d2d5 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pr42108.f90
+++ b/gcc/testsuite/gfortran.dg/pr42108.f90
@@ -21,7 +21,5 @@ subroutine  eval(foo1,foo2,foo3,foo4,x,n,nnd)
   end do
 end subroutine eval
 
-! We should have hoisted the division
-! { dg-final { scan-tree-dump "in all uses of countm1\[^\n\]* / " "pre" } }
 ! There should be only one load from n left
 ! { dg-final { scan-tree-dump-times "\\*n_" 1 "fre1" } }

diff --git a/gcc/testsuite/gfortran.dg/vect/pr62283.f b/gcc/testsuite/gfortran.dg/vect/pr62283.f
index 7df3d997664109b92ef22e51974e55964902b726..4d8cba18ab644cae9aa41e01612d0f22e13d11a4 100644 (file)
--- a/gcc/testsuite/gfortran.dg/vect/pr62283.f
+++ b/gcc/testsuite/gfortran.dg/vect/pr62283.f
@@ -1,5 +1,5 @@
 C { dg-do compile }
-C { dg-additional-options "-fvect-cost-model=dynamic" }
+C { dg-additional-options "-fvect-cost-model=dynamic -fno-ipa-icf" }
       subroutine test2(x,y)
       real x(4),y(4)
       beta=3.141593