diff options
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/alloc.c b/src/alloc.c index 08dc26784cc..5bb528c64ab 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -376,7 +376,7 @@ struct gcpro *gcprolist; | |||
| 376 | /* Addresses of staticpro'd variables. Initialize it to a nonzero | 376 | /* Addresses of staticpro'd variables. Initialize it to a nonzero |
| 377 | value; otherwise some compilers put it into BSS. */ | 377 | value; otherwise some compilers put it into BSS. */ |
| 378 | 378 | ||
| 379 | #define NSTATICS 0x1000 | 379 | #define NSTATICS 0x800 |
| 380 | static Lisp_Object *staticvec[NSTATICS] = {&Vpurify_flag}; | 380 | static Lisp_Object *staticvec[NSTATICS] = {&Vpurify_flag}; |
| 381 | 381 | ||
| 382 | /* Index of next unused slot in staticvec. */ | 382 | /* Index of next unused slot in staticvec. */ |
| @@ -5030,7 +5030,7 @@ staticpro (Lisp_Object *varaddress) | |||
| 5030 | { | 5030 | { |
| 5031 | staticvec[staticidx++] = varaddress; | 5031 | staticvec[staticidx++] = varaddress; |
| 5032 | if (staticidx >= NSTATICS) | 5032 | if (staticidx >= NSTATICS) |
| 5033 | fatal ("NSTATICS too small. Try increasing and recompiling Emacs."); | 5033 | fatal ("NSTATICS too small; try increasing and recompiling Emacs."); |
| 5034 | } | 5034 | } |
| 5035 | 5035 | ||
| 5036 | 5036 | ||