X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/d70392acd44d4a040c05aed7c4175944525e266c..3c9dc1cf0d6be64608cd309ad042d74e4fc02049:/src/puresize.h diff --git a/src/puresize.h b/src/puresize.h index 183579d568..fd5bf1829a 100644 --- a/src/puresize.h +++ b/src/puresize.h @@ -1,5 +1,5 @@ /* How much read-only Lisp storage a dumped Emacs needs. - Copyright (C) 1993 Free Software Foundation, Inc. + Copyright (C) 1993, 2002 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -42,13 +42,13 @@ Boston, MA 02111-1307, USA. */ #endif #ifndef BASE_PURESIZE -#define BASE_PURESIZE (515000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA) +#define BASE_PURESIZE (910000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA) #endif /* Increase BASE_PURESIZE by a ratio depending on the machine's word size. */ #ifndef PURESIZE_RATIO #if VALBITS + GCTYPEBITS + 1 > 32 -#define PURESIZE_RATIO 8/5 /* Don't surround with `()'. */ +#define PURESIZE_RATIO 9/5 /* Don't surround with `()'. */ #else #define PURESIZE_RATIO 1 #endif @@ -90,7 +90,7 @@ extern char my_edata[]; #else /* not VIRT_ADDRESS_VARIES, not PNTR_COMPARISON_TYPE */ extern char my_edata[]; - + #define PURE_P(obj) \ (XPNTR (obj) < (unsigned int) my_edata)