summaryrefslogtreecommitdiff
path: root/src/couch/src/couch_lru.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/couch/src/couch_lru.erl')
-rw-r--r--src/couch/src/couch_lru.erl5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/couch/src/couch_lru.erl b/src/couch/src/couch_lru.erl
index 6ad7c65cd..a3057136f 100644
--- a/src/couch/src/couch_lru.erl
+++ b/src/couch/src/couch_lru.erl
@@ -11,13 +11,16 @@
% the License.
-module(couch_lru).
--export([new/0, insert/2, update/2, close/1]).
+-export([new/0, sizes/1, insert/2, update/2, close/1]).
-include("couch_server_int.hrl").
new() ->
{gb_trees:empty(), dict:new()}.
+sizes({Tree, Dict}) ->
+ {gb_trees:size(Tree), dict:size(Dict)}.
+
insert(DbName, {Tree0, Dict0}) ->
Lru = couch_util:unique_monotonic_integer(),
{gb_trees:insert(Lru, DbName, Tree0), dict:store(DbName, Lru, Dict0)}.