mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-17 11:20:39 -08:00
Utility function to make a list from specified amount of objects.
* lisp.h (enum constype): New datatype. (listn): New prototype. * alloc.c (listn): New function. (Fmemory_use_count, syms_of_alloc): Use it. * buffer.c (syms_of_buffer): Likewise. * callint.c (syms_of_callint): Likewise. * charset.c (define_charset_internal): Likewise. * coding.c (syms_of_coding): Likewise. * keymap.c (syms_of_keymap): Likewise. * search.c (syms_of_search): Likewise. * syntax.c (syms_of_syntax): Likewise. * w32.c (init_environment): Likewise. * w32fns.c (Fw32_battery_status, syms_of_w32fns): Likewise. * xdisp.c (syms_of_xdisp): Likewise. * xfns.c (syms_of_xfns): Likewise.
This commit is contained in:
parent
ca1302a40a
commit
694b6c97eb
14 changed files with 130 additions and 84 deletions
|
|
@ -10411,7 +10411,7 @@ syms_of_coding (void)
|
|||
|
||||
DEFSYM (Qcoding_system_error, "coding-system-error");
|
||||
Fput (Qcoding_system_error, Qerror_conditions,
|
||||
pure_cons (Qcoding_system_error, pure_cons (Qerror, Qnil)));
|
||||
listn (PURE, 2, Qcoding_system_error, Qerror));
|
||||
Fput (Qcoding_system_error, Qerror_message,
|
||||
build_pure_c_string ("Invalid coding system"));
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue