On Mon, 5 May 2014, Dominique Dhumieres wrote:
> With the following patch, gfortran can be regtested with -flto
> with no failure, but pr54852 and pr60061.
>
> OK for trunk?
>
> Dominique
>
> 2014-05-05 Dominique d'Humieres <domi...@lps.ens.fr>
>
> * gfortran.dg/gfortran.dg/bind_c_array_params_2.f90:
> Adjust regexp for -flto.
> * gfortran.dg/gfortran.dg/pr48636-2.f90: Likewise.
> * gfortran.dg/pr52835.f90: Likewise.
>
> --- ../_clean/gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90
> 2013-01-25 09:57:48.000000000 +0100
> +++ gcc/testsuite/gfortran.dg/bind_c_array_params_2.f90 2014-02-04
> 19:24:06.000000000 +0100
> @@ -16,7 +16,7 @@ integer :: aa(4,4)
> call test(aa)
> end
>
> -! { dg-final { scan-assembler-times "myBindC" 1 { target { ! { hppa*-*-hpux*
> } } } } }
> -! { dg-final { scan-assembler-times "myBindC,%r2" 1 { target { hppa*-*-hpux*
> } } } }
> +! { 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-tree-dump-times "test \\\(&parm\\." 1 "original" } }
> ! { dg-final { cleanup-tree-dump "original" } }
No, the related subroutine call instruction does not include the
string "call" for *all* targets, so this now regressed this test
everywhere else. ISTR there being a better recipe to deal with
LTO in this situation, but I'll leave the grepping to you.
I opened PR61453 for this.
brgds, H-P
