Commit 8c53cbed by Kaveh R. Ghazi Committed by Kaveh Ghazi

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
parent 6401164d
2009-08-29 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* 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 <ccoutant@google.com> 2009-08-28 Cary Coutant <ccoutant@google.com>
PR debug/41063 PR debug/41063
......
! { dg-do "compile" } ! { dg-do "compile" }
! { dg-options "-O3 -fwhole-file -fdump-tree-optimized" } ! { 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. ! Check that inlining of functions declared BEFORE usage works.
! If yes, then the dump does not contain a call to F(). ! If yes, then the dump does not contain a call to F().
...@@ -15,5 +16,5 @@ PROGRAM main ...@@ -15,5 +16,5 @@ PROGRAM main
print *, a print *, a
END PROGRAM 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" } } ! { dg-final { cleanup-tree-dump "optimized" } }
! { dg-do "compile" } ! { dg-do "compile" }
! { dg-options "-O3 -fwhole-file -fdump-tree-optimized" } ! { 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. ! Check that inlining of functions declared AFTER usage works.
! If yes, then the dump does not contain a call to F(). ! If yes, then the dump does not contain a call to F().
...@@ -15,5 +16,5 @@ INTEGER FUNCTION f() ...@@ -15,5 +16,5 @@ INTEGER FUNCTION f()
f = 42.0 f = 42.0
END FUNCTION 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" } } ! { dg-final { cleanup-tree-dump "optimized" } }
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment