1 /* Header for CCL (Code Conversion Language) interpreter.
2 Copyright (C) 1995 Free Software Foundation, Inc.
3 Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
5 This file is part of GNU Emacs.
7 GNU Emacs is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GNU Emacs is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU Emacs; see the file COPYING. If not, write to
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
25 /* Structure to hold information about running CCL code. Read
26 comments in the file ccl.c for the detail of each field. */
28 int size
; /* Size of the compiled code. */
29 Lisp_Object
*prog
; /* Pointer into the compiled code. */
30 int ic
; /* Instruction Counter (index for PROG). */
31 int eof_ic
; /* Instruction Counter for end-of-file
33 int reg
[8]; /* CCL registers, reg[7] is used for
34 condition flag of relational
36 int last_block
; /* Set to 1 while processing the last
38 int status
; /* Exit status of the CCL program. */
39 int buf_magnification
; /* Output buffer magnification. How
40 many times bigger the output buffer
41 should be than the input buffer. */
44 /* This data type is used for the spec field of the structure
48 struct ccl_program decoder
;
49 struct ccl_program encoder
;
52 /* Alist of fontname patterns vs corresponding CCL program. */
53 extern Lisp_Object Vfont_ccl_encoder_alist
;