Mercurial > hg > xemacs-beta

comparison src/mule-ccl.c @ 185:3d6bfa290dbd r20-3b19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b19
author cvs
date Mon, 13 Aug 2007 09:55:28 +0200
parents 8eaf7971accc
children 78f53ef88e17
comparison
equal deleted inserted replaced
184:bcd2674570bf 185:3d6bfa290dbd
542 unsigned_char_dynarr *outbuf; 542 unsigned_char_dynarr *outbuf;
543 543
544 set_ccl_program_from_lisp_values (&ccl, ccl_program, status); 544 set_ccl_program_from_lisp_values (&ccl, ccl_program, status);
545 CHECK_STRING (str); 545 CHECK_STRING (str);
546 546
547 outbuf = Dynarr_new (unsigned char); 547 outbuf = Dynarr_new (unsigned_char);
548 len = ccl_driver (&ccl, XSTRING_DATA (str), outbuf, XSTRING_LENGTH (str), 0); 548 len = ccl_driver (&ccl, XSTRING_DATA (str), outbuf, XSTRING_LENGTH (str), 0);
549 ccl_driver (&ccl, (unsigned char *) "", outbuf, 0, 1); 549 ccl_driver (&ccl, (unsigned char *) "", outbuf, 0, 1);
550 set_lisp_status_from_ccl_program (status, &ccl); 550 set_lisp_status_from_ccl_program (status, &ccl);
551 551
552 val = make_string (Dynarr_atp (outbuf, 0), len); 552 val = make_string (Dynarr_atp (outbuf, 0), len);