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/camltk.h | |
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/camltk.h')
-rw-r--r-- | otherlibs/labltk/support/camltk.h | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/otherlibs/labltk/support/camltk.h b/otherlibs/labltk/support/camltk.h index 301d7257d..1111bc7c8 100644 --- a/otherlibs/labltk/support/camltk.h +++ b/otherlibs/labltk/support/camltk.h @@ -15,22 +15,25 @@ /* $Id$ */ +/* cltkMisc.c */ +/* copy a Caml string to the C heap. Must be deallocated with stat_free */ +extern char *string_to_c(value s); + /* cltkEval.c */ extern Tcl_Interp *cltclinterp; /* The Tcl interpretor */ - -/* copy a Caml string to the C heap. Must be deallocated with stat_free */ -char *string_to_c(); +extern value copy_string_list(int argc, char ** argv); /* cltkCaml.c */ /* pointers to Caml values */ extern value *tkerror_exn; extern value *handler_code; -int CamlCBCmd(); -void tk_error(); +extern int CamlCBCmd(ClientData clientdata, Tcl_Interp *interp, + int argc, char *argv[]); +extern void tk_error(char * errmsg) Noreturn; /* cltkMain.c */ extern int signal_events; -void invoke_pending_caml_signals(); +extern void invoke_pending_caml_signals(ClientData clientdata); extern Tk_Window cltk_mainWindow; extern int cltk_slave_mode; |