TESTrun: canonicalize the path of the standard error file.

DEC's decisions and the Multics developers' decisions affect us to this
day.  (Unix went with the Multics use of - to indicate options; DOS went
with the DEC use of / to indicate options, so they had to use \ as the
pathname component separator, and Windows followed suit, so here we
are.)

diff --git a/tests/TESTrun b/tests/TESTrun
index a258fa33e67a2fde3b7989769e3e545b1283531b..ac95270acc79368f0a3c11b84e1b2ffdb9fdf980 100755 (executable)
--- a/tests/TESTrun
+++ b/tests/TESTrun
@@ -167,8 +167,9 @@ sub runtest {
         # Compare the standard error with what we think it should be.
         #
         if ($^O eq 'MSWin32') {
+            my $winoutput = File::Spec->canonpath($output);
             my $canonstderrlog = File::Spec->canonpath($stderrlog);
-            $nr = system "fc/lb1000/t/1 $output.stderr $canonstderrlog >tests/DIFF/$outputbase.stderr.diff";
+            $nr = system "fc/lb1000/t/1 $winoutput.stderr $canonstderrlog >tests/DIFF/$outputbase.stderr.diff";
         } else {
             $nr = system "diff $output.stderr $stderrlog >tests/DIFF/$outputbase.stderr.diff";
         }