/[emacs]/emacs/src/ccl.c
ViewVC logotype

Diff of /emacs/src/ccl.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.76.4.3 by miles, Fri Nov 21 00:36:16 2003 UTC revision 1.76.4.4 by miles, Tue Jul 6 09:14:34 2004 UTC
# Line 2196  See the documentation of `define-ccl-pro Line 2196  See the documentation of `define-ccl-pro
2196    produced = ccl_driver (&ccl, SDATA (str), outbuf,    produced = ccl_driver (&ccl, SDATA (str), outbuf,
2197                           SBYTES (str), outbufsize, (int *) 0);                           SBYTES (str), outbufsize, (int *) 0);
2198    for (i = 0; i < 8; i++)    for (i = 0; i < 8; i++)
2199      XSET (AREF (status, i), Lisp_Int, ccl.reg[i]);      ASET (status, i, make_number (ccl.reg[i]));
2200    XSETINT (AREF (status, 8), ccl.ic);    ASET (status, 8, make_number (ccl.ic));
2201    UNGCPRO;    UNGCPRO;
2202    
2203    if (NILP (unibyte_p))    if (NILP (unibyte_p))

Legend:
Removed from v.1.76.4.3  
changed lines
  Added in v.1.76.4.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26