balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Alpha: remove emptied frozen balances

Browse Source
This commit is contained in:
Benjamin Canou 2018-03-15 14:06:00 +01:00
parent 39f919e07b
commit b09183a2d7
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/proto_alpha/lib_protocol/src/delegate_storage.ml
View File

@ -219,6 +219,9 @@ let unfreeze ctxt delegate cycle =
Lwt.return Tez_repr.(balance +? rewards) >>=? fun balance -> Lwt.return Tez_repr.(balance +? rewards) >>=? fun balance ->
Storage.Contract.Balance.set ctxt contract balance >>=? fun ctxt -> Storage.Contract.Balance.set ctxt contract balance >>=? fun ctxt ->
Roll_storage.Delegate.add_amount ctxt delegate rewards >>=? fun ctxt -> Roll_storage.Delegate.add_amount ctxt delegate rewards >>=? fun ctxt ->
Storage.Contract.Frozen_bonds.remove (ctxt, contract) cycle >>= fun ctxt ->
Storage.Contract.Frozen_fees.remove (ctxt, contract) cycle >>= fun ctxt ->
Storage.Contract.Frozen_rewards.remove (ctxt, contract) cycle >>= fun ctxt ->
return ctxt return ctxt
let cycle_end ctxt last_cycle unrevealed = let cycle_end ctxt last_cycle unrevealed =