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

Proto: cleanup nonces once the seed is computed

Browse Source
This commit is contained in:
Grégoire Henry 2017-09-22 18:19:57 +02:00 committed by Grégoire
parent 0d8292048e
commit 1384253447
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/proto/alpha/seed_storage.ml
View File

@ -31,8 +31,10 @@ let compute_for_cycle c cycle =
let combine (c, random_seed) level = let combine (c, random_seed) level =
Storage.Seed.Nonce.get c level >>=? function Storage.Seed.Nonce.get c level >>=? function
| Revealed nonce -> | Revealed nonce ->
Storage.Seed.Nonce.delete c level >>=? fun c ->
return (c, Seed_repr.nonce random_seed nonce) return (c, Seed_repr.nonce random_seed nonce)
| Unrevealed _ -> | Unrevealed _ ->
Storage.Seed.Nonce.delete c level >>=? fun c ->
return (c, random_seed) return (c, random_seed)
in in
Storage.Seed.For_cycle.get c previous_cycle >>=? fun seed -> Storage.Seed.For_cycle.get c previous_cycle >>=? fun seed ->