use Compress::Zlib qw(compress);
use constant {
- BATCH_BYTES => 10_000_000,
+ BATCH_BYTES => 1_000_000,
DEBUG => !!$ENV{DEBUG},
};
}
}
$self->commit_txn_lazy;
+ $xdb = _xdb_release($self);
# let another process do some work... <
if (!$newest) {
$xdb = $self->begin_txn_lazy;