exception XsltProcessorCouldNotSend;;
exception XsltProcessorCouldNotReceive;;
-let initialize l =
- List.iter
- (function (name,key) ->
- client_add (Configuration.getter_url ^ "getxslt?uri=" ^ name ^ "?key=" ^ key)
- )
-
let portserver = 12345;;
let portclient = 12346;;
let time_to_wait = 10;;