--- dejagnu-1.6.1/runtest.exp.orig	2017-10-16 07:43:20.000000000 -0400

+++ dejagnu-1.6.1/runtest.exp	2021-08-11 10:54:51.172965763 -0400

@@ -1444,8 +1444,7 @@ proc runtest { test_file_name } {

     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]} {