module C = MQIConn
let _ =
+ Helm_registry.load_from "/home/fguidi/miohelm/gTopLevel.conf.xml";
let t = U.start_time () in
let ich = Lexing.from_channel stdin in
let flags = if Array.length Sys.argv >= 2 then Sys.argv.(1) else "" in
let log s = print_string s; flush stdout in
- let handle = C.init (C.flags_of_string flags) log in
+ let handle = C.init ~flags:(C.flags_of_string flags) ~log:log () in
if not (C.connected handle) then begin
print_endline "mqitop: no connection"; flush stdout
end;