Salut !
J'ai fait un peut d'ocaml, je me décide enfin à utiliser un module qui n'est pas "de base" dans ocaml, le module GTK. Je suis sur Windows, je l'ai donc installé (copié dans lib/ et compilé avec build.ml).
Mais quand je décide de l'utiliser, j'ai pris un fichier d'exemple pour tester, qui se trouve ici : http://www.ocaml-tutorial.org/introduction_to_gtk
Voilà le contenu du fichier :
La commande de compilation :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31 open GMain open GdkKeysyms let main () = let window = GWindow.window ~width:320 ~height:240 ~title:"Simple lablgtk program" () in let vbox = GPack.vbox ~packing:window#add () in window#connect#destroy ~callback:Main.quit; (* Menu bar *) let menubar = GMenu.menu_bar ~packing:vbox#pack () in let factory = new GMenu.factory menubar in let accel_group = factory#accel_group in let file_menu = factory#add_submenu "File" in (* File menu *) let factory = new GMenu.factory file_menu ~accel_group in factory#add_item "Quit" ~key:_Q ~callback: Main.quit; (* Button. *) let button = GButton.button ~label:"Push me!" ~packing:vbox#add () in button#connect#clicked ~callback: (fun () -> prerr_endline "Ouch!"); (* Display the windows and enter Gtk+ main loop *) window#add_accel_group accel_group; window#show (); Main.main () ;; main ()
ocamlc -g -w s -I +lablgtk lablgtk.cma gtkInit.cmo simple.ml -o simple.exe
Mais la compilation me retourne cette erreur :
File "simple.ml", line 1, characters 0-10:
Unbound module GMain
J'ai l'impression que le probleme se situe dans l'utilisation du module :/
Que faire ?
Merci
ps : je voudrais savoir comment compiler son programme ocaml en natif sur Windows ? il me dit qu'il ne trouve pas "as"
Partager