comparison src/profile.c @ 771:943eaba38521

[xemacs-hg @ 2002-03-13 08:51:24 by ben] The big ben-mule-21-5 check-in! Various files were added and deleted. See CHANGES-ben-mule. There are still some test suite failures. No crashes, though. Many of the failures have to do with problems in the test suite itself rather than in the actual code. I'll be addressing these in the next day or so -- none of the test suite failures are at all critical. Meanwhile I'll be trying to address the biggest issues -- i.e. build or run failures, which will almost certainly happen on various platforms. All comments should be sent to ben@xemacs.org -- use a Cc: if necessary when sending to mailing lists. There will be pre- and post- tags, something like pre-ben-mule-21-5-merge-in, and post-ben-mule-21-5-merge-in.
author ben
date Wed, 13 Mar 2002 08:54:06 +0000
parents 023b83f4e54b
children 6728e641994e
comparison
equal deleted inserted replaced
770:336a418893b5 771:943eaba38521
260 { 260 {
261 int count = specpdl_depth (); 261 int count = specpdl_depth ();
262 record_unwind_protect (profile_lock_unwind, Qnil); 262 record_unwind_protect (profile_lock_unwind, Qnil);
263 inside_profiling = 1; 263 inside_profiling = 1;
264 maphash (get_profiling_info_maphash, big_profile_table, &closure); 264 maphash (get_profiling_info_maphash, big_profile_table, &closure);
265 unbind_to (count, Qnil); 265 unbind_to (count);
266 } 266 }
267 return closure.accum; 267 return closure.accum;
268 } 268 }
269 269
270 static int 270 static int
344 */ ); 344 */ );
345 Vcall_count_profile_table = Qnil; 345 Vcall_count_profile_table = Qnil;
346 346
347 inside_profiling = 0; 347 inside_profiling = 0;
348 348
349 QSin_redisplay = build_string ("(in redisplay)"); 349 QSin_redisplay = build_msg_string ("(in redisplay)");
350 staticpro (&QSin_redisplay); 350 staticpro (&QSin_redisplay);
351 QSin_garbage_collection = build_string ("(in garbage collection)"); 351 QSin_garbage_collection = build_msg_string ("(in garbage collection)");
352 staticpro (&QSin_garbage_collection); 352 staticpro (&QSin_garbage_collection);
353 QSunknown = build_string ("(unknown)"); 353 QSunknown = build_msg_string ("(unknown)");
354 staticpro (&QSunknown); 354 staticpro (&QSunknown);
355 QSprocessing_events_at_top_level = 355 QSprocessing_events_at_top_level =
356 build_string ("(processing events at top level)"); 356 build_msg_string ("(processing events at top level)");
357 staticpro (&QSprocessing_events_at_top_level); 357 staticpro (&QSprocessing_events_at_top_level);
358 } 358 }