(* Run with: ocaml -I +lablgtk2 lablgtk.cma gtkInit.cmo dialer.ml *)
(* ocaml -I +lablgtk2 lablgtk.cma lablglade.cma gtkInit.cmo dialer.ml *)

let main () =
  let glade = Glade.create ~file:"dialer.glade" () in
  GMain.Main.main ()

let _ = main ()