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

Shell: the genesis block should not flag the node as 'bootstraped'

Browse Source
This commit is contained in:
Grégoire Henry 2017-03-04 09:54:16 +01:00
parent 8453a69e0b
commit 534dc6af9d
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/node/shell/validator.ml
View File

@ -504,7 +504,13 @@ let rec create_validator ?parent worker state db net =
| Some block | Some block
when Time.(block.State.Valid_block.timestamp < add (Time.now ()) (-60L)) -> when Time.(block.State.Valid_block.timestamp < add (Time.now ()) (-60L)) ->
wait () wait ()
| Some _ | None -> Lwt.return_unit in | _ ->
State.Valid_block.Current.head net >>= fun head ->
State.Valid_block.Current.genesis net >>= fun genesis ->
if Block_hash.equal head.hash genesis.hash then
wait ()
else
Lwt.return_unit in
let t = let t =
wait () >>= fun () -> wait () >>= fun () ->
Watcher.shutdown stopper ; Watcher.shutdown stopper ;