forked from pool/xemacs
c904c531e6
I see, please have a look at this then OBS-URL: https://build.opensuse.org/request/show/130343 OBS-URL: https://build.opensuse.org/package/show/M17N/xemacs?expand=0&rev=54
41 lines
1.5 KiB
Diff
41 lines
1.5 KiB
Diff
Index: xemacs-21.5.29/src/mule-ccl.c
|
|
===================================================================
|
|
--- xemacs-21.5.29.orig/src/mule-ccl.c
|
|
+++ xemacs-21.5.29/src/mule-ccl.c
|
|
@@ -1612,7 +1612,7 @@ ccl_driver (struct ccl_program *ccl,
|
|
Lisp_Object map, content, attrib, value;
|
|
int point, size, fin_ic;
|
|
|
|
- j = XCHAR_OR_FIXNUM (ccl_prog[ic++]); /* number of maps. */
|
|
+ j = XCHAR_OR_FIXNUM (ccl_prog[ic]); ic++; /* number of maps. */
|
|
fin_ic = ic + j;
|
|
op = reg[rrr];
|
|
if ((j > reg[RRR]) && (j >= 0))
|
|
@@ -1630,7 +1630,7 @@ ccl_driver (struct ccl_program *ccl,
|
|
for (;i < j;i++)
|
|
{
|
|
size = XVECTOR (Vcode_conversion_map_vector)->size;
|
|
- point = XCHAR_OR_FIXNUM (ccl_prog[ic++]);
|
|
+ point = XCHAR_OR_FIXNUM (ccl_prog[ic]); ic++;
|
|
if (point >= size) continue;
|
|
map =
|
|
XVECTOR (Vcode_conversion_map_vector)->contents[point];
|
|
@@ -1727,7 +1727,7 @@ ccl_driver (struct ccl_program *ccl,
|
|
stack_idx_of_map_multiple = 0;
|
|
|
|
map_set_rest_length =
|
|
- XCHAR_OR_FIXNUM (ccl_prog[ic++]); /* number of maps and separators. */
|
|
+ XCHAR_OR_FIXNUM (ccl_prog[ic]); ic++; /* number of maps and separators. */
|
|
fin_ic = ic + map_set_rest_length;
|
|
op = reg[rrr];
|
|
|
|
@@ -1914,7 +1914,7 @@ ccl_driver (struct ccl_program *ccl,
|
|
{
|
|
Lisp_Object map, attrib, value, content;
|
|
int size, point;
|
|
- j = XCHAR_OR_FIXNUM (ccl_prog[ic++]); /* map_id */
|
|
+ j = XCHAR_OR_FIXNUM (ccl_prog[ic]); ic++; /* map_id */
|
|
op = reg[rrr];
|
|
if (j >= XVECTOR (Vcode_conversion_map_vector)->size)
|
|
{
|