diff options
Diffstat (limited to 'src/Gtk/Internal.icl')
| -rw-r--r-- | src/Gtk/Internal.icl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/Gtk/Internal.icl b/src/Gtk/Internal.icl index 987ae85..c76f01a 100644 --- a/src/Gtk/Internal.icl +++ b/src/Gtk/Internal.icl @@ -26,14 +26,14 @@ where ccall clean_g_signal_connect "IpsI:V:A" } -g_timeout_add :: !Int !Int !.a -> .a -g_timeout_add interval id env = code { - ccall clean_g_timeout_add "II:V:A" +g_timeout_add :: !Int !Pointer !Int !.a -> .a +g_timeout_add interval address id env = code { + ccall g_timeout_add "IpI:V:A" } -g_timeout_add_seconds :: !Int !Int !.a -> .a -g_timeout_add_seconds interval id env = code { - ccall clean_g_timeout_add_seconds "II:V:A" +g_timeout_add_seconds :: !Int !Pointer !Int !.a -> .a +g_timeout_add_seconds interval address id env = code { + ccall g_timeout_add_seconds "IpI:V:A" } gtk_accel_group_new :: !.a -> (!Pointer, !.a) |