diff options
| -rw-r--r-- | ld/testsuite/lib/ld.exp | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/ld/testsuite/lib/ld.exp b/ld/testsuite/lib/ld.exp index 1a63b68..0121c0d 100644 --- a/ld/testsuite/lib/ld.exp +++ b/ld/testsuite/lib/ld.exp @@ -106,9 +106,13 @@ proc default_ld_compile { cc source object } { global CFLAGS global srcdir global subdir - - if {[which $cc] == 0} then { - perror "$cc does not exist" + + set cc_prog $cc + if {[llength $cc_prog] > 1} then { + set cc_prog [lindex $cc_prog 0] + } + if {[which $cc_prog] == 0} then { + perror "$cc_prog does not exist" return 0 } |