File tree 1 file changed +9
-4
lines changed
1 file changed +9
-4
lines changed Original file line number Diff line number Diff line change @@ -575,10 +575,15 @@ module Low_level = struct
575
575
| _ -> None
576
576
in
577
577
let request = Luv.DNS.Addr_info.Request. make () in
578
- await_with_cancel ~request (fun loop -> Luv.DNS. getaddrinfo ~loop ~request ~service ~node () )
579
- |> or_raise
580
- |> List. filter_map to_eio_sockaddr_t
581
-
578
+ match (await_with_cancel ~request
579
+ (fun loop -> Luv.DNS. getaddrinfo ~loop ~request ~service ~node () ))
580
+ with
581
+ | Ok nl -> List. filter_map to_eio_sockaddr_t nl
582
+ | Error `EAI_ADDRFAMILY | Error `EAI_AGAIN | Error `EAI_BADFLAGS | Error `EAI_BADHINTS
583
+ | Error `EAI_CANCELED | Error `EAI_FAIL | Error `EAI_FAMILY | Error `EAI_MEMORY
584
+ | Error `EAI_NODATA | Error `EAI_NONAME | Error `EAI_OVERFLOW | Error `EAI_PROTOCOL
585
+ | Error `EAI_SERVICE | Error `EAI_SOCKTYPE -> []
586
+ | Error e -> raise (Luv_error e)
582
587
end
583
588
584
589
open Low_level
You can’t perform that action at this time.
0 commit comments