(* Report globals from protocol *)
let openTk = openTk
and closeTk = closeTk
and mainLoop = mainLoop
and register = register
(* From support *)
let may = may
let maycons = maycons
(* From widget *)
let coe = coe