diff options
| author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2002-02-04 09:36:32 +0000 |
|---|---|---|
| committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2002-02-04 09:36:32 +0000 |
| commit | 176a408bd95ada0e1b0555d846d1d5c7dfa30347 (patch) | |
| tree | 15c7a9a3c9f8c575f26c68a3155f54b672053ab0 /otherlibs/labltk/support/cltkFile.c | |
| parent | 0f8b5fe510047b66127f76ef8f45af396f82db56 (diff) | |
use unixsupport.h
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4348 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/labltk/support/cltkFile.c')
| -rw-r--r-- | otherlibs/labltk/support/cltkFile.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/labltk/support/cltkFile.c b/otherlibs/labltk/support/cltkFile.c index 458b526ec..a0cb4d0e1 100644 --- a/otherlibs/labltk/support/cltkFile.c +++ b/otherlibs/labltk/support/cltkFile.c @@ -106,9 +106,9 @@ CAMLprim value camltk_rem_file_output(value fd, value cbid) /* Under Win32, we go through the generic channel abstraction */ -/* Map Unix.file_descr values to Tcl channels */ +#include <unixsupport.h> -#define Handle_val(v) (*((HANDLE *)(v))) +/* Map Unix.file_descr values to Tcl channels */ static Tcl_Channel tcl_channel(value fd, int flags) { |