URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Go to most recent revision |
Show entire file |
Details |
Blame |
View Log
Rev 93 |
Rev 95 |
Line 33... |
Line 33... |
#! @param[in] config The or1ksim config file to use
|
#! @param[in] config The or1ksim config file to use
|
#! @param[in] or1kprog The program image to use on libprog
|
#! @param[in] or1kprog The program image to use on libprog
|
#! @param[in] args Any other arguments
|
#! @param[in] args Any other arguments
|
# -----------------------------------------------------------------------------
|
# -----------------------------------------------------------------------------
|
proc run_libsim { testname match_list libprog config or1kprog args } {
|
proc run_libsim { testname match_list libprog config or1kprog args } {
|
global error_spawn_id
|
|
global spawn_id
|
|
global verbose
|
global verbose
|
global env
|
global srcdir
|
|
global objdir
|
|
|
# Construct the config filename or use the default
|
# Construct the config filename or use the default
|
if {0 == [string length $config]} {
|
if {0 == [string length $config]} {
|
set config "default.cfg";
|
set config "default.cfg";
|
}
|
}
|
|
|
set libprog_name "./test-code/$libprog"
|
set libprog_name "$objdir/test-code/$libprog"
|
set config_name "$env(srcdir)/libsim.tests/$config";
|
set config_name "$srcdir/libsim.tests/$config";
|
set or1kprog_name "./test-code-or1k/$or1kprog"
|
set or1kprog_name "$objdir/test-code-or1k/$or1kprog"
|
|
|
set command_line "$libprog_name $config_name $or1kprog_name $args"
|
set command_line "$libprog_name $config_name $or1kprog_name $args"
|
|
|
if { $verbose > 1 } {
|
if { $verbose > 1 } {
|
send_user "starting $command_line\n"
|
send_user "starting $command_line\n"
|
Line 91... |
Line 90... |
return
|
return
|
}
|
}
|
|
|
timeout {
|
timeout {
|
perror "Timeout";
|
perror "Timeout";
|
fail "$testname: timeout";
|
unresolved "$testname: timeout";
|
return
|
return
|
}
|
}
|
}
|
}
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.