# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1154782910 0
# Node ID 94e8cc9b752d772b192dcf7b49fe7ab5fe746b05
# Parent  875a47d81ba56c0692bd21ee860195388c351b12
Include w32.h.
(valid_lisp_object_p) [WINDOWSNT]: Call w32_valid_pointer_p to do the job.

diff -r 875a47d81ba5 -r 94e8cc9b752d src/alloc.c
--- a/src/alloc.c	Sat Aug 05 13:01:25 2006 +0000
+++ b/src/alloc.c	Sat Aug 05 13:01:50 2006 +0000
@@ -80,6 +80,7 @@
 
 #ifdef WINDOWSNT
 #include <fcntl.h>
+#include "w32.h"
 #endif
 
 #ifdef DOUG_LEA_MALLOC
@@ -4615,6 +4616,9 @@
 valid_pointer_p (p)
      void *p;
 {
+#ifdef WINDOWSNT
+  return w32_valid_pointer_p (p, 16);
+#else
   int fd;
 
   /* Obviously, we cannot just access it (we would SEGV trying), so we
@@ -4631,6 +4635,7 @@
     }
 
     return -1;
+#endif
 }
 
 /* Return 1 if OBJ is a valid lisp object.