[Emacs-diffs] Changes to emacs/src/ccl.c [lexbind]

[Miles Bader]

Index: emacs/src/ccl.c
diff -c emacs/src/ccl.c:1.76.4.3 emacs/src/ccl.c:1.76.4.4
*** emacs/src/ccl.c:1.76.4.3    Fri Nov 21 00:36:16 2003
--- emacs/src/ccl.c     Tue Jul  6 09:14:34 2004
***************
*** 2196,2203 ****
    produced = ccl_driver (&ccl, SDATA (str), outbuf,
                         SBYTES (str), outbufsize, (int *) 0);
    for (i = 0; i < 8; i++)
!     XSET (AREF (status, i), Lisp_Int, ccl.reg[i]);
!   XSETINT (AREF (status, 8), ccl.ic);
    UNGCPRO;
  
    if (NILP (unibyte_p))
--- 2196,2203 ----
    produced = ccl_driver (&ccl, SDATA (str), outbuf,
                         SBYTES (str), outbufsize, (int *) 0);
    for (i = 0; i < 8; i++)
!     ASET (status, i, make_number (ccl.reg[i]));
!   ASET (status, 8, make_number (ccl.ic));
    UNGCPRO;
  
    if (NILP (unibyte_p))