reynir/albatross
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

vmmd: initialise nocrypto

Browse source
This commit is contained in:
Hannes Mehnert 2018-04-05 02:14:49 +02:00
parent 9696953cd7
commit d83986cab4
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
app/vmmd.ml
View file

@ -220,7 +220,8 @@ let jump _ dir cacert cert priv_key =
Sys.(set_signal sigpipe Signal_ignore) ; Sys.(set_signal sigpipe Signal_ignore) ;
let dir = Fpath.v dir in let dir = Fpath.v dir in
Lwt_main.run Lwt_main.run
((init_sock dir "cons" >|= function (Nocrypto_entropy_lwt.initialize () >>= fun () ->
(init_sock dir "cons" >|= function
| None -> invalid_arg "cannot connect to console socket" | None -> invalid_arg "cannot connect to console socket"
| Some c -> c) >>= fun c -> | Some c -> c) >>= fun c ->
init_sock dir "stat" >>= fun s -> init_sock dir "stat" >>= fun s ->