* runtest.exp (runtest): Improve comment about --status.

diff --git a/ChangeLog b/ChangeLog
index 8818dcd..4b6c937 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2016-01-16  Ben Elliston  <bje@gnu.org>
+
+       * runtest.exp (runtest): Improve comment about --status.
+
 2016-01-12  Simon Marchi  <simon.marchi@ericsson.com>
 
        * lib/remote.exp (standard_file): The [ operator does not actually

diff --git a/runtest.exp b/runtest.exp
index 08927bf..58a016b 100644 (file)
--- a/runtest.exp
+++ b/runtest.exp
@@ -1472,8 +1472,8 @@ proc runtest { test_file_name } {
        }
 
        if { [catch "uplevel #0 source $test_file_name"] == 1 } {
-           # If we have a Tcl error, propogate the exit status do make
-           # notices the error.
+           # 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
            if { $exit_status == 0 } {