Mercurial > emacs
comparison src/alloc.c @ 11892:6be0b7a0ac44
(Fgarbage_collect): Clear consing_since_gc first thing.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 24 May 1995 01:39:24 +0000 |
| parents | 53ccd2d608ee |
| children | cdc859dd813b |
comparison
equal
deleted
inserted
replaced
| 11891:937c7fced6ee | 11892:6be0b7a0ac44 |
|---|---|
| 1349 register Lisp_Object tem; | 1349 register Lisp_Object tem; |
| 1350 char *omessage = echo_area_glyphs; | 1350 char *omessage = echo_area_glyphs; |
| 1351 int omessage_length = echo_area_glyphs_length; | 1351 int omessage_length = echo_area_glyphs_length; |
| 1352 char stack_top_variable; | 1352 char stack_top_variable; |
| 1353 register int i; | 1353 register int i; |
| 1354 | |
| 1355 /* In case user calls debug_print during GC, | |
| 1356 don't let that cause a recursive GC. */ | |
| 1357 consing_since_gc = 0; | |
| 1354 | 1358 |
| 1355 /* Save a copy of the contents of the stack, for debugging. */ | 1359 /* Save a copy of the contents of the stack, for debugging. */ |
| 1356 #if MAX_SAVE_STACK > 0 | 1360 #if MAX_SAVE_STACK > 0 |
| 1357 if (NILP (Vpurify_flag)) | 1361 if (NILP (Vpurify_flag)) |
| 1358 { | 1362 { |
