Mercurial > hg > xemacs-beta
diff lisp/cl.el @ 5354:22c4e67a2e69
Remove #'acons from cl.el, make the version in alloc.c visible to Lisp
src/ChangeLog addition:
2011-02-09 Aidan Kehoe <kehoea@parhasard.net>
* alloc.c (Facons):
* alloc.c (Fobject_memory_usage):
* alloc.c (syms_of_alloc):
* faces.c (complex_vars_of_faces):
* lisp.h:
* mc-alloc.c (Fmc_alloc_memory_usage):
Rename acons() to Facons(), make it visible to Lisp. Change uses
of the function in C accordingly.
lisp/ChangeLog addition:
2011-02-09 Aidan Kehoe <kehoea@parhasard.net>
* cl.el (acons): Removed, make the implementation in alloc.c
visible to Lisp instead.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Wed, 09 Feb 2011 20:15:50 +0000 |
parents | 38e24b8be4ea |
children | 436e67ca8c79 00e79bbbe48f |
line wrap: on
line diff
--- a/lisp/cl.el Mon Feb 07 12:01:24 2011 +0000 +++ b/lisp/cl.el Wed Feb 09 20:15:50 2011 +0000 @@ -544,9 +544,7 @@ (defalias 'cl-round 'round*) (defalias 'cl-mod 'mod*) -(defun acons (key value alist) - "Return a new alist created by adding (KEY . VALUE) to ALIST." - (cons (cons key value) alist)) +;;; XEmacs; #'acons is in C. (defun pairlis (keys values &optional alist) "Make an alist from KEYS and VALUES.