Mercurial > hg > xemacs-beta

comparison src/mule-ccl.h @ 5118:e0db3c197671 ben-lisp-object

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge up to latest default branch, doesn't compile yet
author Ben Wing <ben@xemacs.org>
date Sat, 26 Dec 2009 21:18:49 -0600
parents 0c54de4c4b9d
children 308d34e9f07d
comparison
equal deleted inserted replaced
5117:3742ea8250b5 5118:e0db3c197671
67 internal format. */ 67 internal format. */
68 #define CCL_CODING_EOL_CRLF 1 /* Sequence of carriage-return and 68 #define CCL_CODING_EOL_CRLF 1 /* Sequence of carriage-return and
69 line-feed. */ 69 line-feed. */
70 #define CCL_CODING_EOL_CR 2 /* Carriage-return only. */ 70 #define CCL_CODING_EOL_CR 2 /* Carriage-return only. */
71 71
72 /* Alist of fontname patterns vs corresponding CCL program. */ 72 /* If OBJECT is symbol designating a registered CCL program, return it.
73 extern Lisp_Object Vfont_ccl_encoder_alist; 73 Else if OBJECT is a vector CCL program with no unresolved symbols, return
74 it.
75 Else, if OBJECT is a vector CCL program with unresolved symbols, return a
76 newly-created vector reflecting the CCL program with all symbols
77 resolved, if that is currently possible in this XEmacs.
74 78
75 /* Setup fields of the structure pointed by CCL appropriately for the 79 Otherwise, signal `invalid-argument'. */
76 execution of ccl program CCL_PROG (symbol or vector). */ 80 extern Lisp_Object get_ccl_program (Lisp_Object object);
77 extern int setup_ccl_program (struct ccl_program *, Lisp_Object); 81
82 /* Set up fields of the structure pointed by CCL appropriately for the
83 execution of ccl program CCL_PROG (a symbol or a vector).
84
85 If CCL_PROG is a vector and contains unresolved symbols, this function
86 will throw an assertion failure. To avoid this, call get_ccl_program at
87 the point that you receive the CCL program from Lisp, and use and store
88 its (resolved) result instead. */
89 extern int setup_ccl_program (struct ccl_program *, Lisp_Object ccl_prog);
78 90
79 extern int ccl_driver (struct ccl_program *, const unsigned char *, 91 extern int ccl_driver (struct ccl_program *, const unsigned char *,
80 unsigned_char_dynarr *, int, int *, int); 92 unsigned_char_dynarr *, int, int *, int);
81 93
82 EXFUN (Fregister_ccl_program, 2); 94 EXFUN (Fregister_ccl_program, 2);