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)),