Line 25... |
Line 25... |
load_file $srcdir/../../binutils/testsuite/lib/$name
|
load_file $srcdir/../../binutils/testsuite/lib/$name
|
}
|
}
|
|
|
load_common_lib binutils-common.exp
|
load_common_lib binutils-common.exp
|
|
|
|
# Returns 1 if the gcc for the target is at least version MAJOR.MINOR
|
|
# Returns 0 otherwise.
|
|
#
|
|
proc at_least_gcc_version { major minor } {
|
|
|
|
if {![info exists CC]} {
|
|
set CC [find_gcc]
|
|
}
|
|
if { $CC == "" } {
|
|
return 0
|
|
}
|
|
set state [remote_exec host $CC --version]
|
|
set tmp "[lindex $state 1]\n"
|
|
# Look for (eg) 4.6.1 in the version output.
|
|
regexp " .* (\[1-9\])\\.(\[0-9\])\\.\[0-9\]* .*" "$tmp" fred maj min
|
|
verbose "gcc version: $tmp"
|
|
verbose "major gcc version is $maj, want at least $major"
|
|
if { $maj == $major } then {
|
|
verbose "minor gcc version is $min, want at least $minor"
|
|
return [expr $min >= $minor ]
|
|
} else {
|
|
return [expr $maj > $major ]
|
|
}
|
|
}
|
|
|
# Extract and print the version number of ld.
|
# Extract and print the version number of ld.
|
#
|
#
|
proc default_ld_version { ld } {
|
proc default_ld_version { ld } {
|
global host_triplet
|
global host_triplet
|
|
|
Line 388... |
Line 413... |
if {[istarget mn10200*-*-*]} then {
|
if {[istarget mn10200*-*-*]} then {
|
append flags " --defsym __truncsipsi2_d0_d2=0"
|
append flags " --defsym __truncsipsi2_d0_d2=0"
|
}
|
}
|
|
|
# m6811/m6812 code has references to soft registers.
|
# m6811/m6812 code has references to soft registers.
|
if {[istarget m6811-*-*] || [istarget m6812-*-*]} {
|
if {[istarget m6811-*-*] || [istarget m6812-*-*] || [istarget m68hc1*-*-*]} {
|
append flags " --defsym _.frame=0 --defsym _.d1=0 --defsym _.d2=0"
|
append flags " --defsym _.frame=0 --defsym _.d1=0 --defsym _.d2=0"
|
append flags " --defsym _.d3=0 --defsym _.d4=0"
|
append flags " --defsym _.d3=0 --defsym _.d4=0"
|
append flags " --defsym _.tmp=0 --defsym _.xy=0 --defsym _.z=0"
|
append flags " --defsym _.tmp=0 --defsym _.xy=0 --defsym _.z=0"
|
}
|
}
|
|
|
Line 962... |
Line 987... |
# verbose -log "actions is $actions"
|
# verbose -log "actions is $actions"
|
# verbose -log "binfile is $binfile"
|
# verbose -log "binfile is $binfile"
|
|
|
# Assemble each file in the test.
|
# Assemble each file in the test.
|
foreach src_file $src_files {
|
foreach src_file $src_files {
|
set objfile "tmpdir/[file rootname $src_file].o"
|
set fileroot "[file rootname [file tail $src_file]]"
|
|
set objfile "tmpdir/$fileroot.o"
|
lappend objfiles $objfile
|
lappend objfiles $objfile
|
|
|
if { [file extension $src_file] == ".c" } {
|
if { [file extension $src_file] == ".c" } {
|
set as_file "tmpdir/[file rootname $src_file].s"
|
set as_file "tmpdir/$fileroot.s"
|
if ![ld_compile "$CC -S $CFLAGS $cflags" $srcdir/$subdir/$src_file $as_file] {
|
if ![ld_compile "$CC -S $CFLAGS $cflags" $srcdir/$subdir/$src_file $as_file] {
|
set is_unresolved 1
|
set is_unresolved 1
|
break
|
break
|
}
|
}
|
} else {
|
} else {
|
Line 1160... |
Line 1186... |
# verbose -log "actions is $actions"
|
# verbose -log "actions is $actions"
|
# verbose -log "binfile is $binfile"
|
# verbose -log "binfile is $binfile"
|
|
|
# Assemble each file in the test.
|
# Assemble each file in the test.
|
foreach src_file $src_files {
|
foreach src_file $src_files {
|
set objfile "tmpdir/[file rootname $src_file].o"
|
set fileroot "[file rootname [file tail $src_file]]"
|
|
set objfile "tmpdir/$fileroot.o"
|
lappend objfiles $objfile
|
lappend objfiles $objfile
|
|
|
# We ignore warnings since some compilers may generate
|
# We ignore warnings since some compilers may generate
|
# incorrect section attributes and the assembler will warn
|
# incorrect section attributes and the assembler will warn
|
# them.
|
# them.
|
Line 1282... |
Line 1309... |
set is_unresolved 0
|
set is_unresolved 0
|
set failed 0
|
set failed 0
|
|
|
# Compile each file in the test.
|
# Compile each file in the test.
|
foreach src_file $src_files {
|
foreach src_file $src_files {
|
set objfile "tmpdir/[file rootname $src_file].o"
|
set fileroot "[file rootname [file tail $src_file]]"
|
|
set objfile "tmpdir/$fileroot.o"
|
lappend objfiles $objfile
|
lappend objfiles $objfile
|
|
|
# We ignore warnings since some compilers may generate
|
# We ignore warnings since some compilers may generate
|
# incorrect section attributes and the assembler will warn
|
# incorrect section attributes and the assembler will warn
|
# them.
|
# them.
|
Line 1472... |
Line 1500... |
&& ![istarget ip2k-*-*]
|
&& ![istarget ip2k-*-*]
|
&& ![istarget iq2000-*-*]
|
&& ![istarget iq2000-*-*]
|
&& ![istarget lm32-*-*]
|
&& ![istarget lm32-*-*]
|
&& ![istarget m32c-*-*]
|
&& ![istarget m32c-*-*]
|
&& ![istarget m32r-*-*]
|
&& ![istarget m32r-*-*]
|
|
&& ![istarget m6811-*-*]
|
|
&& ![istarget m6812-*-*]
|
&& ![istarget m68hc1*-*-*]
|
&& ![istarget m68hc1*-*-*]
|
&& ![istarget mcore*-*-*]
|
&& ![istarget mcore*-*-*]
|
&& ![istarget mep-*-*]
|
&& ![istarget mep-*-*]
|
&& ![istarget microblaze-*-*]
|
&& ![istarget microblaze-*-*]
|
&& ![istarget mn10200-*-*]
|
&& ![istarget mn10200-*-*]
|