Mercurial > hg > xemacs-beta
diff src/mule-ccl.c @ 272:c5d627a313b1 r21-0b34
Import from CVS: tag r21-0b34
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:28:48 +0200 |
parents | 11cf20601dec |
children | 6330739388db |
line wrap: on
line diff
--- a/src/mule-ccl.c Mon Aug 13 10:27:41 2007 +0200 +++ b/src/mule-ccl.c Mon Aug 13 10:28:48 2007 +0200 @@ -21,8 +21,6 @@ /* Synched up with : FSF Emacs 20.2 */ -#include <stdio.h> - #ifdef emacs #include <config.h> @@ -34,6 +32,7 @@ #else /* not emacs */ +#include <stdio.h> #include "mulelib.h" #endif /* not emacs */ @@ -538,7 +537,7 @@ int i, j, op; int stack_idx = 0; - /* For the moment, we only support depth 256 of stack. */ + /* For the moment, we only support depth 256 of stack. */ struct ccl_prog_stack ccl_prog_stack_struct[256]; if (ic >= ccl->eof_ic) @@ -728,7 +727,7 @@ } CCL_INVALID_CMD; } - + ccl_prog_stack_struct[stack_idx].ccl_prog = ccl_prog; ccl_prog_stack_struct[stack_idx].ic = ic; stack_idx++; @@ -1062,7 +1061,7 @@ CHECK_SYMBOL (name); if (!NILP (ccl_prog)) CHECK_VECTOR (ccl_prog); - + for (i = 0; i < len; i++) { Lisp_Object slot = XVECTOR_DATA (Vccl_program_table)[i];