Commit 866ebf45 authored by Kenichi Handa's avatar Kenichi Handa

(Fccl_execute_on_string): Fix setting elements of STATUS.

parent ddda21d3
......@@ -2196,8 +2196,8 @@ See the documentation of `define-ccl-program' for the detail of CCL program. */
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);
ASET (status, i, make_number (ccl.reg[i]));
ASET (status, 8, make_number (ccl.ic));
UNGCPRO;
if (NILP (unibyte_p))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment