This fixes the assembler scan on hppa*-*-hpux*. Tested on hppa2.0w-hp-hpux11 and hppa64-hp-hpux11.11. Committed to trunk.
Dave -- J. David Anglin dave.ang...@nrc-cnrc.gc.ca National Research Council of Canada (613) 990-0752 (FAX: 952-6602) 2012-09-16 John David Anglin <dave.ang...@nrc-cnrc.gc.ca> * gfortran.dg/bind_c_array_params_2.f90: Adjust scan-assembler-times "myBindC" for hppa*-*-hpux*. Index: gfortran.dg/bind_c_array_params_2.f90 =================================================================== --- gfortran.dg/bind_c_array_params_2.f90 (revision 191314) +++ gfortran.dg/bind_c_array_params_2.f90 (working copy) @@ -15,6 +15,7 @@ call test(aa) end -! { dg-final { scan-assembler-times "myBindC" 1 } } +! { dg-final { scan-assembler-times "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" } }