git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

static_linking_1.f: Fix static_libgfortran processing. 

2005-11-11  Andreas Tobler  <a.tobler@schweiz.ch>

	* gfortran.dg/static_linking_1.f: Fix static_libgfortran processing.

	* lib/target-supports.exp (check_effective_target_static_libgfortran):
	Add -static to additional_flags and pass it to target_compile.

From-SVN: r106800
This commit is contained in:
Andreas Tobler 2005-11-11 22:41:55 +01:00 committed by Andreas Tobler
parent 21df8673c5
commit 5bd9e94d23
3 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,10 @@
2005-11-11 Andreas Tobler <a.tobler@schweiz.ch>
* gfortran.dg/static_linking_1.f: Fix static_libgfortran processing.
* lib/target-supports.exp (check_effective_target_static_libgfortran):
Add -static to additional_flags and pass it to target_compile.
2005-11-11 Jerry DeLisle <jvdelisle@gcc.gnu.org> 2005-11-11 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/24719 PR libgfortran/24719

2
gcc/testsuite/gfortran.dg/static_linking_1.f
View File

@ -1,5 +1,5 @@
! { dg-require-effective-target static_libgfortran }
! { dg-do run } ! { dg-do run }
! { dg-require-effective-target static_libgfortran }
! { dg-additional-sources static_linking_1.c } ! { dg-additional-sources static_linking_1.c }
! { dg-options "-static" } ! { dg-options "-static" }
! !

3
gcc/testsuite/lib/target-supports.exp
View File

@ -634,6 +634,7 @@ proc check_effective_target_static_libgfortran { } {
# Set up, compile, and execute a test program using static linking. # Set up, compile, and execute a test program using static linking.
# Include the current process ID in the file names to prevent # Include the current process ID in the file names to prevent
# conflicts with invocations for multiple testsuites. # conflicts with invocations for multiple testsuites.
set opts "additional_flags=-static"
set src static[pid].f set src static[pid].f
set exe static[pid].x set exe static[pid].x
@ -643,7 +644,7 @@ proc check_effective_target_static_libgfortran { } {
close $f close $f
verbose "check_effective_target_static_libgfortran compiling testfile $src" 2 verbose "check_effective_target_static_libgfortran compiling testfile $src" 2
set lines [${tool}_target_compile $src $exe executable "-static"] set lines [${tool}_target_compile $src $exe executable "$opts"]
file delete $src file delete $src
if [string match "" $lines] then { if [string match "" $lines] then {