Mercurial > emacs
changeset 62800:47eb71e6fd77
*** empty log message ***
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 27 May 2005 11:28:42 +0000 |
| parents | eba7c6883fe3 |
| children | cbda14f6fb9b |
| files | lisp/ChangeLog src/ChangeLog src/ccl.h |
| diffstat | 3 files changed, 37 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri May 27 11:28:30 2005 +0000 +++ b/lisp/ChangeLog Fri May 27 11:28:42 2005 +0000 @@ -1,3 +1,16 @@ +2005-05-27 Kenichi Handa <handa@m17n.org> + + * language/cyrillic.el: Add cyrillic-iso8859-5 characters in the + encoding table of windows-1251. + + * international/ucs-tables.el (ucs-set-table-for-input): If + translation-table-for-input of a coding system is a symbol, get + its translation-table property. + + * international/code-pages.el: Don't register a coding system into + non-iso-charset-alist more than once. + (cp-make-coding-system): Likewise. + 2005-05-26 John Wiegley <johnw@newartisans.com> * eshell/esh-cmd.el (eshell-eval-command): If the return value of
--- a/src/ChangeLog Fri May 27 11:28:30 2005 +0000 +++ b/src/ChangeLog Fri May 27 11:28:42 2005 +0000 @@ -1,3 +1,20 @@ +2005-05-27 Kenichi Handa <handa@m17n.org> + + * xterm.c (x_encode_char): Call check_ccl_update in advance. + + * ccl.c: Now an element of Vccl_program_table is a vector of + length 4, not 3. + (ccl_get_compiled_code): New arg idx. Caller changed. Adjusted + for the change of Vccl_program_table. + (setup_ccl_program): Adjusted for the change of + Vccl_program_table. + (check_ccl_update): New function. + (Fregister_ccl_program): Use ASET to set an element of a vector. + Adjusted for the change of Vccl_program_table. + + * ccl.h (struct ccl_program): New member idx. + (check_ccl_update): Extern it. + 2005-05-27 Juanma Barranquero <lekktu@gmail.com> * buffer.c (Fbuffer_local_value): Make argument name match its use
--- a/src/ccl.h Fri May 27 11:28:30 2005 +0000 +++ b/src/ccl.h Fri May 27 11:28:42 2005 +0000 @@ -33,6 +33,10 @@ /* Structure to hold information about running CCL code. Read comments in the file ccl.c for the detail of each field. */ struct ccl_program { + int idx; /* Index number of the CCL program. + -1 means that the program was given + by a vector, not by a program + name. */ int size; /* Size of the compiled code. */ Lisp_Object *prog; /* Pointer into the compiled code. */ int ic; /* Instruction Counter (index for PROG). */ @@ -90,6 +94,9 @@ execution of ccl program CCL_PROG (symbol or vector). */ extern int setup_ccl_program P_ ((struct ccl_program *, Lisp_Object)); +/* Check if CCL is updated or not. If not, re-setup members of CCL. */ +extern int check_ccl_update P_ ((struct ccl_program *)); + extern int ccl_driver P_ ((struct ccl_program *, unsigned char *, unsigned char *, int, int, int *));