> bl myBindC > jsr myBindC > bl myBindC
Is this for the same target, or for 3 different ones? which one(s)? Does the following patch fixes the problem? --- ../_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-25 20:38:18.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 "\[ \t\]_*myBindC,%r2" 1 { target { hppa*-*-hpux* } } } } ! { dg-final { scan-tree-dump-times "test \\\(&parm\\." 1 "original" } } ! { dg-final { cleanup-tree-dump "original" } } TIA Dominique