Mercurial > hg > xemacs-beta
comparison src/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 | 87175eb65ff4 |
| children | 7eec2a1f3412 48b63cd88a21 |
comparison
equal
deleted
inserted
replaced
| 4909:87175eb65ff4 | 4910:6bc1f3f6cf0d |
|---|---|
| 1 2010-02-01 Aidan Kehoe <kehoea@parhasard.net> | |
| 2 | |
| 3 * fns.c (internal_equalp): | |
| 4 Use bytecode_arithcompare, which takes two args, instead of | |
| 5 passing a stack pointer to Feqlsign. | |
| 6 Use CANONCASE(), not DOWNCASE(), for case-insensitive character | |
| 7 comparison. | |
| 8 Correct a comment here. | |
| 9 * casefiddle.c (casify_object): New operation in this function, | |
| 10 CASE_CANONICALIZE. | |
| 11 (Fcanoncase): New function, used for case-insensitive comparison. | |
| 12 * lisp.h: | |
| 13 Make Fcanoncase, bytecode_arithcompare visible here. | |
| 14 * bytecode.c (bytecode_arithcompare): | |
| 15 Make this visible to other files. | |
| 16 | |
| 1 2010-02-01 Ben Wing <ben@xemacs.org> | 17 2010-02-01 Ben Wing <ben@xemacs.org> |
| 2 | 18 |
| 3 * objects-gtk-impl.h: | 19 * objects-gtk-impl.h: |
| 4 * objects-gtk-impl.h (XCOLOR_INSTANCE_GTK_COLOR): | 20 * objects-gtk-impl.h (XCOLOR_INSTANCE_GTK_COLOR): |
| 5 * objects-gtk-impl.h (XFONT_INSTANCE_GTK_FONT): | 21 * objects-gtk-impl.h (XFONT_INSTANCE_GTK_FONT): |
