Mercurial > emacs
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; |