X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/d70392acd44d4a040c05aed7c4175944525e266c..60e992936ae72fa3f32c8549f74dde22fa0e4e37:/src/puresize.h diff --git a/src/puresize.h b/src/puresize.h index 183579d568..6ca10b22fd 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 (1100000 + 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,9 +90,12 @@ 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) #endif /* PNTR_COMPARISON_TYPE */ #endif /* VIRT_ADDRESS_VARIES */ + +/* arch-tag: fd9b0a91-a70e-4729-a75a-6bb4ca1ce14f + (do not change this comment) */