Fixed command lines for unit tests.

icculus · Apr 9, 2009 · 105e8e3 · 105e8e3
1 parent 07ddc74
commit 105e8e3
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/unit_tests/run_tests.pl b/unit_tests/run_tests.pl
@@ -9,6 +9,9 @@
 undef $Bin;
 #print("testdir is $testdir\n");
 
+
+my $GPrintCmds = 0;
+
 my @modules = qw( preprocessor assembler compiler parser );
 
 
@@ -59,7 +62,9 @@ sub compare_files {
     } else {
         return (0, "Don't know how to do this module type");
     }
-    $cmd .= '2>/dev/null 1>/dev/null';
+    $cmd .= ' 2>/dev/null 1>/dev/null';
+
+    print("$cmd\n") if ($GPrintCmds);
 
     if (system($cmd) != 0) {
         unlink($output) if (-f $output);