Mercurial > emacs
annotate src/ccl.h @ 20542:828d91461655
(marker.o): Depend on charset.h.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 01 Jan 1998 02:44:17 +0000 |
parents | 275d6855275a |
children | b5b97880b7d0 |
rev | line source |
---|---|
17052 | 1 /* Header for CCL (Code Conversion Language) interpreter. |
2 Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. | |
18341
33e78cc7f058
Change copyright notices.
Richard M. Stallman <rms@gnu.org>
parents:
17071
diff
changeset
|
3 Licensed to the Free Software Foundation. |
17052 | 4 |
17071 | 5 This file is part of GNU Emacs. |
6 | |
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) | |
10 any later version. | |
17052 | 11 |
17071 | 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. | |
17052 | 16 |
17071 | 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. */ | |
17052 | 21 |
22 #ifndef _CCL_H | |
23 #define _CCL_H | |
24 | |
25 /* Structure to hold information about running CCL code. Read | |
26 comments in the file ccl.c for the detail of each field. */ | |
27 struct ccl_program { | |
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 | |
32 processing code. */ | |
33 int reg[8]; /* CCL registers, reg[7] is used for | |
34 condition flag of relational | |
35 operations. */ | |
36 int last_block; /* Set to 1 while processing the last | |
37 block. */ | |
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. */ | |
42 }; | |
43 | |
44 /* This data type is used for the spec field of the structure | |
45 coding_system. */ | |
46 | |
47 struct ccl_spec { | |
48 struct ccl_program decoder; | |
49 struct ccl_program encoder; | |
50 }; | |
51 | |
52 /* Alist of fontname patterns vs corresponding CCL program. */ | |
53 extern Lisp_Object Vfont_ccl_encoder_alist; | |
54 | |
20306
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
55 /* Setup fields of the structure pointed by CCL appropriately for the |
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
56 execution of compiled CCL code in VEC (vector of integer). */ |
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
57 extern void setup_ccl_program P_ ((struct ccl_program *, Lisp_Object)); |
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
58 |
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
59 extern int ccl_driver P_ ((struct ccl_program *, unsigned char *, |
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
60 unsigned char *, int, int, int *)); |
275d6855275a
Add declaration of setup_ccl_program and ccl_driver.
Andreas Schwab <schwab@suse.de>
parents:
18341
diff
changeset
|
61 |
17052 | 62 #endif /* _CCL_H */ |