Mercurial > emacs
comparison src/alloc.c @ 90140:02f1dbc4a199
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-35
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 228-240)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 53-58)
- Merge from emacs--cvs-trunk--0
- Update from CVS
- Collapse feature addition/removal within single ChangeLog entry
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sat, 09 Apr 2005 02:16:29 +0000 |
parents | 7a3341d65a12 d24c6e8f9add |
children | f042e7c0fe20 |
comparison
equal
deleted
inserted
replaced
90139:e0d294b9b23e | 90140:02f1dbc4a199 |
---|---|
4641 | 4641 |
4642 /* Can't GC if pure storage overflowed because we can't determine | 4642 /* Can't GC if pure storage overflowed because we can't determine |
4643 if something is a pure object or not. */ | 4643 if something is a pure object or not. */ |
4644 if (pure_bytes_used_before_overflow) | 4644 if (pure_bytes_used_before_overflow) |
4645 return Qnil; | 4645 return Qnil; |
4646 | |
4647 CHECK_CONS_LIST (); | |
4646 | 4648 |
4647 /* Don't keep undo information around forever. | 4649 /* Don't keep undo information around forever. |
4648 Do this early on, so it is no problem if the user quits. */ | 4650 Do this early on, so it is no problem if the user quits. */ |
4649 { | 4651 { |
4650 register struct buffer *nextb = all_buffers; | 4652 register struct buffer *nextb = all_buffers; |
4834 #if GC_MARK_STACK == GC_USE_GCPROS_CHECK_ZOMBIES && 0 | 4836 #if GC_MARK_STACK == GC_USE_GCPROS_CHECK_ZOMBIES && 0 |
4835 dump_zombies (); | 4837 dump_zombies (); |
4836 #endif | 4838 #endif |
4837 | 4839 |
4838 UNBLOCK_INPUT; | 4840 UNBLOCK_INPUT; |
4841 | |
4842 CHECK_CONS_LIST (); | |
4839 | 4843 |
4840 /* clear_marks (); */ | 4844 /* clear_marks (); */ |
4841 gc_in_progress = 0; | 4845 gc_in_progress = 0; |
4842 | 4846 |
4843 consing_since_gc = 0; | 4847 consing_since_gc = 0; |