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 *));