diff --git a/GMainLoop.xs b/GMainLoop.xs
index 38e2c38..e11b6f8 100644
--- a/GMainLoop.xs
+++ b/GMainLoop.xs
@@ -553,7 +553,7 @@ g_io_add_watch (class, fd, condition, callback, data=NULL, priority=G_PRIORITY_D
     CODE:
 #ifdef USE_SOCKETS_AS_HANDLES
         /* native win32 doesn't have fd's, so first convert perls fd into a winsock fd */
-        channel = g_io_channel_win32_new_socket ((HANDLE)win32_get_osfhandle (fd));
+        channel = g_io_channel_win32_new_socket ((gint)win32_get_osfhandle (fd));
 #else
         channel = g_io_channel_unix_new (fd);
 #endif  /* USE_SOCKETS_AS_HANDLES */