summaryrefslogtreecommitdiff
path: root/apps/couch/test
diff options
context:
space:
mode:
authorAdam Kocoloski <adam@cloudant.com>2011-01-28 16:12:00 -0500
committerAdam Kocoloski <adam@cloudant.com>2011-01-28 16:12:00 -0500
commitff9036784e5f3f722f71a536c50b37723595add1 (patch)
tree2ffa37f5f79e0c3d339ab4d26c27c56055820636 /apps/couch/test
parent97db6774d460d41c732e8d4ece1908fe3921cc03 (diff)
Revert "Add support for inclusive_end to fold_reduce, BugzID 11069"
This reverts commit 5c3161d57b1d2d7953497c24be09112b6bcf71b6.
Diffstat (limited to 'apps/couch/test')
-rwxr-xr-xapps/couch/test/etap/020-btree-basics.t30
1 files changed, 1 insertions, 29 deletions
diff --git a/apps/couch/test/etap/020-btree-basics.t b/apps/couch/test/etap/020-btree-basics.t
index 536c9fb1..996d240a 100755
--- a/apps/couch/test/etap/020-btree-basics.t
+++ b/apps/couch/test/etap/020-btree-basics.t
@@ -22,7 +22,7 @@ rows() -> 250.
main(_) ->
test_util:init_code_path(),
couch_config:start_link([]),
- etap:plan(51),
+ etap:plan(48),
case (catch test()) of
ok ->
etap:end_tests();
@@ -40,7 +40,6 @@ test()->
etap:ok(test_kvs(Sorted), "Testing sorted keys"),
etap:ok(test_kvs(lists:reverse(Sorted)), "Testing reversed sorted keys"),
etap:ok(test_kvs(shuffle(Sorted)), "Testing shuffled keys."),
- etap:ok(test_fold_reductions(Sorted), "Testing fold_reduce."),
ok.
test_kvs(KeyValues) ->
@@ -189,33 +188,6 @@ test_final_reductions(Btree, KeyValues) ->
KVLen = FoldLRed + FoldRRed,
ok.
-test_fold_reductions(KeyValues) ->
-
- {ok, Fd} = couch_file:open(filename(), [create,overwrite]),
- {ok, Btree} = couch_btree:open(nil, Fd),
- {ok, Btree2} = couch_btree:add_remove(Btree, KeyValues, []),
-
- GroupFun = fun(Key1,Key2) -> Key1 == Key2 end,
-
- FoldLFun = fun(_X, _LeadingReds, Acc) ->
- {ok, Acc + 1} end,
- {ok, Res1} =
- couch_btree:fold_reduce(Btree2,
- FoldLFun,0,
- [{key_group_fun, GroupFun},
- {start_key,126},
- {end_key,250}]),
- etap:is(Res1,125,"including the end key ought to return half the keys"),
- {ok, Res2} =
- couch_btree:fold_reduce(Btree2,
- FoldLFun,0,
- [{key_group_fun, GroupFun},
- {start_key,126},
- {end_key_gt,250}]),
- etap:is(Res2,124,"not including the end key ought to return one less than half the keys"),
- true.
-
-
shuffle(List) ->
randomize(round(math:log(length(List)) + 0.5), List).