Optimize lookup/3ebtree-lookup-opt

A tidier version of https://github.com/apache/couchdb/pull/3384 that
saves an unnecessary call to collate.

1 files changed, 4 insertions, 4 deletions

diff --git a/src/ebtree/src/ebtree.erl b/src/ebtree/src/ebtree.erl
index 8962b1502..a62074ca0 100644
--- a/src/ebtree/src/ebtree.erl
+++ b/src/ebtree/src/ebtree.erl
@@ -133,12 +133,12 @@ max() ->
 lookup(Db, #tree{} = Tree, Key) ->
     Fun = fun
         ({visit, K, V}, Acc) ->
-            case {collate(Tree, K, Key, [eq]), collate(Tree, K, Key, [gt])} of
-                {true, _} ->
+            case collate(Tree, K, Key) of
+                eq ->
                     {stop, {K, V}};
-                {false, true} ->
+                gt ->
                     {stop, Acc};
-                {false, false} ->
+                lt ->
                     {ok, Acc}
             end;
         ({traverse, F, L, _R}, Acc) ->