/* Input event support for Emacs on the Microsoft Windows API.
- Copyright (C) 1992-1993, 1995, 2001-2012 Free Software Foundation, Inc.
+ Copyright (C) 1992-1993, 1995, 2001-2013 Free Software Foundation,
+ Inc.
This file is part of GNU Emacs.
0, 0, 0);
}
+#if HAVE_W32NOTIFY
static int
handle_file_notifications (struct input_event *hold_quit)
{
{
DWORD info_size = notifications_size;
Lisp_Object cs = intern ("utf-16le");
- Lisp_Object obj = get_watch_object (make_number (notifications_desc));
+ Lisp_Object obj = w32_get_watch_object (notifications_desc);
/* notifications_size could be zero when the buffer of
notifications overflowed on the OS level, or when the
Lisp_Object action = lispy_file_action (fni->Action);
inev.kind = FILE_NOTIFY_EVENT;
- inev.code = (ptrdiff_t)notifications_desc;
+ inev.code = (ptrdiff_t)XINT (XIL ((EMACS_INT)notifications_desc));
inev.timestamp = GetTickCount ();
inev.modifiers = 0;
inev.frame_or_window = callback;
leave_crit ();
return nevents;
}
+#else /* !HAVE_W32NOTIFY */
+static int
+handle_file_notifications (struct input_event *hold_quit)
+{
+ return 0;
+}
+#endif /* !HAVE_W32NOTIFY */
/* Here's an overview of how Emacs input works in non-GUI sessions on
MS-Windows. (For description of the GUI input, see the commentary