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

Baker: do not compare Lwt threads

Browse Source
This commit is contained in:
Benjamin Canou 2018-06-18 23:14:04 +02:00 committed by Grégoire Henry
parent fdc6bf6b44
commit 6682f05ec9
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/proto_alpha/lib_delegate/client_baking_endorsement.ml
View File

@ -193,7 +193,9 @@ let allowed_to_endorse cctxt state (block: Client_baking_blocks.block_info) dele
| Some old -> | Some old ->
if Fitness.compare old.block.fitness neu.block.fitness < 0 then begin if Fitness.compare old.block.fitness neu.block.fitness < 0 then begin
let without_old = let without_old =
List.filter (fun to_end -> to_end <> old) state.to_endorse in List.filter (fun to_end ->
to_end.block.hash <> old.block.hash)
state.to_endorse in
state.to_endorse <- neu :: without_old; state.to_endorse <- neu :: without_old;
return () return ()
end else end else