Is the following patch OK for trunk?

2014-07-05  Dominique d'Humieres <domi...@lps.ens.fr>

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

--- ../_clean/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90       
2014-05-24 16:17:53.000000000 +0200
+++ gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90 2014-05-29 
11:34:40.000000000 +0200
@@ -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*-*-hpux* } } } } }
+! { dg-final { scan-assembler-times "\[ \t\]\[$,_0-9\]*myBindC,%r2" 1 { target 
{ hppa*-*-hpux* } } } }
 ! { dg-final { scan-tree-dump-times "test \\\(&parm\\." 1 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }

Reply via email to