Mercurial > hg > xemacs-beta

comparison src/mule-ccl.c @ 243:f220cc83d72e r20-5b20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b20
author cvs
date Mon, 13 Aug 2007 10:17:07 +0200
parents f955c73f5258
children 83b3d10dcba9
comparison
equal deleted inserted replaced
242:fc816b73a05f 243:f220cc83d72e
929 } 929 }
930 930
931 /* Setup fields of the structure pointed by CCL appropriately for the 931 /* Setup fields of the structure pointed by CCL appropriately for the
932 execution of compiled CCL code in VEC (vector of integer). */ 932 execution of compiled CCL code in VEC (vector of integer). */
933 void 933 void
934 setup_ccl_program (ccl, vec) 934 setup_ccl_program (struct ccl_program *ccl, Lisp_Object vec)
935 struct ccl_program *ccl;
936 Lisp_Object vec;
937 { 935 {
938 int i; 936 int i;
939 937
940 ccl->size = XVECTOR_LENGTH (vec); 938 ccl->size = XVECTOR_LENGTH (vec);
941 ccl->prog = XVECTOR_DATA (vec); 939 ccl->prog = XVECTOR_DATA (vec);