Added debugging code which allows simultaneous debugging of RunTest.pl

and RunTestUtils.pl.

Commented reference to $loop in RunTest.pl's main loop, since it is
not referenced anywhere else.

Fixed ViewResults to handle the case when a file is missing from the
test output or test archive.

Some minor cleanup and performance improvements to CompareTestFiles.


git-svn-id: http://svn.cactuscode.org/flesh/trunk@3504 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 23 insertions, 2 deletions

diff --git a/lib/sbin/RunTest.pl b/lib/sbin/RunTest.pl
index 54c7dfd9..55ef0daa 100644
--- a/lib/sbin/RunTest.pl
+++ b/lib/sbin/RunTest.pl
@@ -3,6 +3,28 @@
 # Test Suite tool
 # Version: $Header$
 
+# For debugging:
+my $debug = 0;
+my $debug_indent_level = 0;
+sub debug_print
+{
+  # debug statements are prefixed by a '#', to make them stand out from 
+  # ordinary output
+  $debug and print '#'.' 'x$debug_indent_level."@_\n";
+}
+sub debug
+{
+  $debug;
+}
+sub debug_indent
+{
+  $debug_indent_level++;
+}
+sub debug_dedent
+{
+  $debug_indent_level--;
+}
+
 require "lib/sbin/RunTestUtils.pl";
 
 # Read options from command line
@@ -191,7 +213,7 @@ while ($choice !~ /^Q/i)
     }
     elsif ($choice =~ /^Q/i)
     {
-      $loop = 0;
+#      $loop = 0;
     }
     else
     {
@@ -200,4 +222,3 @@ while ($choice !~ /^Q/i)
   }
   print "\n";
 }
-