Proto/Alpha: replace Vote.set_current_proposal by init_current_proposal

This commit is contained in:
Guillem Rieu 2017-04-14 16:25:01 +02:00 committed by Grégoire Henry
parent 8777349a19
commit 3c44f1dfba
4 changed files with 4 additions and 4 deletions

View File

@ -57,7 +57,7 @@ let start_new_voting_cycle ctxt =
Vote.freeze_listings ctxt >>=? fun ctxt ->
return ctxt
| Some proposal ->
Vote.set_current_proposal ctxt proposal >>=? fun ctxt ->
Vote.init_current_proposal ctxt proposal >>=? fun ctxt ->
Vote.freeze_listings ctxt >>=? fun ctxt ->
Vote.set_current_period_kind ctxt Testing_vote >>=? fun ctxt ->
return ctxt

View File

@ -410,7 +410,7 @@ module Vote : sig
val get_current_proposal:
context -> proposal tzresult Lwt.t
val set_current_proposal:
val init_current_proposal:
context -> proposal -> context tzresult Lwt.t
val clear_current_proposal:
context -> context tzresult Lwt.t

View File

@ -77,7 +77,7 @@ let get_current_quorum = Storage.Vote.Current_quorum.get
let set_current_quorum = Storage.Vote.Current_quorum.set
let get_current_proposal = Storage.Vote.Current_proposal.get
let set_current_proposal = Storage.Vote.Current_proposal.set
let init_current_proposal = Storage.Vote.Current_proposal.init
let clear_current_proposal = Storage.Vote.Current_proposal.delete
let init ctxt =

View File

@ -45,7 +45,7 @@ val set_current_period_kind:
val get_current_proposal:
Storage.t -> Protocol_hash.t tzresult Lwt.t
val set_current_proposal:
val init_current_proposal:
Storage.t -> Protocol_hash.t -> Storage.t tzresult Lwt.t
val clear_current_proposal: Storage.t -> Storage.t tzresult Lwt.t