aboutsummaryrefslogtreecommitdiff
path: root/runtest.exp
diff options
context:
space:
mode:
authorBen Elliston <bje@gnu.org>2016-02-17 04:28:23 +1100
committerBen Elliston <bje@gnu.org>2016-02-17 04:28:23 +1100
commit20e8dfb5d2cc2f63f654460543e9e65bb1323b9e (patch)
treea75a490cbaa0e87175f03e3be4c1d655e557be28 /runtest.exp
parent566e82586139ad0135b875f164e3c727e7d08fcb (diff)
downloaddejagnu-20e8dfb5d2cc2f63f654460543e9e65bb1323b9e.zip
dejagnu-20e8dfb5d2cc2f63f654460543e9e65bb1323b9e.tar.gz
dejagnu-20e8dfb5d2cc2f63f654460543e9e65bb1323b9e.tar.bz2
* runtest.exp: Enable --status by default.
(runtest): Set exit status to 2 if there is any error sourcing the Tcl scripts. * lib/framework.exp (unknown): Likewise, set exit status to 2. * doc/runtest.1: Clarify exit status codes. * NEWS: Update.
Diffstat (limited to 'runtest.exp')
-rw-r--r--runtest.exp11
1 files changed, 5 insertions, 6 deletions
diff --git a/runtest.exp b/runtest.exp
index 59c4591..13ba7e6 100644
--- a/runtest.exp
+++ b/runtest.exp
@@ -68,8 +68,8 @@ set reboot 0
set configfile site.exp ;# (local to this file)
set multipass "" ;# list of passes and var settings
set errno ""; ;#
-set exit_error 0 ;# Toggle for whether to set the exit status
-;# on Tcl bugs in test case drivers.
+set exit_error 1 ;# Toggle for whether to set the exit status
+ ;# on Tcl bugs in test case drivers.
#
# These describe the host and target environments.
#
@@ -1155,8 +1155,7 @@ for { set i 0 } { $i < $argc } { incr i } {
}
"--sta*" { # (--status) exit status flag
- set exit_error 1
- verbose "Tcl errors will set an ERROR exit status"
+ # preserved for compatability, do nothing
continue
}
@@ -1474,9 +1473,9 @@ proc runtest { test_file_name } {
# If we have a Tcl error, propagate the exit status so
# that 'make' (if it invokes runtest) notices the error.
global exit_status exit_error
- # exit error is set by a command line option
+ # exit error is set by the --status command line option
if { $exit_status == 0 } {
- set exit_status $exit_error
+ set exit_status 2
}
# We can't call `perror' here, it resets `errorInfo'
# before we want to look at it. Also remember that perror