Mercurial > hg > xemacs-beta
comparison lisp/ChangeLog @ 4910:6bc1f3f6cf0d
Make canoncase visible to Lisp; use it with chars in internal_equalp.
src/ChangeLog addition:
2010-02-01 Aidan Kehoe <kehoea@parhasard.net>
* fns.c (internal_equalp):
Use bytecode_arithcompare, which takes two args, instead of
passing a stack pointer to Feqlsign.
Use CANONCASE(), not DOWNCASE(), for case-insensitive character
comparison.
Correct a comment here.
* casefiddle.c (casify_object): New operation in this function,
CASE_CANONICALIZE.
(Fcanoncase): New function, used for case-insensitive comparison.
* lisp.h:
Make Fcanoncase, bytecode_arithcompare visible here.
* bytecode.c (bytecode_arithcompare):
Make this visible to other files.
lisp/ChangeLog addition:
2010-02-01 Aidan Kehoe <kehoea@parhasard.net>
* cl-macs.el (equalp):
Remove special treatment for an #'equalp with a single character
constant argument, it was incorrect (it used #'downcase instead of
#'canoncase).
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Mon, 01 Feb 2010 17:57:04 +0000 |
parents | 9e7f5a77cc84 |
children | bedf3747a6d7 48b63cd88a21 |
comparison
equal
deleted
inserted
replaced
4909:87175eb65ff4 | 4910:6bc1f3f6cf0d |
---|---|
1 2010-02-01 Aidan Kehoe <kehoea@parhasard.net> | |
2 | |
3 * cl-macs.el (equalp): | |
4 Remove special treatment for an #'equalp with a single character | |
5 constant argument, it was incorrect (it used #'downcase instead of | |
6 #'canoncase). | |
7 | |
1 2010-02-01 Ben Wing <ben@xemacs.org> | 8 2010-02-01 Ben Wing <ben@xemacs.org> |
2 | 9 |
3 * cl-extra.el: | 10 * cl-extra.el: |
4 * cl-extra.el (cl-string-vector-equalp): Removed. | 11 * cl-extra.el (cl-string-vector-equalp): Removed. |
5 * cl-extra.el (cl-bit-vector-vector-equalp): Removed. | 12 * cl-extra.el (cl-bit-vector-vector-equalp): Removed. |