[couchdb] 01/33: WIP couch_db.erl

[da...@apache.org]

This is an automated email from the ASF dual-hosted git repository.

davisp pushed a commit to branch COUCHDB-3326-clustered-purge-davisp-refactor
in repository https://gitbox.apache.org/repos/asf/couchdb.git

commit bcb01553d7250498e937db225b641b1d760c3e19
Author: Paul J. Davis <pa...@gmail.com>
AuthorDate: Mon Mar 26 09:11:40 2018 -0500

    WIP couch_db.erl
---
 src/couch/src/couch_db.erl | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/src/couch/src/couch_db.erl b/src/couch/src/couch_db.erl
index 2a2095c..b0b5d9f 100644
--- a/src/couch/src/couch_db.erl
+++ b/src/couch/src/couch_db.erl
@@ -374,16 +374,19 @@ get_full_doc_info(Db, Id) ->
 get_full_doc_infos(Db, Ids) ->
     couch_db_engine:open_docs(Db, Ids).
 
+purge_docs(Db, IdRevs) ->
+    purge_docs(Db, IdRevs, []).
 
--spec purge_docs(#db{}, [{UUId, Id, [Rev]}]) ->
+-spec purge_docs(#db{}, [{UUId, Id, [Rev]}], [PurgeOption]) ->
     {ok, [Reply]} when
     UUId :: binary(),
     Id :: binary(),
     Rev :: {non_neg_integer(), binary()},
+    PurgeOption :: interactive_edit | replicated_changes,
     Reply :: {ok, []} | {ok, [Rev]}.
-purge_docs(#db{main_pid = Pid}, UUIdsIdsRevs) ->
+purge_docs(#db{main_pid = Pid}, UUIdsIdsRevs, Options) ->
     increment_stat(Db, [couchdb, database_purges]),
-    gen_server:call(Pid, {purge_docs, UUIdsIdsRevs});
+    gen_server:call(Pid, {purge_docs, UUIdsIdsRevs, Options});
 
 -spec get_purge_infos(#db{}, [UUId]) -> [PurgeInfo] when
     UUId :: binary(),

-- 
To stop receiving notification emails like this one, please contact
davisp@apache.org.