diff options
Diffstat (limited to 'ld/testsuite/config/default.exp')
| -rw-r--r-- | ld/testsuite/config/default.exp | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/ld/testsuite/config/default.exp b/ld/testsuite/config/default.exp index 33cc19d..899943c 100644 --- a/ld/testsuite/config/default.exp +++ b/ld/testsuite/config/default.exp @@ -114,26 +114,6 @@ if { [istarget rx-*-*] } { # load the utility procedures load_lib ld-lib.exp -proc get_link_files {varname} { - global $varname - global target_triplet - global srcdir - global CC - if ![info exists $varname] { - #configure.host returns variables that can be substituted into - #makefile rules, with embedded shell variable expansions. - #make wants $$shell_var, we want $shell_var ... - set cmd "host='$target_triplet' && . $srcdir/../configure.host && sed -e 's,\\\$\\\$,\$,g' <<EOF\n\$$varname\nEOF" - set status [catch "exec sh -c [list $cmd]" result] - if $status { error "Error getting native link files: $result" } - set cmd "CC='$CC' && eval echo \"$result\"" - set status [catch "exec sh -c [list $cmd]" result] - if $status { error "Error getting native link files: $result" } - set $varname $result - send_log "$varname = $result\n" - } -} - proc get_target_emul {} { global target_triplet global srcdir @@ -142,13 +122,6 @@ proc get_target_emul {} { return $result } -if [isnative] { - foreach x {HOSTING_CRT0 HOSTING_SCRT0 HOSTING_LIBS HOSTING_SLIBS} { - get_link_files $x - } -} else { - foreach x {HOSTING_CRT0 HOSTING_SCRT0 HOSTING_LIBS HOSTING_SLIBS} { set $x "" } -} if ![info exists HOSTING_EMU] { set HOSTING_EMU "-m [get_target_emul]" } # @@ -190,14 +163,6 @@ proc ld_link { ld target objects } { } # -# ld_simple_link -# link a program using ld, without including any libraries -# -proc ld_simple_link { ld target objects } { - default_ld_simple_link $ld $target $objects -} - -# # ld_compile # compile an object using $cc # |