1
0
mirror of https://github.com/MariaDB/server.git synced 2025-07-30 16:24:05 +03:00

Bug#40715 mtr fails when running the same test case in parallel threads

This commit is contained in:
Magnus Svensson
2008-11-14 11:49:12 +01:00
parent 742b41b976
commit 4e98cbab0d

View File

@ -26,9 +26,7 @@ sub new {
# #
sub key { sub key {
my ($self)= @_; my ($self)= @_;
my $key= $self->{name}; return $self->{key};
$key.= "+".$self->{combination} if $self->{combination};
return $key;
} }
@ -57,6 +55,9 @@ sub is_failed {
sub write_test { sub write_test {
my ($test, $sock, $header)= @_; my ($test, $sock, $header)= @_;
# Give the test a unique key before serializing it
$test->{key}= "$test" unless defined $test->{key};
print $sock $header, "\n"; print $sock $header, "\n";
while ((my ($key, $value)) = each(%$test)) { while ((my ($key, $value)) = each(%$test)) {
print $sock $key, "= "; print $sock $key, "= ";