Include w32.h.
(valid_lisp_object_p) [WINDOWSNT]: Call w32_valid_pointer_p to do the job.
This commit is contained in:
parent
0c5c0e3dfe
commit
f892cf9c9d
1 changed files with 5 additions and 0 deletions
|
|
@ -80,6 +80,7 @@ extern POINTER_TYPE *sbrk ();
|
|||
|
||||
#ifdef WINDOWSNT
|
||||
#include <fcntl.h>
|
||||
#include "w32.h"
|
||||
#endif
|
||||
|
||||
#ifdef DOUG_LEA_MALLOC
|
||||
|
|
@ -4615,6 +4616,9 @@ int
|
|||
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 @@ valid_pointer_p (p)
|
|||
}
|
||||
|
||||
return -1;
|
||||
#endif
|
||||
}
|
||||
|
||||
/* Return 1 if OBJ is a valid lisp object.
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue