database/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2026-01-06 05:22:24 +03:00
Code Activity

Improve error / process handling in the Perl script to run the test suite (patch supplied by Kent).

Browse Source
This commit is contained in:
joerg@mysql.com
2005-09-14 13:55:53 +02:00
parent eee616d122
commit b4d4e7a306
2 changed files with 11 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
mysql-test/lib/mtr_process.pl
View File

@@ -166,7 +166,7 @@ sub spawn_impl ($$$$$$$$) {
{
if ( ! open(STDOUT,$log_file_open_mode,$output) )
{
mtr_error("can't redirect STDOUT to \"$output\": $!");
mtr_child_error("can't redirect STDOUT to \"$output\": $!");
}
}
@@ -176,14 +176,14 @@ sub spawn_impl ($$$$$$$$) {
{
if ( ! open(STDERR,">&STDOUT") )
{
mtr_error("can't dup STDOUT: $!");
mtr_child_error("can't dup STDOUT: $!");
}
}
else
{
if ( ! open(STDERR,$log_file_open_mode,$error) )
{
mtr_error("can't redirect STDERR to \"$error\": $!");
mtr_child_error("can't redirect STDERR to \"$error\": $!");
}
}
}
@@ -192,13 +192,13 @@ sub spawn_impl ($$$$$$$$) {
{
if ( ! open(STDIN,"<",$input) )
{
mtr_error("can't redirect STDIN to \"$input\": $!");
mtr_child_error("can't redirect STDIN to \"$input\": $!");
}
}
if ( ! exec($path,@$arg_list_t) )
{
mtr_error("failed to execute \"$path\": $!");
mtr_child_error("failed to execute \"$path\": $!");
}
}
}