diff options
author | Maciej W. Rozycki <macro@embecosm.com> | 2023-12-12 13:09:45 +0000 |
---|---|---|
committer | Jacob Bachmeyer <jcb@gnu.org> | 2023-12-12 20:45:59 -0600 |
commit | 34d6720bb9371ad885f8e642a77d869929db15d6 (patch) | |
tree | 0045e036e9f283cc945c9ec9750f569b41abc78e | |
parent | 4d924d484a06e8b463fff966297f87a1eabc21bd (diff) | |
download | dejagnu-34d6720bb9371ad885f8e642a77d869929db15d6.zip dejagnu-34d6720bb9371ad885f8e642a77d869929db15d6.tar.gz dejagnu-34d6720bb9371ad885f8e642a77d869929db15d6.tar.bz2 |
Set `testcase_timeout' earlier on in `gdb_comm_load'
Move the setting of `testcase_timeout' earlier on in `gdb_comm_load'.
It will be needed for reporting later on. No semantics change.
* config/gdb-comm.exp (gdb_comm_load): Set `testcase_timeout'
earlier on.
-rw-r--r-- | config/gdb-comm.exp | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/config/gdb-comm.exp b/config/gdb-comm.exp index fca0bbb..909bb69 100644 --- a/config/gdb-comm.exp +++ b/config/gdb-comm.exp @@ -267,6 +267,13 @@ proc gdb_comm_load { dest prog args } { return [list "untested" ""] } + # FIXME: The value 300 below should be a parameter. + if {[board_info $dest exists testcase_timeout]} { + set testcase_timeout [board_info $dest testcase_timeout] + } else { + set testcase_timeout 300 + } + if { [isremote host] || ![board_info host exists fileid] } { gdb_comm_start $dest } @@ -414,12 +421,6 @@ proc gdb_comm_load { dest prog args } { } else { remote_send host "run\n" } - # FIXME: The value 300 below should be a parameter. - if {[board_info $dest exists testcase_timeout]} { - set testcase_timeout [board_info $dest testcase_timeout] - } else { - set testcase_timeout 300 - } remote_expect host $testcase_timeout { -re "Line.*Jump anyway.*.y or n.*" { remote_send host "y\n" |