Здравствуйте нужна помощь знатаков Ocamla, как убрать консоль из приложений приложений типа
(*комманда сборки ocamlc -I +labltk labltk.cma gui.ml -o gui.exe *)
open Tk ;;
let top = openTk () ;;
Wm.title_set top "Application 1" ;;
Wm.geometry_set top "200x500";;
let blue = Button.create ~text:"Blue" top ;;
let red = Button.create ~text:"Red" top ;;
pack [blue ; red];;
let mylist = Listbox.create ~selectmode:`Multiple top
let _ = Listbox.insert
~index:`End
~texts:["Mozart";"Chopin";"Beethoven";"Verdi";"Bizet"]
mylist ;;
pack [mylist];;
let _ = Printexc.print mainLoop ();;
пол дня убил на поиск в интернете