open Printf
+Helm_registry.load_from "gTopLevel.conf.xml";;
+
let mqi_debug_fun = ignore
let mqi_flags = []
let mqi_handle = MQIConn.init ~flags:mqi_flags ~log:mqi_debug_fun ()
fname (Printexc.to_string exn)
let _ =
- Helm_registry.load_from "gTopLevel.conf.xml";
HelmLogger.register_log_callback
(fun ?(append_NL = true) msg ->
(if append_NL then prerr_endline else prerr_string)