diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2000-04-17 08:55:44 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2000-04-17 08:55:44 +0000 |
| commit | aec1de6aee0fa94368912d9cac6f95bad234ef8e (patch) | |
| tree | faa34e0c52dc3919f98a80421115d73e7c656eeb /otherlibs/labltk/support/cltkEvent.c | |
| parent | 790770e1cace566ab377e4371ce8d813dd37879c (diff) | |
Utiliser les includes de ../../../byterun, pas ceux de /usr/local/lib/ocaml/caml.
Ajout d'includes manquants. Ajout de prototypes sur toutes les fonctions.
Suppression de warnings du compilo C.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3098 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/labltk/support/cltkEvent.c')
| -rw-r--r-- | otherlibs/labltk/support/cltkEvent.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/otherlibs/labltk/support/cltkEvent.c b/otherlibs/labltk/support/cltkEvent.c index 30bc64e87..fecb4244a 100644 --- a/otherlibs/labltk/support/cltkEvent.c +++ b/otherlibs/labltk/support/cltkEvent.c @@ -17,10 +17,11 @@ #include <tcl.h> #include <tk.h> -#include <caml/mlvalues.h> +#include <mlvalues.h> +#include <alloc.h> #include "camltk.h" -value camltk_tk_mainloop() /* ML */ +value camltk_tk_mainloop(void) /* ML */ { CheckInit(); @@ -42,8 +43,7 @@ static int event_flag_table[] = { TK_ALL_EVENTS }; -value camltk_dooneevent(flags) /* ML */ - value flags; +value camltk_dooneevent(value flags) /* ML */ { int ret; |