Mercurial > hg > xemacs-beta
diff src/unicode.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 | 3889ef128488 0af042a0c116 |
line wrap: on
line diff
--- a/src/unicode.c Sat Jan 22 23:29:25 2011 +0000 +++ b/src/unicode.c Sun Jan 23 12:47:02 2011 +0000 @@ -3294,8 +3294,8 @@ Fmake_coding_system_internal (Qutf_8, Qunicode, build_defer_string ("UTF-8"), - nconc2 (list4 (Qdocumentation, - build_defer_string ( + listu (Qdocumentation, + build_defer_string ( "UTF-8 Unicode encoding -- ASCII-compatible 8-bit variable-width encoding\n" "sharing the following principles with the Mule-internal encoding:\n" "\n" @@ -3317,6 +3317,7 @@ " -- Given only the leading byte, you know how many following bytes\n" " are present.\n" ), - Qmnemonic, build_ascstring ("UTF8")), - list2 (Qunicode_type, Qutf_8))); + Qmnemonic, build_ascstring ("UTF8"), + Qunicode_type, Qutf_8, + Qunbound)); }