From: Kaveh R. Ghazi Date: Sat, 29 Aug 2009 20:28:59 +0000 (+0000) Subject: whole_file_5.f90: Add -fpie when pic, fix scan pattern. X-Git-Tag: releases/gcc-4.5.0~3783 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8c53cbed4f3fa859afeb6a4189320013cdfc7c8f;p=thirdparty%2Fgcc.git whole_file_5.f90: Add -fpie when pic, fix scan pattern. * gfortran.dg/whole_file_5.f90: Add -fpie when pic, fix scan pattern. * gfortran.dg/whole_file_6.f90: Likewise. From-SVN: r151211 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 719e905c186d..12a11f3c60eb 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2009-08-29 Kaveh R. Ghazi + + * gfortran.dg/whole_file_5.f90: Add -fpie when pic, fix scan + pattern. + * gfortran.dg/whole_file_6.f90: Likewise. + 2009-08-28 Cary Coutant PR debug/41063 diff --git a/gcc/testsuite/gfortran.dg/whole_file_5.f90 b/gcc/testsuite/gfortran.dg/whole_file_5.f90 index 898b4e6848ec..07ba4411c4c2 100644 --- a/gcc/testsuite/gfortran.dg/whole_file_5.f90 +++ b/gcc/testsuite/gfortran.dg/whole_file_5.f90 @@ -1,5 +1,6 @@ ! { dg-do "compile" } ! { dg-options "-O3 -fwhole-file -fdump-tree-optimized" } +! { dg-options "-O3 -fwhole-file -fdump-tree-optimized -fpie" { target { ! nonpic } } } ! ! Check that inlining of functions declared BEFORE usage works. ! If yes, then the dump does not contain a call to F(). @@ -15,5 +16,5 @@ PROGRAM main print *, a END PROGRAM -! { dg-final { scan-tree-dump-times "= f\(\)" 0 "optimized" } } +! { dg-final { scan-tree-dump-times "= f \\(\\)" 0 "optimized" } } ! { dg-final { cleanup-tree-dump "optimized" } } diff --git a/gcc/testsuite/gfortran.dg/whole_file_6.f90 b/gcc/testsuite/gfortran.dg/whole_file_6.f90 index 157cfa115262..f903c7aefc5f 100644 --- a/gcc/testsuite/gfortran.dg/whole_file_6.f90 +++ b/gcc/testsuite/gfortran.dg/whole_file_6.f90 @@ -1,5 +1,6 @@ ! { dg-do "compile" } ! { dg-options "-O3 -fwhole-file -fdump-tree-optimized" } +! { dg-options "-O3 -fwhole-file -fdump-tree-optimized -fpie" { target { ! nonpic } } } ! ! Check that inlining of functions declared AFTER usage works. ! If yes, then the dump does not contain a call to F(). @@ -15,5 +16,5 @@ INTEGER FUNCTION f() f = 42.0 END FUNCTION -! { dg-final { scan-tree-dump-times "= f\(\)" 0 "optimized" } } +! { dg-final { scan-tree-dump-times "= f \\(\\)" 0 "optimized" } } ! { dg-final { cleanup-tree-dump "optimized" } }