···11let send_wol mac port broadcast =
22+ let mac = Macaddr.of_string_exn mac in
23 Eio_posix.run @@ fun env -> Wol_eio.send ~net:env#net ~port ~broadcast mac
3445let () =
+1-1
src/eio/wol_eio.ml
···1010 in
1111 Eio.Net.datagram_socket ~sw net proto
1212 in
1313- let packet = Wol.magic_packet (Macaddr.of_string_exn mac_str) in
1313+ let packet = Wol.magic_packet mac_str in
1414 Eio.Net.send sock ~dst:(`Udp (addr, port)) [ packet ]