Mercurial > emacs
comparison src/alloc.c @ 10395:c121703d35c7
(Fgarbage_collect): Don't log the GC message.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 11 Jan 1995 02:04:58 +0000 |
parents | 162b3e6c4610 |
children | 4a9bc1042dbc |
comparison
equal
deleted
inserted
replaced
10394:afa796e2b954 | 10395:c121703d35c7 |
---|---|
1259 } | 1259 } |
1260 } | 1260 } |
1261 #endif /* MAX_SAVE_STACK > 0 */ | 1261 #endif /* MAX_SAVE_STACK > 0 */ |
1262 | 1262 |
1263 if (!noninteractive) | 1263 if (!noninteractive) |
1264 message1 ("Garbage collecting..."); | 1264 message1_nolog ("Garbage collecting..."); |
1265 | 1265 |
1266 /* Don't keep command history around forever */ | 1266 /* Don't keep command history around forever */ |
1267 tem = Fnthcdr (make_number (30), Vcommand_history); | 1267 tem = Fnthcdr (make_number (30), Vcommand_history); |
1268 if (CONSP (tem)) | 1268 if (CONSP (tem)) |
1269 XCONS (tem)->cdr = Qnil; | 1269 XCONS (tem)->cdr = Qnil; |
1374 consing_since_gc = 0; | 1374 consing_since_gc = 0; |
1375 if (gc_cons_threshold < 10000) | 1375 if (gc_cons_threshold < 10000) |
1376 gc_cons_threshold = 10000; | 1376 gc_cons_threshold = 10000; |
1377 | 1377 |
1378 if (omessage || minibuf_level > 0) | 1378 if (omessage || minibuf_level > 0) |
1379 message2 (omessage, omessage_length); | 1379 message2_nolog (omessage, omessage_length); |
1380 else if (!noninteractive) | 1380 else if (!noninteractive) |
1381 message1 ("Garbage collecting...done"); | 1381 message1_nolog ("Garbage collecting...done"); |
1382 | 1382 |
1383 return Fcons (Fcons (make_number (total_conses), | 1383 return Fcons (Fcons (make_number (total_conses), |
1384 make_number (total_free_conses)), | 1384 make_number (total_free_conses)), |
1385 Fcons (Fcons (make_number (total_symbols), | 1385 Fcons (Fcons (make_number (total_symbols), |
1386 make_number (total_free_symbols)), | 1386 make_number (total_free_symbols)), |