char_cast_2.f90: Adjust count in scanning the tree dump file.

	* gfortran.dg/char_cast_2.f90: Adjust count in scanning the tree
	dump file.

From-SVN: r135574

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index aed54cb0b9d4bb95e3d20ce15656bd2fecd6d55f..e6f83dd0a0bb9bdc0de006ed0402316ea7378eb1 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2008-05-19  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
+
+       * gfortran.dg/char_cast_2.f90: Adjust count in scanning the tree
+       dump file.
+
 2008-05-19  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 
        * gfortran.dg/bind_c_module.f90: Adjust expected error messages.

diff --git a/gcc/testsuite/gfortran.dg/char_cast_2.f90 b/gcc/testsuite/gfortran.dg/char_cast_2.f90
index 39566dac5e659c048a3819fab270ed4ee7fd3c86..4c175bd0fd79c22ec169f6cfe114ab11a5600f3f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/char_cast_2.f90
+++ b/gcc/testsuite/gfortran.dg/char_cast_2.f90
@@ -19,8 +19,8 @@ contains
     return
   end function Up
 end
-! The sign that all is well is that [S.5][1] appears five times.
+! The sign that all is well is that [S.5][1] appears twice.
 ! Platform dependent variations are [S$5][1], [__S_5][1], [S___5][1]
 ! so we count the occurrences of 5][1].
-! { dg-final { scan-tree-dump-times "5\\\]\\\[1\\\]" 5 "original" } }
+! { dg-final { scan-tree-dump-times "5\\\]\\\[1\\\]" 2 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }