]> matita.cs.unibo.it Git - helm.git/blob - matitaGuiInit.ml
a61f33aaf6f46220a50d3132f5acb65418ed0a09
[helm.git] / matitaGuiInit.ml
1 let initialized = ref false
2
3 let init () =
4  if not !initialized then begin
5   initialized := true;
6   ignore (GMain.Main.init ())
7  end else
8   assert false