comparison src/mule-ccl.c @ 251:677f6a0ee643 r20-5b24

Import from CVS: tag r20-5b24
author cvs
date Mon, 13 Aug 2007 10:19:59 +0200
parents 83b3d10dcba9
children 11cf20601dec
comparison
equal deleted inserted replaced
250:f385a461c9aa 251:677f6a0ee643
531 int *reg = ccl->reg; 531 int *reg = ccl->reg;
532 int ic = ccl->ic; 532 int ic = ccl->ic;
533 int code = -1; /* init to illegal value, */ 533 int code = -1; /* init to illegal value, */
534 int field1, field2; 534 int field1, field2;
535 Lisp_Object *ccl_prog = ccl->prog; 535 Lisp_Object *ccl_prog = ccl->prog;
536 unsigned char *src = source, *src_end = src + src_bytes; 536 CONST unsigned char *src = source, *src_end = src + src_bytes;
537 int jump_address = 0; /* shut up the compiler */ 537 int jump_address = 0; /* shut up the compiler */
538
538 int i, j, op; 539 int i, j, op;
539 int stack_idx = 0; 540 int stack_idx = 0;
540 /* For the moment, we only support depth 256 of stack. */ 541 /* For the moment, we only support depth 256 of stack. */
541 struct ccl_prog_stack ccl_prog_stack_struct[256]; 542 struct ccl_prog_stack ccl_prog_stack_struct[256];
542 543