Skip to content
Snippets Groups Projects
Commit 90287f04 authored by NGUYEN Do Duc Anh's avatar NGUYEN Do Duc Anh
Browse files

update interval time between ready message to ensure the inf ready to receive this message

parent edf899ce
No related branches found
No related tags found
No related merge requests found
......@@ -144,13 +144,13 @@ module Main
Private_ethernet.write private_ethernet ~src:(Macaddr.of_string_exn "00:00:00:00:00:00") (Macaddr.of_string_exn "00:00:00:00:00:00")
`IPv4 ~size:len (fun b -> Cstruct.blit packet 0 b 0 len ; len) >>= function
| Ok () ->
Time.sleep_ns (Duration.of_ms 200) >>= fun () -> send_notification (n - 1)
Time.sleep_ns (Duration.of_ms 500) >>= fun () -> send_notification (n - 1)
| Error e ->
Log.warn (fun f -> f "Ethernet write errored %a" Private_ethernet.pp_error e);
Lwt.return_unit
in
Lwt.async (fun () ->
send_notification 5
send_notification 10
);
(* Notice how we haven't said anything about ICMP anywhere. The unikernel
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment