[Patch, testsuite] PR61453 gfortran.dg/bind_c_array_params_2.f90 for targets where a call insn isn't "call"

Dominique Dhumieres dominiq@lps.ens.fr
Sun Jul 6 09:22:00 GMT 2014


> On hppa, the ",%r2" uniquely identifies the call.  The test passes
> with -flto.

Then is the following patch OK for hppa*-*-*?

+++ gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90	2014-07-05 22:20:49.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\]_*myBindC" 1 { target { ! { hppa*-*-hpux* } } } } }
+! { dg-final { scan-assembler-times "myBindC,%r2" 1 { target { hppa*-*-hpux* } } } }
 ! { dg-final { scan-tree-dump-times "test \\\(&parm\\." 1 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }

Dominique



More information about the Fortran mailing list