* runtest.exp (runtest): Call reset_vars at initialisation so that

	perror does not affect test results in other test scripts.

diff --git a/ChangeLog b/ChangeLog
index 5c3b283..1af458e 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2011-03-14  Jan Kratochvil  <jan.kratochvil@redhat.com>
+
+       * runtest.exp (runtest): Call reset_vars at initialisation so that
+       a perror does not affect test results in other test scripts.
+
 2011-03-09  Ben Elliston  <bje@gnu.org>
 
        * NEWS: Start a new section for post-1.5 changes.

diff --git a/runtest.exp b/runtest.exp
index 2140020..641bfe8 100644 (file)
--- a/runtest.exp
+++ b/runtest.exp
@@ -1435,16 +1435,13 @@ proc load_base_board_description { board_name } {
 #
 
 proc runtest { test_file_name } {
-    global prms_id
-    global bug_id
     global test_result
     global errcnt
     global errorInfo
     global tool
 
     clone_output "Running $test_file_name ..."
-    set prms_id        0
-    set bug_id 0
+    reset_vars
     set test_result ""
 
     if {[file exists $test_file_name]} {