* lib/g77.exp (g77_target_compile): Fix multilibs for libf2c.

From-SVN: r17818
This commit is contained in:
H.J. Lu 1998-02-09 22:54:34 +00:00 committed by Jeff Law
parent 2fd0af53a1
commit b45f3a91b9
2 changed files with 11 additions and 0 deletions

View File

@ -1,5 +1,8 @@
Mon Feb 9 02:08:47 1998 H.J. Lu (hjl@gnu.org)
* lib/g77.exp (g77_target_compile): Fix multilibs for libf2c.
* lib/old-dejagnu.exp (old-dejagnu): Added the
"execution test - XFAIL *-*-*" handling in the spirit of
"excess errors test -". Changed the "execution test fails"

View File

@ -141,6 +141,14 @@ proc g77_target_compile { source dest type options } {
if [target_info exists g77,no_varargs] {
lappend options "additional_flags=-DNO_VARARGS"
}
if ![is_remote host] {
set gccpath "[get_multilibs]"
set libf2c_dir [lookfor_file ${gccpath} libf2c/libf2c.a]
if { $libf2c_dir != "" } {
set libf2c_link_flags "-L[file dirname ${libf2c_dir}]"
lappend options "additional_flags=${libf2c_link_flags}"
}
}
lappend options "compiler=$G77_UNDER_TEST"
return [target_compile $source $dest $type $options]
}