Mercurial > hg > xemacs-beta
diff src/profile.c @ 5345:db326b8fe982
Use Ben's recently-introduced listu (), where appropriate.
2011-01-23 Aidan Kehoe <kehoea@parhasard.net>
* file-coding.c (complex_vars_of_file_coding):
* intl-win32.c (complex_vars_of_intl_win32):
* profile.c (Fget_profiling_info):
* unicode.c (complex_vars_of_unicode):
Replace various awkward calls to nconc2 () with list6 () with
analogous calls to Ben's relatively-recently introduced listu (),
constructing a list from an arbitrary number of C arguments.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Sun, 23 Jan 2011 12:47:02 +0000 |
| parents | c096d8051f89 |
| children | 0af042a0c116 |
line wrap: on
line diff
--- a/src/profile.c Sat Jan 22 23:29:25 2011 +0000 +++ b/src/profile.c Sun Jan 23 12:47:02 2011 +0000 @@ -542,15 +542,16 @@ unbind_to (count); } - retv = nconc2 (list6 (Qtiming, closure.timing, Qtotal_timing, - copy_hash_table_or_blank (Vtotal_timing_profile_table), - Qcall_count, - copy_hash_table_or_blank (Vcall_count_profile_table)), - list4 (Qgc_usage, - copy_hash_table_or_blank (Vgc_usage_profile_table), - Qtotal_gc_usage, - copy_hash_table_or_blank (Vtotal_gc_usage_profile_table - ))); + retv = listu (Qtiming, closure.timing, + Qtotal_timing, + copy_hash_table_or_blank (Vtotal_timing_profile_table), + Qcall_count, + copy_hash_table_or_blank (Vcall_count_profile_table), + Qgc_usage, + copy_hash_table_or_blank (Vgc_usage_profile_table), + Qtotal_gc_usage, + copy_hash_table_or_blank (Vtotal_gc_usage_profile_table), + Qunbound); unbind_to (depth); return retv; }