Mercurial > hg > xemacs-beta
diff src/mule-ccl.c @ 4134:ac5a714be3a2
[xemacs-hg @ 2007-08-21 20:32:33 by aidan]
Don't use args to XINT_OR_CHAR where multiple evaluation is possible; revise
X_I_O_C to not multiply evaluate.
| author | aidan |
|---|---|
| date | Tue, 21 Aug 2007 20:32:37 +0000 |
| parents | 6f05405e63fc |
| children | 76737c305982 |
line wrap: on
line diff
--- a/src/mule-ccl.c Tue Aug 21 12:39:15 2007 +0000 +++ b/src/mule-ccl.c Tue Aug 21 20:32:37 2007 +0000 @@ -1578,7 +1578,7 @@ Lisp_Object map, content, attrib, value; int point, size, fin_ic; - j = XCHAR_OR_INT (ccl_prog[ic++]); /* number of maps. */ + j = XCHAR_OR_INT (ccl_prog[ic]); 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++]); /* number of maps and separators. */ + XCHAR_OR_INT (ccl_prog[ic]); 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++]); /* map_id */ + j = XCHAR_OR_INT (ccl_prog[ic]); ic++;/* map_id */ op = reg[rrr]; if (j >= XVECTOR (Vcode_conversion_map_vector)->size) {