1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
with Deck_Convert_GUI, FLTK; function GUI_Main return Integer is begin Deck_Convert_GUI.Show; return FLTK.Run; end GUI_Main;