t/v[12]reindex.t Verify num_highwater

Signed-off-by: "Eric W. Biederman" <ebiederm@xmission.com>

diff --git a/t/v1reindex.t b/t/v1reindex.t
index 8e78aa761333942678dc83abcd4af0a5363948bc..876c9db3441aee0f341ce28ec5554ab5414aed8a 100644 (file)
--- a/t/v1reindex.t
+++ b/t/v1reindex.t
@@ -246,6 +246,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 4, 'max as expected');
+       is($ibx->mm->num_highwater, 4, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -269,6 +270,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 3, 'max as expected');
+       is($ibx->mm->num_highwater, 4, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -291,6 +293,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -319,6 +322,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -352,6 +356,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 3, 'max as expected');
+       is($ibx->mm->num_highwater, 4, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -374,6 +379,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -402,6 +408,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],

diff --git a/t/v2reindex.t b/t/v2reindex.t
index ce13a07c39c08472bfb475dcdd9d801e406c088d..3d217aff3c72067f8d57f3c87d7a569efd0a82b1 100644 (file)
--- a/t/v2reindex.t
+++ b/t/v2reindex.t
@@ -237,6 +237,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 4, 'max as expected');
+       is($ibx->mm->num_highwater, 4, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -260,6 +261,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 3, 'max as expected');
+       is($ibx->mm->num_highwater, 4, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -282,6 +284,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -310,6 +313,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -343,6 +347,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 3, 'max as expected');
+       is($ibx->mm->num_highwater, 4, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -365,6 +370,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],
@@ -393,6 +399,7 @@ ok(!-d $xap, 'Xapian directories removed again');
        my ($min, $max) = $ibx->mm->minmax;
        is($min, 1, 'min as expected');
        is($max, 10, 'max as expected');
+       is($ibx->mm->num_highwater, 10, 'num_highwater as expected');
        is_deeply($ibx->mm->msg_range(\$min, $max),
                  [
                   [1, '1@example.com' ],