Mercurial > hg > xemacs-beta
diff src/pure.c @ 171:929b76928fce r20-3b12
Import from CVS: tag r20-3b12
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:47:52 +0200 |
parents | 376386a54a3c |
children | e121b013d1f0 |
line wrap: on
line diff
--- a/src/pure.c Mon Aug 13 09:47:00 2007 +0200 +++ b/src/pure.c Mon Aug 13 09:47:52 2007 +0200 @@ -21,6 +21,23 @@ #include "puresize.h" #include "lisp.h" +/* Moved from puresize.h to here so alloc.c does not get recompiled */ + +/* Current build process on NT does not generate a puresize_adjust.h */ +/* file. --marcpa */ +#ifdef WINDOWSNT +# define PURESIZE_ADJUSTMENT 1000000 +#else +# include <puresize_adjust.h> +#endif +#define PURESIZE ((RAW_PURESIZE) + (PURESIZE_ADJUSTMENT)) + +long int +get_PURESIZE(void) +{ + return PURESIZE; +} + Lisp_Object pure[PURESIZE / sizeof (Lisp_Object)] /* Force linker to put it into data space! */ #ifdef NO_UNION_TYPE