* src/profiler.c: Delete.

[bpt/emacs.git] / src / w32notify.c

diff --git a/src/w32notify.c b/src/w32notify.c
index da7c551..8491a6f 100644 (file)
--- a/src/w32notify.c
+++ b/src/w32notify.c
@@ -1,5 +1,5 @@
 /* Filesystem notifications support for GNU Emacs on the Microsoft Windows API.
-   Copyright (C) 2012-2013 Free Software Foundation, Inc.
+   Copyright (C) 2012-2014 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -247,7 +247,6 @@ watch_worker (LPVOID arg)
 
   do {
     BOOL status;
-    DWORD sleep_result;
     DWORD bytes_ret = 0;
 
     if (dirwatch->dir)
@@ -275,7 +274,7 @@ watch_worker (LPVOID arg)
     /* Sleep indefinitely until awoken by the I/O completion, which
        could be either a change notification or a cancellation of the
        watch.  */
-    sleep_result = SleepEx (INFINITE, TRUE);
+    SleepEx (INFINITE, TRUE);
   } while (!dirwatch->terminate);
 
   return 0;
@@ -287,7 +286,6 @@ static struct notification *
 start_watching (const char *file, HANDLE hdir, BOOL subdirs, DWORD flags)
 {
   struct notification *dirwatch = xzalloc (sizeof (struct notification));
-  HANDLE thr;
 
   dirwatch->signature = DIRWATCH_SIGNATURE;
   dirwatch->buf = xmalloc (16384);
@@ -641,6 +639,8 @@ globals_of_w32notify (void)
 void
 syms_of_w32notify (void)
 {
+#include "w32notify.x"
+
   DEFSYM (Qfile_name, "file-name");
   DEFSYM (Qdirectory_name, "directory-name");
   DEFSYM (Qattributes, "attributes");
@@ -651,9 +651,6 @@ syms_of_w32notify (void)
   DEFSYM (Qsecurity_desc, "security-desc");
   DEFSYM (Qsubtree, "subtree");
 
-  defsubr (&Sw32notify_add_watch);
-  defsubr (&Sw32notify_rm_watch);
-
   staticpro (&watch_list);
 
   Fprovide (intern_c_string ("w32notify"), Qnil);