* lib/sim-defs.exp (run_sim_test): Add global_as_options,

global_ld_options, and global_sim_options to all test cases, if
defined.
This commit is contained in:
DJ Delorie 2004-09-13 20:54:03 +00:00
parent 362646f517
commit a3ef5243fb
2 changed files with 22 additions and 3 deletions

View file

@ -1,3 +1,9 @@
2004-09-13 DJ Delorie <dj@redhat.com>
* lib/sim-defs.exp (run_sim_test): Add global_as_options,
global_ld_options, and global_sim_options to all test cases, if
defined.
2004-05-12 Ben Elliston <bje@au.ibm.com>
* lib/sim-defs.exp: Remove stray semicolons.

View file

@ -165,6 +165,9 @@ proc run_sim_test { name requested_machs } {
global SIMFLAGS
global opts
global cpu_option
global global_as_options
global global_ld_options
global global_sim_options
if [string match "*/*" $name] {
set file $name
@ -187,6 +190,16 @@ proc run_sim_test { name requested_machs } {
set opts(timeout) ""
set opts(xerror) "no"
if ![info exists global_as_options] {
set global_as_options ""
}
if ![info exists global_ld_options] {
set global_ld_options ""
}
if ![info exists global_sim_options] {
set global_sim_options ""
}
# Clear any machine specific options specified in a previous test case
foreach m $requested_machs {
if [info exists opts(as,$m)] {
@ -250,7 +263,7 @@ proc run_sim_test { name requested_machs } {
if [info exists cpu_option] {
set as_options "$as_options $cpu_option=$mach"
}
set comp_output [target_assemble $sourcefile ${name}.o "$as_options"]
set comp_output [target_assemble $sourcefile ${name}.o "$as_options $global_as_options"]
if ![string match "" $comp_output] {
verbose -log "$comp_output" 3
@ -262,7 +275,7 @@ proc run_sim_test { name requested_machs } {
set opts(ld,$mach) $opts(ld)
}
set comp_output [target_link ${name}.o ${name}.x "$opts(ld,$mach)"]
set comp_output [target_link ${name}.o ${name}.x "$opts(ld,$mach) $global_ld_options"]
if ![string match "" $comp_output] {
verbose -log "$comp_output" 3
@ -281,7 +294,7 @@ proc run_sim_test { name requested_machs } {
set options "$options timeout=$opts(timeout)"
}
set result [sim_run ${name}.x "$opts(sim,$mach)" "" "" "$options"]
set result [sim_run ${name}.x "$opts(sim,$mach) $global_sim_options" "" "" "$options"]
set status [lindex $result 0]
set output [lindex $result 1]