This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Tarantool -- an efficient key/value data store".
The branch perl-iproto-async has been updated
via c2c9e82967db6acc998fe5b2314b14ef7f1e5213 (commit)
from 3d33690f89b75bacd47ca4e375cc8da3f7f3f619 (commit)
Summary of changes:
mod/silverbox/client/perl/lib/MR/IProto.pm | 6 ++++++
1 files changed, 6 insertions(+), 0 deletions(-)
commit c2c9e82967db6acc998fe5b2314b14ef7f1e5213
Author: Aleksey Mashanov <[email protected]>
Date: Thu Dec 2 19:41:13 2010 +0300
Memory leakage removing
diff --git a/mod/silverbox/client/perl/lib/MR/IProto.pm
b/mod/silverbox/client/perl/lib/MR/IProto.pm
index 18125e3..b2228d8 100644
--- a/mod/silverbox/client/perl/lib/MR/IProto.pm
+++ b/mod/silverbox/client/perl/lib/MR/IProto.pm
@@ -558,6 +558,8 @@ sub _send_now {
$next_try->();
}
else {
+ undef $sub;
+ undef $do_try;
undef $next_try;
$self->_report_error($unpack ? undef : $message, $callback,
$error);
}
@@ -579,6 +581,8 @@ sub _send_now {
$next_try->(1);
}
else {
+ undef $sub;
+ undef $do_try;
undef $next_try;
$self->_in_progress( $self->_in_progress - 1 );
$self->_try_to_send();
@@ -586,6 +590,8 @@ sub _send_now {
}
}
else {
+ undef $sub;
+ undef $do_try;
undef $next_try;
$self->_report_error($unpack ? undef : $message, $callback,
$@);
}
--
Tarantool -- an efficient key/value data store
_______________________________________________
Mailing list: https://launchpad.net/~tarantool-developers
Post to : [email protected]
Unsubscribe : https://launchpad.net/~tarantool-developers
More help : https://help.launchpad.net/ListHelp
