diff options
Diffstat (limited to 'cglibivy.c')
| -rw-r--r-- | cglibivy.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -20,8 +20,8 @@ value ivy_GtkmainLoop(value unit) } extern void cb_delete_channel(void *delete_read); -extern void cb_read_channel(Channel ch, HANDLE fd, void *closure); -extern void cb_write_channel(Channel ch, HANDLE fd, void *closure); +extern void cb_read_channel(Channel ch, IVY_HANDLE fd, void *closure); +extern void cb_write_channel(Channel ch, IVY_HANDLE fd, void *closure); value ivy_GtkchannelSetUp(value fd, value closure_name) { @@ -29,9 +29,9 @@ value ivy_GtkchannelSetUp(value fd, value closure_name) value * closure = caml_named_value(String_val(closure_name)); #if IVYMINOR_VERSION == 8 - c = IvyChannelAdd((HANDLE)Int_val(fd), (void*)closure, cb_delete_channel, cb_read_channel); + c = IvyChannelAdd((IVY_HANDLE)Int_val(fd), (void*)closure, cb_delete_channel, cb_read_channel); #else - c = IvyChannelAdd((HANDLE)Int_val(fd), (void*)closure, cb_delete_channel, cb_read_channel, cb_write_channel); + c = IvyChannelAdd((IVY_HANDLE)Int_val(fd), (void*)closure, cb_delete_channel, cb_read_channel, cb_write_channel); #endif return Val_int(c); } |