comparison src/ccl.c @ 17370:6db43d8c9dfc

(ccl_driver): Fix Lisp_Object/integer confusion.
author Karl Heuer <kwzh@gnu.org>
date Thu, 10 Apr 1997 22:19:52 +0000
parents 15fa68d983e7
children 25d58ba29c1b
comparison
equal deleted inserted replaced
17369:566b26e1930e 17370:6db43d8c9dfc
539 int *consumed; 539 int *consumed;
540 { 540 {
541 register int *reg = ccl->reg; 541 register int *reg = ccl->reg;
542 register int ic = ccl->ic; 542 register int ic = ccl->ic;
543 register int code, field1, field2; 543 register int code, field1, field2;
544 register int *ccl_prog = ccl->prog; 544 register Lisp_Object *ccl_prog = ccl->prog;
545 unsigned char *src = source, *src_end = src + src_bytes; 545 unsigned char *src = source, *src_end = src + src_bytes;
546 unsigned char *dst = destination, *dst_end = dst + dst_bytes; 546 unsigned char *dst = destination, *dst_end = dst + dst_bytes;
547 int jump_address; 547 int jump_address;
548 int i, j, op; 548 int i, j, op;
549 int stack_idx = 0; 549 int stack_idx = 0;