re PR testsuite/61453 (gfortran.dg/bind_c_array_params_2.f90 for targets where a...

2014-07-09  Dominique d'Humieres <dominiq@lps.ens.fr>

	PR testsuite/61453
	* gfortran.dg/gfortran.dg/bind_c_array_params_2.f90:
	Adjust regexp for more targets.

From-SVN: r212387

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 8db319205fcb5ca69378c7b716b6e17d10f86313..c02b10c1061f4f868574659e9c1aa24e30526e9e 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2014-07-09  Dominique d'Humieres <dominiq@lps.ens.fr>
+
+       PR testsuite/61453
+       * gfortran.dg/gfortran.dg/bind_c_array_params_2.f90:
+       Adjust regexp for more targets.
+
 2014-07-09  Andrew Sutton  <andrew.n.sutton@gmail.com>
            Paolo Carlini  <paolo.carlini@oracle.com>
 

diff --git a/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90 b/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
index 85ca709200feca8599679bee77bc67da6ed9cd48..8f0e77f7da7389540ca3109e80561904f3c5d5e9 100644 (file)
--- a/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
+++ b/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
@@ -16,7 +16,7 @@ integer :: aa(4,4)
 call test(aa)
 end
 
-! { dg-final { scan-assembler-times "call\[^\n\r\]*myBindC" 1 { target { ! { hppa*-*-hpux* } } } } }
-! { dg-final { scan-assembler-times "call\[^\n\r\]*myBindC,%r2" 1 { target { hppa*-*-hpux* } } } }
+! { dg-final { scan-assembler-times "\[ \t\]\[$,_0-9\]*myBindC" 1 { target { ! { hppa*-*-* } } } } }
+! { dg-final { scan-assembler-times "myBindC,%r2" 1 { target { hppa*-*-* } } } }
 ! { dg-final { scan-tree-dump-times "test \\\(&parm\\." 1 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }