* 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:
parent
362646f517
commit
a3ef5243fb
2 changed files with 22 additions and 3 deletions
|
@ -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.
|
||||
|
|
|
@ -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]
|
||||
|
||||
|
|
Loading…
Reference in a new issue