summaryrefslogtreecommitdiffstats
path: root/test/run
diff options
context:
space:
mode:
Diffstat (limited to 'test/run')
-rwxr-xr-xtest/run6
1 files changed, 3 insertions, 3 deletions
diff --git a/test/run b/test/run
index e16e07a..2a3f608 100755
--- a/test/run
+++ b/test/run
@@ -254,8 +254,8 @@ sub process_test($$$$) {
}
# Create a dedicated working directory
-mkdir $workdir or die;
-chdir $workdir or die;
+mkdir $workdir or die "Failed to create directory $workdir: $!";
+chdir $workdir or die "Failed to change to directory $workdir: $!";
$ENV{PWD} = getcwd;
if (defined $ARGV[0]) {
@@ -302,7 +302,7 @@ process_test($prog, $prog_line, $in, $out) if defined $prog;
close(SOURCE);
# Clean up the mess
-chdir $origdir or die;
+chdir $origdir or die "Failed to change back to directory $origdir: $!";
system "rm -rf $workdir" unless $keep_workdir and $failed;
my $status = sprintf("%d commands (%d passed, %d failed)",