465 |
let module M = DonkeyProtoServer in |
let module M = DonkeyProtoServer in |
466 |
Random.self_init(); |
Random.self_init(); |
467 |
List.iter (fun s -> |
List.iter (fun s -> |
468 |
server_udp_send s (M.PingServerUdpReq (Int32.of_int(Random.int(3000)))); |
server_udp_send s (M.PingServerUdpReq (Int32.of_int (Random.int 3000))); |
469 |
server_udp_send s (M.ServerDescUdpReq { |
server_udp_send s (M.ServerDescUdpReq { |
470 |
M.ServerDescUdp.ip = (Ip.of_string "21.42.0.1"); |
M.ServerDescUdp.ip = (Ip.of_string "21.42.0.1"); |
471 |
}) |
}) |