load_lib sim-defs.exp
-global AS
-if ![info exists AS] {
- set AS [findfile $base_dir/../../gas/as-new $base_dir/../../gas/as-new \
- [transform as]]
-}
-
-global ASFLAGS
-if ![info exists ASFLAGS] {
- set ASFLAGS ""
-}
-
-# Compilation is achieved with sim_compile ... so we don't check $CC here.
-
-global CFLAGS
-if ![info exists CFLAGS] {
- set CFLAGS ""
-}
-
-global LD
-if ![info exists LD] {
- set LD [findfile $base_dir/../../ld/ld-new $base_dir/../../ld/ld-new \
- [transform ld]]
-}
-
-global LDFLAGS
-if ![info exists LDFLAGS] {
- set LDFLAGS ""
-}
-
-# The path to the simulator is obtained with [board_info host sim],
-# so we don't check $SIM here.
-
-global SIMFLAGS
-if ![info exists SIMFLAGS] {
- set SIMFLAGS ""
-}
-
sim_init
# simulator (not the simulated program, the simulator) with sim_load.
proc sim_run { prog sim_opts prog_opts redir options } {
- global SIMFLAGS
-
# Set the default value of the timeout.
# FIXME: The timeout value we actually want is a function of
# host, target, and testcase.
set cmd "$prog"
}
- send_log "$sim $always_opts $SIMFLAGS $sim_opts $cmd $prog_opts\n"
+ send_log "$sim $always_opts $sim_opts $cmd $prog_opts\n"
if { "$redir" == "" } {
- remote_spawn host "$sim $always_opts $SIMFLAGS $sim_opts $cmd $prog_opts"
+ remote_spawn host "$sim $always_opts $sim_opts $cmd $prog_opts"
} else {
- remote_spawn host "$sim $always_opts $SIMFLAGS $sim_opts $cmd $prog_opts $redir" writeonly
+ remote_spawn host "$sim $always_opts $sim_opts $cmd $prog_opts $redir" writeonly
}
set result [remote_wait host $testcase_timeout]
proc run_sim_test { name requested_machs } {
global subdir srcdir
- global SIMFLAGS
global opts
global cpu_option
global cpu_option_sep