# HG changeset patch # User aidan # Date 1188294580 0 # Node ID 76737c305982f66d22cc4d6d3f8d69484088ae17 # Parent 76a0155cbd1cf07c7966eaf7d76c2cb12da1453f [xemacs-hg @ 2007-08-28 09:49:36 by aidan] Revert the last change to mule-ccl.c, on Steve Baur's objection. diff -r 76a0155cbd1c -r 76737c305982 src/ChangeLog --- a/src/ChangeLog Mon Aug 27 21:51:09 2007 +0000 +++ b/src/ChangeLog Tue Aug 28 09:49:40 2007 +0000 @@ -1,3 +1,9 @@ +2007-08-28 Aidan Kehoe + + * mule-ccl.c (ccl_driver): + Revert the last change to mule-ccl.c, on objection from SL + Baur. The change to lisp.h in the same commit sufficed. + 2007-08-17 Marcus Crestani * buffer.c (Fkill_buffer): diff -r 76a0155cbd1c -r 76737c305982 src/mule-ccl.c --- a/src/mule-ccl.c Mon Aug 27 21:51:09 2007 +0000 +++ b/src/mule-ccl.c Tue Aug 28 09:49:40 2007 +0000 @@ -1578,7 +1578,7 @@ Lisp_Object map, content, attrib, value; int point, size, fin_ic; - j = XCHAR_OR_INT (ccl_prog[ic]); ic++; /* number of maps. */ + j = XCHAR_OR_INT (ccl_prog[ic++]); /* number of maps. */ fin_ic = ic + j; op = reg[rrr]; if ((j > reg[RRR]) && (j >= 0)) @@ -1693,7 +1693,7 @@ stack_idx_of_map_multiple = 0; map_set_rest_length = - XCHAR_OR_INT (ccl_prog[ic]); ic++; /* number of maps and separators. */ + XCHAR_OR_INT (ccl_prog[ic++]); /* number of maps and separators. */ fin_ic = ic + map_set_rest_length; op = reg[rrr]; @@ -1880,7 +1880,7 @@ { Lisp_Object map, attrib, value, content; int size, point; - j = XCHAR_OR_INT (ccl_prog[ic]); ic++;/* map_id */ + j = XCHAR_OR_INT (ccl_prog[ic++]); /* map_id */ op = reg[rrr]; if (j >= XVECTOR (Vcode_conversion_map_vector)->size) {