Mercurial > emacs
annotate src/font.h @ 96951:d446aa6e3dda
(ELCFILES): Remove isearch-multi.elc. Add misearch.elc.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Wed, 23 Jul 2008 23:50:56 +0000 |
parents | d45acf0c8d23 |
children | 9592c50233ab |
rev | line source |
---|---|
90400 | 1 /* font.h -- Interface definition for font handling. |
91552 | 2 Copyright (C) 2006, 2007, 2008 Free Software Foundation, Inc. |
3 Copyright (C) 2006, 2007, 2008 | |
90400 | 4 National Institute of Advanced Industrial Science and Technology (AIST) |
5 Registration Number H13PRO009 | |
6 | |
7 This file is part of GNU Emacs. | |
8 | |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94925
diff
changeset
|
9 GNU Emacs is free software: you can redistribute it and/or modify |
90400 | 10 it under the terms of the GNU General Public License as published by |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94925
diff
changeset
|
11 the Free Software Foundation, either version 3 of the License, or |
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94925
diff
changeset
|
12 (at your option) any later version. |
90400 | 13 |
14 GNU Emacs is distributed in the hope that it will be useful, | |
15 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 GNU General Public License for more details. | |
18 | |
19 You should have received a copy of the GNU General Public License | |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94925
diff
changeset
|
20 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ |
90400 | 21 |
22 #ifndef EMACS_FONT_H | |
23 #define EMACS_FONT_H | |
24 | |
25 #include "ccl.h" | |
26 | |
27 /* We have three types of Lisp objects related to font. | |
28 | |
29 FONT-SPEC | |
30 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
31 Pseudo vector (length FONT_SPEC_MAX) of font properties. Some |
90400 | 32 properties can be left unspecified (i.e. nil). Emacs asks |
33 font-drivers to find a font by FONT-SPEC. A fontset entry | |
34 specifies requisite properties whereas a face specifies just | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
35 preferable properties. |
90400 | 36 |
37 FONT-ENTITY | |
38 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
39 Pseudo vector (length FONT_ENTITY_MAX) of fully instanciated |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
40 font properties that a font-driver returns upon a request of |
90400 | 41 FONT-SPEC. |
42 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
43 Note: Only the method `list' and `match' of a font-driver can |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
44 create this object, and should never be modified by Lisp. |
90400 | 45 |
46 FONT-OBJECT | |
47 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
48 Pseudo vector (length FONT_OBJECT_MAX) of a opend font. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
49 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
50 Lisp object encapsulating "struct font". This corresponds to |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
51 an opened font. |
90400 | 52 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
53 Note: Only the method `open' of a font-driver can create this |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
54 object, and should never be modified by Lisp. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
55 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
56 extern Lisp_Object Qfont_spec, Qfont_entity, Qfont_object; |
90400 | 57 |
58 | |
59 struct font_driver; | |
60 struct font; | |
95125
679d861f4d3a
(find_font_encoding): Extern it.
Kenichi Handa <handa@m17n.org>
parents:
95105
diff
changeset
|
61 struct glyph_string; |
90400 | 62 |
63 /* An enumerator for each font property. This is used as an index to | |
64 the vector of FONT-SPEC and FONT-ENTITY. | |
65 | |
66 Note: The order is important and should not be changed. */ | |
67 | |
68 enum font_property_index | |
69 { | |
70 /* FONT-TYPE is a symbol indicating a font backend; currently `x', | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
71 `xft', `ftx' are available on X and gdi on Windows. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
72 For Windows, `bdf' and `uniscribe' backends are in progress. |
91256
e221dce4f621
(font_property_index): Doc change
Jason Rumney <jasonr@gnu.org>
parents:
91244
diff
changeset
|
73 For Mac OS X, we need `atm'. */ |
90400 | 74 FONT_TYPE_INDEX, |
75 | |
76 /* FONT-FOUNDRY is a foundry name (symbol). */ | |
77 FONT_FOUNDRY_INDEX, | |
78 | |
79 /* FONT-FAMILY is a family name (symbol). */ | |
80 FONT_FAMILY_INDEX, | |
81 | |
82 /* FONT-ADSTYLE is an additional style name (symbol). */ | |
83 FONT_ADSTYLE_INDEX, | |
84 | |
85 /* FONT-REGISTRY is a combination of a charset-registry and | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
86 charset-encoding name (symbol). */ |
90400 | 87 FONT_REGISTRY_INDEX, |
88 | |
89 /* FONT-WEIGHT is a numeric value of weight (e.g. medium, bold) of | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
90 the font. The lowest 8-bit is an index determining the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
91 symbolic name, and the higher bits is the actual numeric value |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
92 defined in `font-weight-table'. */ |
90400 | 93 FONT_WEIGHT_INDEX, |
94 | |
95 /* FONT-SLANT is a numeric value of slant (e.g. r, i, o) of the | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
96 font. The lowest 8-bit is an index determining the symbolic |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
97 name, and the higher bits is the actual numeric value defined |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
98 in `font-slant-table'. */ |
90400 | 99 FONT_SLANT_INDEX, |
100 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
101 /* FONT-WIDTH is a numeric value of setwidth (e.g. normal) of the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
102 font. The lowest 8-bit is an index determining the symbolic |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
103 name, and the higher bits is the actual numeric value defined |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
104 `font-width-table'. */ |
90400 | 105 FONT_WIDTH_INDEX, |
106 | |
107 /* FONT-SIZE is a size of the font. If integer, it is a pixel | |
108 size. For a font-spec, the value can be float specifying a | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
109 point size. The value zero means that the font is |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
110 scalable. */ |
90400 | 111 FONT_SIZE_INDEX, |
112 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
113 /* FONT-DPI is a resolution (dot per inch) for which the font is |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
114 designed. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
115 FONT_DPI_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
116 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
117 /* FONT-SPACING is a spacing (mono, proportional, charcell) of the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
118 font (integer; one of enum font_spacing). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
119 FONT_SPACING_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
120 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
121 /* FONT-AVGWIDTH is an average width (1/10 pixel unit) of the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
122 font. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
123 FONT_AVGWIDTH_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
124 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
125 #if 0 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
126 /* The following two members are to substitute for the above 6 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
127 members (FONT_WEIGHT_INDEX to FONT_AVGWIDTH_INDEX excluding |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
128 FONT_SIZE_INDEX) if it is found that font-entities consumes too |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
129 much memory. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
130 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
131 /* FONT-STYLE is a 24-bit integer containing indices for |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
132 style-related properties WEIGHT, SLANT, and WIDTH. The lowest |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
133 8-bit is an indice to the weight table AREF (font_style_table, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
134 0), the next 8-bit is an indice to the slant table AREF |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
135 (font_style_table, 1), the highest 8-bit is an indice to the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
136 slant table AREF (font_style_table, 2). The indice 0 indicates |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
137 that the corresponding style is not specified. This way, we |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
138 can represent at most 255 different names for each style, which |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
139 is surely sufficient. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
140 FONT_STYLE_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
141 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
142 /* FONT-METRICS is a 27-bit integer containing metrics-related |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
143 properties DPI, AVGWIDTH, SPACING. The lowest 12-bit is for |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
144 DPI, the next 12-bit is for AVGWIDTH, the highest 3-bit is for |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
145 SPACING. In each bit field, the highest bit indicates that the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
146 corresponding value is set or not. This way, we can represent |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
147 DPI by 11-bit (0 to 2047), AVGWIDTH by 11-bit (0 to 2047), |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
148 SPACING by 3-bit (0 for proportional, 1 for dual, 2 for mono, 3 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
149 for charcell), which is surely sufficient. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
150 FONT_METRICS_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
151 #endif |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
152 |
90400 | 153 /* In a font-spec, the value is an alist of extra information of a |
154 font such as name, OpenType features, and language coverage. | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
155 In addition, in a font-entity, the value may contain a pair |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
156 (font-entity . INFO) where INFO is an extra infomation to |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
157 identify a font (font-driver dependent). */ |
90400 | 158 FONT_EXTRA_INDEX, /* alist alist */ |
159 | |
160 /* This value is the length of font-spec vector. */ | |
161 FONT_SPEC_MAX, | |
162 | |
163 /* The followings are used only for a font-entity. */ | |
164 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
165 /* List of font-objects opened from the font-entity. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
166 FONT_OBJLIST_INDEX = FONT_SPEC_MAX, |
90400 | 167 |
168 /* This value is the length of font-entity vector. */ | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
169 FONT_ENTITY_MAX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
170 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
171 /* XLFD name of the font (string). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
172 FONT_NAME_INDEX = FONT_ENTITY_MAX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
173 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
174 /* Full name of the font (string). It is the name extracted from |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
175 the opend font, and may be different from the above. It may be |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
176 nil if the opened font doesn't give a name. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
177 FONT_FULLNAME_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
178 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
179 /* File name of the font or nil if a file associated with the font |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
180 is not available. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
181 FONT_FILE_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
182 |
95105 | 183 /* Format of the font (symbol) or nil if unknown. */ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
184 FONT_FORMAT_INDEX, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
185 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
186 /* This value is the length of font-object vector. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
187 FONT_OBJECT_MAX |
90400 | 188 }; |
189 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
190 /* Return the numeric weight value of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
191 #define FONT_WEIGHT_NUMERIC(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
192 (INTEGERP (AREF ((font), FONT_WEIGHT_INDEX)) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
193 ? (XINT (AREF ((font), FONT_WEIGHT_INDEX)) >> 8) : -1) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
194 /* Return the numeric slant value of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
195 #define FONT_SLANT_NUMERIC(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
196 (INTEGERP (AREF ((font), FONT_SLANT_INDEX)) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
197 ? (XINT (AREF ((font), FONT_SLANT_INDEX)) >> 8) : -1) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
198 /* Return the numeric width value of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
199 #define FONT_WIDTH_NUMERIC(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
200 (INTEGERP (AREF ((font), FONT_WIDTH_INDEX)) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
201 ? (XINT (AREF ((font), FONT_WIDTH_INDEX)) >> 8) : -1) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
202 /* Return the symbolic weight value of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
203 #define FONT_WEIGHT_SYMBOLIC(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
204 font_style_symbolic (font, FONT_WEIGHT_INDEX, 0) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
205 /* Return the symbolic slant value of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
206 #define FONT_SLANT_SYMBOLIC(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
207 font_style_symbolic (font, FONT_SLANT_INDEX, 0) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
208 /* Return the symbolic width value of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
209 #define FONT_WIDTH_SYMBOLIC(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
210 font_style_symbolic (font, FONT_WIDTH_INDEX, 0) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
211 /* Return the face-weight corresponding to the weight of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
212 #define FONT_WEIGHT_FOR_FACE(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
213 font_style_symbolic (font, FONT_WEIGHT_INDEX, 1) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
214 /* Return the face-slant corresponding to the slant of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
215 #define FONT_SLANT_FOR_FACE(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
216 font_style_symbolic (font, FONT_SLANT_INDEX, 1) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
217 /* Return the face-swidth corresponding to the slant of FONT. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
218 #define FONT_WIDTH_FOR_FACE(font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
219 font_style_symbolic (font, FONT_WIDTH_INDEX, 1) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
220 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
221 /* Return the numeric weight value corresponding ot the symbol NAME. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
222 #define FONT_WEIGHT_NAME_NUMERIC(name) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
223 (font_style_to_value (FONT_WEIGHT_INDEX, (name), 0) >> 8) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
224 /* Return the numeric slant value corresponding ot the symbol NAME. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
225 #define FONT_SLANT_NAME_NUMERIC(name) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
226 (font_style_to_value (FONT_SLANT_INDEX, (name), 0) >> 8) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
227 /* Return the numeric width value corresponding ot the symbol NAME. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
228 #define FONT_WIDTH_NAME_NUMERIC(name) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
229 (font_style_to_value (FONT_WIDTH_INDEX, (name), 0) >> 8) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
230 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
231 /* Set the font property PROP of FONT to VAL. PROP is one of |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
232 style-related font property index (FONT_WEIGHT/SLANT/WIDTH_INDEX). |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
233 VAL (integer or symbol) is the numeric or symbolic style value. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
234 #define FONT_SET_STYLE(font, prop, val) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
235 ASET ((font), prop, make_number (font_style_to_value (prop, val, 1))) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
236 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
237 extern Lisp_Object QCspacing, QCdpi, QCscalable, QCotf, QClang, QCscript; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
238 extern Lisp_Object QCavgwidth, QCfont_entity, QCfc_unknown_spec; |
90400 | 239 |
90438
cac8d07077df
(Qiso8859_1, Qiso10646_1, Qunicode_bmp): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90427
diff
changeset
|
240 /* Important character set symbols. */ |
95701 | 241 extern Lisp_Object Qascii_0; |
90621
d8a2b76fe3d4
(Qunicode_sip): Extern it.
Kenichi Handa <handa@m17n.org>
parents:
90564
diff
changeset
|
242 extern Lisp_Object Qiso8859_1, Qiso10646_1, Qunicode_bmp, Qunicode_sip; |
90438
cac8d07077df
(Qiso8859_1, Qiso10646_1, Qunicode_bmp): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90427
diff
changeset
|
243 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
244 /* Structure for a font-spec. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
245 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
246 struct font_spec |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
247 { |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
248 EMACS_UINT size; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
249 struct Lisp_Vector *next; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
250 Lisp_Object props[FONT_SPEC_MAX]; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
251 }; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
252 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
253 /* Structure for a font-entity. */ |
90400 | 254 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
255 struct font_entity |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
256 { |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
257 EMACS_UINT size; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
258 struct Lisp_Vector *next; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
259 Lisp_Object props[FONT_ENTITY_MAX]; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
260 }; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
261 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
262 /* A value which may appear in the member `encoding' of struct font |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
263 indicating that a font itself doesn't tell which encoding to be |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
264 used. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
265 #define FONT_ENCODING_NOT_DECIDED 255 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
266 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
267 /* Structure for a font-object. */ |
90400 | 268 |
269 struct font | |
270 { | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
271 EMACS_UINT size; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
272 struct Lisp_Vector *next; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
273 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
274 /* All Lisp_Object components must come first. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
275 That ensures they are all aligned normally. */ |
90400 | 276 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
277 Lisp_Object props[FONT_OBJECT_MAX]; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
278 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
279 /* Beyond here, there should be no more Lisp_Object components. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
280 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
281 /* Maximum bound width over all existing characters of the font. On |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
282 X window, this is same as (font->max_bounds.width). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
283 int max_width; |
90400 | 284 |
285 /* By which pixel size the font is opened. */ | |
286 int pixel_size; | |
287 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
288 /* Height of the font. On X window, this is the same as |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
289 (font->ascent + font->descent). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
290 int height; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
291 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
292 /* Width of the space glyph of the font. If the font doesn't have a |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
293 SPACE glyph, the value is 0. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
294 int space_width; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
295 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
296 /* Average width of glyphs in the font. If the font itself doesn't |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
297 have that information but has glyphs of ASCII character, the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
298 value is the average with of those glyphs. Otherwise, the value |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
299 is 0. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
300 int average_width; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
301 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
302 /* Minimum glyph width (in pixels). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
303 int min_width; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
304 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
305 /* Ascent and descent of the font (in pixels). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
306 int ascent, descent; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
307 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
308 /* Vertical pixel width of the underline. If is zero if that |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
309 information is not in the font. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
310 int underline_thickness; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
311 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
312 /* Vertical pixel position (relative to the baseline) of the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
313 underline. If it is positive, it is below the baseline. It is |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
314 negative if that information is not in the font. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
315 int underline_position; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
316 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
317 /* 1 if `vertical-centering-font-regexp' matches this font name. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
318 In this case, we render characters at vartical center positions |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
319 of lines. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
320 int vertical_centering; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
321 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
322 /* Encoding type of the font. The value is one of |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
323 0, 1, 2, or 3: |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
324 0: code points 0x20..0x7F or 0x2020..0x7F7F are used |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
325 1: code points 0xA0..0xFF or 0xA0A0..0xFFFF are used |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
326 2: code points 0x20A0..0x7FFF are used |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
327 3: code points 0xA020..0xFF7F are used |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
328 If the member `font_encoder' is not NULL, this member is ignored. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
329 unsigned char encoding_type; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
330 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
331 /* The baseline position of a font is normally `ascent' value of the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
332 font. However, there exists many fonts which don't set `ascent' |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
333 an appropriate value to be used as baseline position. This is |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
334 typical in such ASCII fonts which are designed to be used with |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
335 Chinese, Japanese, Korean characters. When we use mixture of |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
336 such fonts and normal fonts (having correct `ascent' value), a |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
337 display line gets very ugly. Since we have no way to fix it |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
338 automatically, it is users responsibility to supply well designed |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
339 fonts or correct `ascent' value of fonts. But, the latter |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
340 requires heavy work (modifying all bitmap data in BDF files). |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
341 So, Emacs accepts a private font property |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
342 `_MULE_BASELINE_OFFSET'. If a font has this property, we |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
343 calculate the baseline position by subtracting the value from |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
344 `ascent'. In other words, the value indicates how many bits |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
345 higher we should draw a character of the font than normal ASCII |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
346 text for a better looking. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
347 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
348 We also have to consider the fact that the concept of `baseline' |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
349 differs among scripts to which each character belongs. For |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
350 instance, baseline should be at the bottom most position of all |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
351 glyphs for Chinese, Japanese, and Korean. But, many of existing |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
352 fonts for those characters doesn't have correct `ascent' values |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
353 because they are designed to be used with ASCII fonts. To |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
354 display characters of different language on the same line, the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
355 best way will be to arrange them in the middle of the line. So, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
356 in such a case, again, we utilize the font property |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
357 `_MULE_BASELINE_OFFSET'. If the value is larger than `ascent' we |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
358 calculate baseline so that a character is arranged in the middle |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
359 of a line. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
360 int baseline_offset; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
361 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
362 /* Non zero means a character should be composed at a position |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
363 relative to the height (or depth) of previous glyphs in the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
364 following cases: |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
365 (1) The bottom of the character is higher than this value. In |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
366 this case, the character is drawn above the previous glyphs. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
367 (2) The top of the character is lower than 0 (i.e. baseline |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
368 height). In this case, the character is drawn beneath the |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
369 previous glyphs. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
370 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
371 This value is taken from a private font property |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
372 `_MULE_RELATIVE_COMPOSE' which is introduced by Emacs. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
373 int relative_compose; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
374 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
375 /* Non zero means an ascent value to be used for a character |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
376 registered in char-table `use-default-ascent'. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
377 int default_ascent; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
378 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
379 /* CCL program to calculate code points of the font. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
380 struct ccl_program *font_encoder; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
381 |
90400 | 382 /* Font-driver for the font. */ |
383 struct font_driver *driver; | |
384 | |
90506
5f608d7e835b
(font_close_object, font_merge_old_spec): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90502
diff
changeset
|
385 /* Charset to encode a character code into a glyph code of the font. |
5f608d7e835b
(font_close_object, font_merge_old_spec): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90502
diff
changeset
|
386 -1 means that the font doesn't require this information to encode |
5f608d7e835b
(font_close_object, font_merge_old_spec): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90502
diff
changeset
|
387 a character. */ |
90400 | 388 int encoding_charset; |
389 | |
390 /* Charset to check if a character code is supported by the font. | |
391 -1 means that the contents of the font must be looked up to | |
90506
5f608d7e835b
(font_close_object, font_merge_old_spec): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90502
diff
changeset
|
392 determine it. */ |
90453
3a78ea4d2a53
(struct font): Fix typo (charet->charset).
Kenichi Handa <handa@m17n.org>
parents:
90438
diff
changeset
|
393 int repertory_charset; |
90400 | 394 |
395 /* There will be more to this structure, but they are private to a | |
396 font-driver. */ | |
397 }; | |
398 | |
90482
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
399 enum font_spacing |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
400 { |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
401 FONT_SPACING_PROPORTIONAL = 0, |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
402 FONT_SPACING_DUAL = 90, |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
403 FONT_SPACING_MONO = 100, |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
404 FONT_SPACING_CHARCELL = 110 |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
405 }; |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
406 |
90400 | 407 struct font_metrics |
408 { | |
409 short lbearing, rbearing, width, ascent, descent; | |
410 }; | |
411 | |
412 struct font_bitmap | |
413 { | |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
414 int bits_per_pixel; |
90400 | 415 int rows; |
416 int width; | |
417 int pitch; | |
418 unsigned char *buffer; | |
419 int left; | |
420 int top; | |
421 int advance; | |
422 void *extra; | |
423 }; | |
424 | |
425 /* Predicates to check various font-related objects. */ | |
426 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
427 /* 1 iff X is one of font-spec, font-entity, and font-object. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
428 #define FONTP(x) PSEUDOVECTORP (x, PVEC_FONT) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
429 /* 1 iff X is font-spec. */ |
90400 | 430 #define FONT_SPEC_P(x) \ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
431 (FONTP (x) && (ASIZE (x) & PSEUDOVECTOR_SIZE_MASK) == FONT_SPEC_MAX) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
432 /* 1 iff X is font-entity. */ |
90400 | 433 #define FONT_ENTITY_P(x) \ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
434 (FONTP (x) && (ASIZE (x) & PSEUDOVECTOR_SIZE_MASK) == FONT_ENTITY_MAX) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
435 /* 1 iff X is font-object. */ |
90400 | 436 #define FONT_OBJECT_P(x) \ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
437 (FONTP (x) && (ASIZE (x) & PSEUDOVECTOR_SIZE_MASK) == FONT_OBJECT_MAX) |
90400 | 438 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
439 /* 1 iff ENTITY can't be loaded. */ |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
440 #define FONT_ENTITY_NOT_LOADABLE(entity) \ |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
441 EQ (AREF (entity, FONT_OBJLIST_INDEX), Qt) |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
442 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
443 /* Flag ENTITY not loadable. */ |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
444 #define FONT_ENTITY_SET_NOT_LOADABLE(entity) \ |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
445 ASET (entity, FONT_OBJLIST_INDEX, Qt) |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
446 |
90400 | 447 |
448 /* Check macros for various font-related objects. */ | |
449 | |
450 #define CHECK_FONT(x) \ | |
91813
ca1e1298a3d8
(smerge-auto-combine-max-separation): New var.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91552
diff
changeset
|
451 do { if (! FONTP (x)) wrong_type_argument (Qfont, x); } while (0) |
90400 | 452 #define CHECK_FONT_SPEC(x) \ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
453 do { if (! FONT_SPEC_P (x)) wrong_type_argument (Qfont_spec, x); } while (0) |
90400 | 454 #define CHECK_FONT_ENTITY(x) \ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
455 do { if (! FONT_ENTITY_P (x)) wrong_type_argument (Qfont_entity, x); } while (0) |
90400 | 456 #define CHECK_FONT_OBJECT(x) \ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
457 do { if (! FONT_OBJECT_P (x)) wrong_type_argument (Qfont_object, x); } while (0) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
458 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
459 #define CHECK_FONT_GET_OBJECT(x, font) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
460 do { \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
461 CHECK_FONT_OBJECT (x); \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
462 font = XFONT_OBJECT (x); \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
463 } while (0) |
90400 | 464 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
465 #define XFONT_SPEC(p) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
466 (eassert (FONT_SPEC_P(p)), (struct font_spec *) XPNTR (p)) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
467 #define XFONT_ENTITY(p) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
468 (eassert (FONT_ENTITY_P(p)), (struct font_entity *) XPNTR (p)) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
469 #define XFONT_OBJECT(p) \ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
470 (eassert (FONT_OBJECT_P(p)), (struct font *) XPNTR (p)) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
471 #define XSETFONT(a, b) (XSETPSEUDOVECTOR (a, b, PVEC_FONT)) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
472 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
473 /* Number of pt per inch (from the TeXbook). */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
474 #define PT_PER_INCH 72.27 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
475 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
476 /* Return a pixel size (integer) corresponding to POINT size (double) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
477 on resolution DPI. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
478 #define POINT_TO_PIXEL(POINT, DPI) ((POINT) * (DPI) / PT_PER_INCH + 0.5) |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
479 |
96226
1c73e69fc195
(PIXEL_TO_POINT): Clarify usage in comment.
Jason Rumney <jasonr@gnu.org>
parents:
96005
diff
changeset
|
480 /* Return a point size corresponding to POINT size (integer) |
1c73e69fc195
(PIXEL_TO_POINT): Clarify usage in comment.
Jason Rumney <jasonr@gnu.org>
parents:
96005
diff
changeset
|
481 on resolution DPI. Note that though point size is a double, we expect |
1c73e69fc195
(PIXEL_TO_POINT): Clarify usage in comment.
Jason Rumney <jasonr@gnu.org>
parents:
96005
diff
changeset
|
482 it to be rounded to an int, so we add 0.5 here. If the desired value |
1c73e69fc195
(PIXEL_TO_POINT): Clarify usage in comment.
Jason Rumney <jasonr@gnu.org>
parents:
96005
diff
changeset
|
483 is tenths of points (as in xfld specs), then the pixel size should |
1c73e69fc195
(PIXEL_TO_POINT): Clarify usage in comment.
Jason Rumney <jasonr@gnu.org>
parents:
96005
diff
changeset
|
484 be multiplied BEFORE the conversion to avoid magnifying the error. */ |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
485 #define PIXEL_TO_POINT(PIXEL, DPI) ((PIXEL) * PT_PER_INCH / (DPI) + 0.5) |
90400 | 486 |
90482
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
487 /* Ignore the difference of font pixel sizes less than or equal to |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
488 this value. */ |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
489 #define FONT_PIXEL_SIZE_QUANTUM 1 |
48a50b114c17
(QCspacing, QCdpi): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90469
diff
changeset
|
490 |
90400 | 491 struct face; |
492 struct composition; | |
493 | |
494 /* Macros for lispy glyph-string. */ | |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
495 enum lgstring_indices |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
496 { |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
497 LGSTRING_IX_FONT, LGSTRING_IX_WIDTH, |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
498 LGSTRING_IX_LBEARING, LGSTRING_IX_RBEARING, |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
499 LGSTRING_IX_ASCENT, LGSTRING_IX_DESCENT |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
500 }; |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
501 #define LGSTRING_SLOT(lgs, ix) AREF (AREF ((lgs), 0), ix) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
502 #define LGSTRING_FONT(lgs) LGSTRING_SLOT (lgs, LGSTRING_IX_FONT) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
503 #define LGSTRING_WIDTH(lgs) XINT (LGSTRING_SLOT (lgs, LGSTRING_IX_WIDTH)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
504 #define LGSTRING_LBEARING(lgs) XINT (LGSTRING_SLOT (lgs, LGSTRING_IX_LBEARING)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
505 #define LGSTRING_RBEARING(lgs) XINT (LGSTRING_SLOT (lgs, LGSTRING_IX_RBEARING)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
506 #define LGSTRING_ASCENT(lgs) XINT (LGSTRING_SLOT (lgs, LGSTRING_IX_ASCENT)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
507 #define LGSTRING_DESCENT(lgs) XINT (LGSTRING_SLOT (lgs, LGSTRING_IX_DESCENT)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
508 #define LGSTRING_SET_SLOT(lgs, ix, val) ASET (AREF ((lgs), 0), ix, (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
509 #define LGSTRING_SET_FONT(lgs, val) \ |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
510 LGSTRING_SET_SLOT(lgs, LGSTRING_IX_FONT, (val)) |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
511 #define LGSTRING_SET_WIDTH(lgs, val) \ |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
512 LGSTRING_SET_SLOT(lgs, LGSTRING_IX_WIDTH, make_number (val)) |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
513 #define LGSTRING_SET_LBEARING(lgs, val) \ |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
514 LGSTRING_SET_SLOT(lgs, LGSTRING_IX_LBEARING, make_number (val)) |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
515 #define LGSTRING_SET_RBEARING(lgs, val) \ |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
516 LGSTRING_SET_SLOT(lgs, LGSTRING_IX_RBEARING, make_number (val)) |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
517 #define LGSTRING_SET_ASCENT(lgs, val) \ |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
518 LGSTRING_SET_SLOT(lgs, LGSTRING_IX_ASCENT, make_number (val)) |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
519 #define LGSTRING_SET_DESCENT(lgs, val) \ |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
520 LGSTRING_SET_SLOT(lgs, LGSTRING_IX_DESCENT, make_number (val)) |
90400 | 521 |
522 #define LGSTRING_LENGTH(lgs) (ASIZE ((lgs)) - 1) | |
523 #define LGSTRING_GLYPH(lgs, idx) AREF ((lgs), (idx) + 1) | |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
524 #define LGSTRING_SET_GLYPH(lgs, idx, val) ASET ((lgs), (idx) + 1, (val)) |
90400 | 525 |
91274 | 526 /* Vector size of Lispy glyph. */ |
91549
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
527 enum lglyph_indices |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
528 { |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
529 LGLYPH_IX_FROM, LGLYPH_IX_TO, LGLYPH_IX_CHAR, LGLYPH_IX_CODE, |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
530 LGLYPH_IX_WIDTH, LGLYPH_IX_LBEARING, LGLYPH_IX_RBEARING, |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
531 LGLYPH_IX_ASCENT, LGLYPH_IX_DESCENT, LGLYPH_IX_ADJUSTMENT, |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
532 /* Not an index. */ |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
533 LGLYPH_SIZE |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
534 }; |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
535 #define LGLYPH_FROM(g) XINT (AREF ((g), LGLYPH_IX_FROM)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
536 #define LGLYPH_TO(g) XINT (AREF ((g), LGLYPH_IX_TO)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
537 #define LGLYPH_CHAR(g) XINT (AREF ((g), LGLYPH_IX_CHAR)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
538 #define LGLYPH_CODE(g) XUINT (AREF ((g), LGLYPH_IX_CODE)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
539 #define LGLYPH_WIDTH(g) XINT (AREF ((g), LGLYPH_IX_WIDTH)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
540 #define LGLYPH_LBEARING(g) XINT (AREF ((g), LGLYPH_IX_LBEARING)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
541 #define LGLYPH_RBEARING(g) XINT (AREF ((g), LGLYPH_IX_RBEARING)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
542 #define LGLYPH_ASCENT(g) XINT (AREF ((g), LGLYPH_IX_ASCENT)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
543 #define LGLYPH_DESCENT(g) XINT (AREF ((g), LGLYPH_IX_DESCENT)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
544 #define LGLYPH_ADJUSTMENT(g) AREF ((g), LGLYPH_IX_ADJUSTMENT) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
545 #define LGLYPH_SET_FROM(g, val) ASET ((g), LGLYPH_IX_FROM, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
546 #define LGLYPH_SET_TO(g, val) ASET ((g), LGLYPH_IX_TO, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
547 #define LGLYPH_SET_CHAR(g, val) ASET ((g), LGLYPH_IX_CHAR, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
548 /* FIXME: we should use make_uint_number here. */ |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
549 #define LGLYPH_SET_CODE(g, val) ASET ((g), LGLYPH_IX_CODE, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
550 #define LGLYPH_SET_WIDTH(g, val) ASET ((g), LGLYPH_IX_WIDTH, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
551 #define LGLYPH_SET_LBEARING(g, val) ASET ((g), LGLYPH_IX_RBEARING, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
552 #define LGLYPH_SET_RBEARING(g, val) ASET ((g), LGLYPH_IX_LBEARING, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
553 #define LGLYPH_SET_ASCENT(g, val) ASET ((g), LGLYPH_IX_ASCENT, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
554 #define LGLYPH_SET_DESCENT(g, val) ASET ((g), LGLYPH_IX_DESCENT, make_number (val)) |
4f94f3794026
(enum lgstring_indices, enum lglyph_indices): New enums.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
91355
diff
changeset
|
555 #define LGLYPH_SET_ADJUSTMENT(g, val) ASET ((g), LGLYPH_IX_ADJUSTMENT, (val)) |
90531
a4a30dc43165
(LGLYPH_XOFF, LGLYPH_YOFF, LGLYPH_WIDTH, LGLYPH_WADJUST)
Kenichi Handa <handa@m17n.org>
parents:
90506
diff
changeset
|
556 |
90542
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
557 #define LGLYPH_XOFF(g) (VECTORP (LGLYPH_ADJUSTMENT (g)) \ |
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
558 ? XINT (AREF (LGLYPH_ADJUSTMENT (g), 0)) : 0) |
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
559 #define LGLYPH_YOFF(g) (VECTORP (LGLYPH_ADJUSTMENT (g)) \ |
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
560 ? XINT (AREF (LGLYPH_ADJUSTMENT (g), 1)) : 0) |
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
561 #define LGLYPH_WADJUST(g) (VECTORP (LGLYPH_ADJUSTMENT (g)) \ |
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
562 ? XINT (AREF (LGLYPH_ADJUSTMENT (g), 2)) : 0) |
90400 | 563 |
564 #define FONT_INVALID_CODE 0xFFFFFFFF | |
565 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
566 /* Font driver. Members specified as "optional" can be NULL. */ |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
567 |
90400 | 568 struct font_driver |
569 { | |
570 /* Symbol indicating the type of the font-driver. */ | |
571 Lisp_Object type; | |
572 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
573 /* 1 iff the font's foundary, family, and adstyle names are case |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
574 sensitve. */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
575 int case_sensitive; |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
576 |
91244
54b067217411
(struct font_driver): Change argument type of get_cache.
Kenichi Handa <handa@m17n.org>
parents:
91134
diff
changeset
|
577 /* Return a cache of font-entities on frame F. The cache must be a |
90400 | 578 cons whose cdr part is the actual cache area. */ |
91244
54b067217411
(struct font_driver): Change argument type of get_cache.
Kenichi Handa <handa@m17n.org>
parents:
91134
diff
changeset
|
579 Lisp_Object (*get_cache) P_ ((FRAME_PTR F)); |
90400 | 580 |
90564
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
581 /* List fonts exactly matching with FONT_SPEC on FRAME. The value |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
582 is a list of font-entities. It is assured that the properties |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
583 WEIGHT to AVGWIDTH are all nil (i.e. not specified) in FONT_SPEC. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
584 This and the following `match' are the only APIs that allocate |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
585 font-entities. */ |
90400 | 586 Lisp_Object (*list) P_ ((Lisp_Object frame, Lisp_Object font_spec)); |
587 | |
90564
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
588 /* Return a font entity most closely maching with FONT_SPEC on |
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
589 FRAME. The closeness is detemined by the font backend, thus |
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
590 `face-font-selection-order' is ignored here. */ |
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
591 Lisp_Object (*match) P_ ((Lisp_Object frame, Lisp_Object font_spec)); |
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
592 |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
593 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
594 List available families. The value is a list of family names |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
595 (symbols). */ |
90400 | 596 Lisp_Object (*list_family) P_ ((Lisp_Object frame)); |
597 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
598 /* Optional (if FONT_EXTRA_INDEX is not Lisp_Save_Value). |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
599 Free FONT_EXTRA_INDEX field of FONT_ENTITY. */ |
90400 | 600 void (*free_entity) P_ ((Lisp_Object font_entity)); |
601 | |
602 /* Open a font specified by FONT_ENTITY on frame F. If the font is | |
603 scalable, open it with PIXEL_SIZE. */ | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
604 Lisp_Object (*open) P_ ((FRAME_PTR f, Lisp_Object font_entity, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
605 int pixel_size)); |
90400 | 606 |
607 /* Close FONT on frame F. */ | |
608 void (*close) P_ ((FRAME_PTR f, struct font *font)); | |
609 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
610 /* Optional (if FACE->extra is not used). |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
611 Prepare FACE for displaying characters by FONT on frame F by |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
612 storing some data in FACE->extra. If successful, return 0. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
613 Otherwise, return -1. */ |
90400 | 614 int (*prepare_face) P_ ((FRAME_PTR f, struct face *face)); |
615 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
616 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
617 Done FACE for displaying characters by FACE->font on frame F. */ |
90400 | 618 void (*done_face) P_ ((FRAME_PTR f, struct face *face)); |
619 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
620 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
621 If FONT_ENTITY has a glyph for character C (Unicode code point), |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
622 return 1. If not, return 0. If a font must be opened to check |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
623 it, return -1. */ |
90400 | 624 int (*has_char) P_ ((Lisp_Object entity, int c)); |
625 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
626 /* Return a glyph code of FONT for characer C (Unicode code point). |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
627 If FONT doesn't have such a glyph, return FONT_INVALID_CODE. */ |
90400 | 628 unsigned (*encode_char) P_ ((struct font *font, int c)); |
629 | |
91033
e25192c0a550
(struct font_driver): Docstring of text_extents improved.
Kenichi Handa <handa@m17n.org>
parents:
90885
diff
changeset
|
630 /* Computate the total metrics of the NGLYPHS glyphs specified by |
e25192c0a550
(struct font_driver): Docstring of text_extents improved.
Kenichi Handa <handa@m17n.org>
parents:
90885
diff
changeset
|
631 the font FONT and the sequence of glyph codes CODE, and store the |
e25192c0a550
(struct font_driver): Docstring of text_extents improved.
Kenichi Handa <handa@m17n.org>
parents:
90885
diff
changeset
|
632 result in METRICS. */ |
90400 | 633 int (*text_extents) P_ ((struct font *font, |
634 unsigned *code, int nglyphs, | |
635 struct font_metrics *metrics)); | |
636 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
637 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
638 Draw glyphs between FROM and TO of S->char2b at (X Y) pixel |
90400 | 639 position of frame F with S->FACE and S->GC. If WITH_BACKGROUND |
640 is nonzero, fill the background in advance. It is assured that | |
641 WITH_BACKGROUND is zero when (FROM > 0 || TO < S->nchars). */ | |
642 int (*draw) P_ ((struct glyph_string *s, int from, int to, | |
643 int x, int y, int with_background)); | |
644 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
645 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
646 Store bitmap data for glyph-code CODE of FONT in BITMAP. It is |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
647 intended that this method is callled from the other font-driver |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
648 for actual drawing. */ |
90400 | 649 int (*get_bitmap) P_ ((struct font *font, unsigned code, |
650 struct font_bitmap *bitmap, | |
651 int bits_per_pixel)); | |
652 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
653 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
654 Free bitmap data in BITMAP. */ |
90400 | 655 void (*free_bitmap) P_ ((struct font *font, struct font_bitmap *bitmap)); |
656 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
657 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
658 Return an outline data for glyph-code CODE of FONT. The format |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
659 of the outline data depends on the font-driver. */ |
90400 | 660 void *(*get_outline) P_ ((struct font *font, unsigned code)); |
661 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
662 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
663 Free OUTLINE (that is obtained by the above method). */ |
90400 | 664 void (*free_outline) P_ ((struct font *font, void *outline)); |
665 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
666 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
667 Get coordinates of the INDEXth anchor point of the glyph whose |
90400 | 668 code is CODE. Store the coordinates in *X and *Y. Return 0 if |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
669 the operations was successfull. Otherwise return -1. */ |
90400 | 670 int (*anchor_point) P_ ((struct font *font, unsigned code, int index, |
671 int *x, int *y)); | |
672 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
673 /* Optional. |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
674 Return a list describing which scripts/languages FONT |
90400 | 675 supports by which GSUB/GPOS features of OpenType tables. */ |
676 Lisp_Object (*otf_capability) P_ ((struct font *font)); | |
677 | |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
678 /* Optional. |
90815 | 679 Apply FONT's OTF-FEATURES to the glyph string. |
90400 | 680 |
90815 | 681 FEATURES specifies which OTF features to apply in this format: |
682 (SCRIPT LANGSYS GSUB-FEATURE GPOS-FEATURE) | |
683 See the documentation of `font-drive-otf' for the detail. | |
90400 | 684 |
685 This method applies the specified features to the codes in the | |
686 elements of GSTRING-IN (between FROMth and TOth). The output | |
687 codes are stored in GSTRING-OUT at the IDXth element and the | |
688 following elements. | |
689 | |
690 Return the number of output codes. If none of the features are | |
691 applicable to the input data, return 0. If GSTRING-OUT is too | |
692 short, return -1. */ | |
90815 | 693 int (*otf_drive) P_ ((struct font *font, Lisp_Object features, |
90400 | 694 Lisp_Object gstring_in, int from, int to, |
90557
80c2d97a494e
(struct font): New member scalable.
Kenichi Handa <handa@m17n.org>
parents:
90550
diff
changeset
|
695 Lisp_Object gstring_out, int idx, int alternate_subst)); |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
696 |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
697 /* Optional. |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
698 Make the font driver ready for frame F. Usually this function |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
699 makes some data specific to F and store it in F by calling |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
700 font_put_frame_data (). */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
701 int (*start_for_frame) P_ ((FRAME_PTR f)); |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
702 |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
703 /* Optional. |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
704 End using the driver for frame F. Usually this function free |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
705 some data stored for F. */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
706 int (*end_for_frame) P_ ((FRAME_PTR f)); |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
707 |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
708 /* Optional. |
91293
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
709 |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
710 Shape text in LGSTRING. See the docstring of `font-make-gstring' |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
711 for the format of LGSTRING. If the (N+1)th element of LGSTRING |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
712 is nil, input of shaping is from the 1st to (N)th elements. In |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
713 each input glyph, FROM, TO, CHAR, and CODE are already set. |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
714 |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
715 This function updates all fields of the input glyphs. If the |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
716 output glyphs (M) are more than the input glyphs (N), (N+1)th |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
717 through (M)th elements of LGSTRING are updated possibly by making |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
718 a new glyph object and storing it in LGSTRING. If (M) is greater |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
719 than the length of LGSTRING, nil should be return. In that case, |
c45d16b39212
(struct font_driver): Docstring of member `shape' is improved.
Kenichi Handa <handa@m17n.org>
parents:
91274
diff
changeset
|
720 this function is called again with the larger LGSTRING. */ |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
721 Lisp_Object (*shape) P_ ((Lisp_Object lgstring)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
722 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
723 /* Optional. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
724 |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
725 If FONT is usable on frame F, return 0. Otherwise return -1. |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
726 */ |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
727 int (*check) P_ ((FRAME_PTR F, struct font *font)); |
90400 | 728 }; |
729 | |
730 | |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
731 /* Chain of font drivers. There's one global font driver list |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
732 (font_driver_list in font.c). In addition, each frame has it's own |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
733 font driver list at FRAME_PTR->font_driver_list. */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
734 |
90400 | 735 struct font_driver_list |
736 { | |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
737 /* 1 iff this driver is currently used. It is igonred in the global |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
738 font driver list.*/ |
90550 | 739 int on; |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
740 /* Pointer to the font driver. */ |
90400 | 741 struct font_driver *driver; |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
742 /* Pointer to the next element of the chain. */ |
90400 | 743 struct font_driver_list *next; |
744 }; | |
745 | |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
746 |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
747 /* Chain of arbitrary data specific to each font driver. Each frame |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
748 has it's own font data list at FRAME_PTR->font_data_list. */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
749 |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
750 struct font_data_list |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
751 { |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
752 /* Pointer to the font driver. */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
753 struct font_driver *driver; |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
754 /* Data specific to the font driver. */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
755 void *data; |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
756 /* Pointer to the next element of the chain. */ |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
757 struct font_data_list *next; |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
758 }; |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
759 |
90400 | 760 EXFUN (Ffont_spec, MANY); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
761 EXFUN (Fcopy_font_spec, 1); |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
762 EXFUN (Fmerge_font_spec, 2); |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
763 EXFUN (Ffont_get, 2); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
764 EXFUN (Ffont_put, 3); |
90497 | 765 EXFUN (Flist_fonts, 4); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
766 EXFUN (Ffont_family_list, 1); |
90550 | 767 EXFUN (Fclear_font_cache, 0); |
95181
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
768 EXFUN (Ffont_xlfd_name, 2); |
90400 | 769 |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
770 extern Lisp_Object font_make_spec P_ ((void)); |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
771 extern Lisp_Object font_make_entity P_ ((void)); |
96557
eed170a61843
(font_make_object, font_match_p): Adjust prototypes.
Kenichi Handa <handa@m17n.org>
parents:
96226
diff
changeset
|
772 extern Lisp_Object font_make_object P_ ((int, Lisp_Object, int)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
773 |
95125
679d861f4d3a
(find_font_encoding): Extern it.
Kenichi Handa <handa@m17n.org>
parents:
95105
diff
changeset
|
774 extern Lisp_Object find_font_encoding P_ ((Lisp_Object)); |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
775 extern int font_registry_charsets P_ ((Lisp_Object, struct charset **, |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
776 struct charset **)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
777 extern int font_style_to_value P_ ((enum font_property_index prop, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
778 Lisp_Object name, int noerror)); |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
779 extern Lisp_Object font_style_symbolic P_ ((Lisp_Object font, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
780 enum font_property_index prop, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
781 int for_face)); |
95894
76261fd18708
* w32fns.c (Fw32_select_font): Removed old font API function.
Jason Rumney <jasonr@gnu.org>
parents:
95747
diff
changeset
|
782 |
96557
eed170a61843
(font_make_object, font_match_p): Adjust prototypes.
Kenichi Handa <handa@m17n.org>
parents:
96226
diff
changeset
|
783 extern int font_match_p P_ ((Lisp_Object spec, Lisp_Object font)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
784 extern Lisp_Object font_list_entities P_ ((Lisp_Object frame, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
785 Lisp_Object spec)); |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
786 |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
787 extern Lisp_Object font_get_name P_ ((Lisp_Object font_object)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
788 extern Lisp_Object font_spec_from_name P_ ((Lisp_Object font_name)); |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
789 extern Lisp_Object font_get_frame P_ ((Lisp_Object font_object)); |
90400 | 790 extern int font_has_char P_ ((FRAME_PTR, Lisp_Object, int)); |
791 extern unsigned font_encode_char P_ ((Lisp_Object, int)); | |
792 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
793 extern void font_clear_prop P_ ((Lisp_Object *attrs, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
794 enum font_property_index prop)); |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
795 extern void font_update_lface P_ ((FRAME_PTR f, Lisp_Object *attrs)); |
90400 | 796 extern Lisp_Object font_find_for_lface P_ ((FRAME_PTR f, Lisp_Object *lface, |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
797 Lisp_Object spec, int c)); |
90815 | 798 extern Lisp_Object font_open_for_lface P_ ((FRAME_PTR f, Lisp_Object entity, |
799 Lisp_Object *lface, | |
800 Lisp_Object spec)); | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
801 extern Lisp_Object font_load_for_lface P_ ((FRAME_PTR f, Lisp_Object *lface, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
802 Lisp_Object spec)); |
90400 | 803 extern void font_prepare_for_face P_ ((FRAME_PTR f, struct face *face)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
804 extern void font_done_for_face P_ ((FRAME_PTR f, struct face *face)); |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
805 |
90400 | 806 extern Lisp_Object font_open_by_name P_ ((FRAME_PTR f, char *name)); |
90506
5f608d7e835b
(font_close_object, font_merge_old_spec): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
90502
diff
changeset
|
807 extern void font_close_object (FRAME_PTR f, Lisp_Object font_object); |
90400 | 808 |
95747
721d9f530e61
(font_intern_prop): Prototype adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95701
diff
changeset
|
809 extern Lisp_Object font_intern_prop P_ ((char *str, int len, int force_symbol)); |
90400 | 810 extern void font_update_sort_order P_ ((int *order)); |
811 | |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
812 extern void font_parse_family_registry P_ ((Lisp_Object family, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
813 Lisp_Object registry, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
814 Lisp_Object spec)); |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
815 extern Lisp_Object font_spec_from_family_registry P_ ((Lisp_Object family, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
816 Lisp_Object registry)); |
90400 | 817 |
90502 | 818 extern int font_parse_xlfd P_ ((char *name, Lisp_Object font)); |
90400 | 819 extern int font_unparse_xlfd P_ ((Lisp_Object font, int pixel_size, |
820 char *name, int bytes)); | |
90502 | 821 extern int font_parse_fcname P_ ((char *name, Lisp_Object font)); |
90469
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
822 extern int font_unparse_fcname P_ ((Lisp_Object font, int pixel_size, |
c9df3c05d0ed
(struct font_driver): Member parse_name deleted.
Kenichi Handa <handa@m17n.org>
parents:
90453
diff
changeset
|
823 char *name, int bytes)); |
95973
a46630597077
(font_unparse_gtkname): Add prototype.
Chong Yidong <cyd@stupidchicken.com>
parents:
95894
diff
changeset
|
824 extern int font_unparse_gtkname P_ ((Lisp_Object, struct frame *, char *, int)); |
90400 | 825 extern void register_font_driver P_ ((struct font_driver *driver, FRAME_PTR f)); |
826 extern void free_font_driver_list P_ ((FRAME_PTR f)); | |
90564
cb3eb6150704
(struct font_driver): New member `match'.
Kenichi Handa <handa@m17n.org>
parents:
90557
diff
changeset
|
827 extern Lisp_Object font_update_drivers P_ ((FRAME_PTR f, Lisp_Object list)); |
90542
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
828 extern Lisp_Object font_at P_ ((int c, EMACS_INT pos, struct face *face, |
2be199f501f8
(LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
Kenichi Handa <handa@m17n.org>
parents:
90531
diff
changeset
|
829 struct window *w, Lisp_Object object)); |
94925
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
830 extern EMACS_INT font_range P_ ((EMACS_INT pos, EMACS_INT limit, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
831 struct face *face, FRAME_PTR f, |
3b446dc6d76d
(Qfont_spec, Qfont_entity, Qfont_object): Extern them.
Kenichi Handa <handa@m17n.org>
parents:
93597
diff
changeset
|
832 Lisp_Object object)); |
90400 | 833 |
91134
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
834 extern struct font *font_prepare_composition P_ ((struct composition *cmp, |
d8c3402ee3fa
(FONT_ENTITY_NOT_LOADABLE)
Kenichi Handa <handa@m17n.org>
parents:
91114
diff
changeset
|
835 FRAME_PTR f)); |
90400 | 836 |
90885
ecd61e98251d
* font.h (font_put_extra): Moved declaration from font.c.
Jason Rumney <jasonr@gnu.org>
parents:
90864
diff
changeset
|
837 extern Lisp_Object font_put_extra P_ ((Lisp_Object font, Lisp_Object prop, |
ecd61e98251d
* font.h (font_put_extra): Moved declaration from font.c.
Jason Rumney <jasonr@gnu.org>
parents:
90864
diff
changeset
|
838 Lisp_Object val)); |
90400 | 839 |
91114
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
840 extern int font_put_frame_data P_ ((FRAME_PTR f, |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
841 struct font_driver *driver, |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
842 void *data)); |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
843 extern void *font_get_frame_data P_ ((FRAME_PTR f, |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
844 struct font_driver *driver)); |
ce50ee0149be
(struct font_bitmap): New member bits_per_pixel.
Kenichi Handa <handa@m17n.org>
parents:
91033
diff
changeset
|
845 |
90400 | 846 #ifdef HAVE_FREETYPE |
847 extern struct font_driver ftfont_driver; | |
848 #endif /* HAVE_FREETYPE */ | |
849 #ifdef HAVE_X_WINDOWS | |
850 extern struct font_driver xfont_driver; | |
851 extern struct font_driver ftxfont_driver; | |
852 #ifdef HAVE_XFT | |
853 extern struct font_driver xftfont_driver; | |
854 #endif /* HAVE_XFT */ | |
855 #endif /* HAVE_X_WINDOWS */ | |
856 #ifdef WINDOWSNT | |
857 extern struct font_driver w32font_driver; | |
93597
0dac12128e1c
(uniscribe_font_driver) [WINDOWSNT]: Declare for w32fns.c.
Jason Rumney <jasonr@gnu.org>
parents:
91813
diff
changeset
|
858 extern struct font_driver uniscribe_font_driver; |
90400 | 859 #endif /* WINDOWSNT */ |
860 #ifdef MAC_OS | |
861 extern struct font_driver atmfont_driver; | |
862 #endif /* MAC_OS */ | |
96675
d45acf0c8d23
merging Emacs.app (NeXTstep port)
Adrian Robert <Adrian.B.Robert@gmail.com>
parents:
96557
diff
changeset
|
863 #ifdef HAVE_NS |
d45acf0c8d23
merging Emacs.app (NeXTstep port)
Adrian Robert <Adrian.B.Robert@gmail.com>
parents:
96557
diff
changeset
|
864 extern struct font_driver nsfont_driver; |
d45acf0c8d23
merging Emacs.app (NeXTstep port)
Adrian Robert <Adrian.B.Robert@gmail.com>
parents:
96557
diff
changeset
|
865 #endif /* HAVE_NS */ |
90400 | 866 |
95181
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
867 #ifndef FONT_DEBUG |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
868 #define FONT_DEBUG |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
869 #endif |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
870 |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
871 extern void font_add_log P_ ((char *, Lisp_Object, Lisp_Object)); |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
872 |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
873 #ifdef FONT_DEBUG |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
874 #define font_assert(X) do {if (!(X)) abort ();} while (0) |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
875 #else /* not FONT_DEBUG */ |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
876 #define font_assert(X) (void) 0 |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
877 #endif /* not FONT_DEBUG */ |
4d81ef9a5f1d
(Ffont_xlfd_name): EXFUN adjusted.
Kenichi Handa <handa@m17n.org>
parents:
95125
diff
changeset
|
878 |
90400 | 879 #endif /* not EMACS_FONT_H */ |
90427 | 880 |
881 /* arch-tag: 3b7260c3-5bec-4d6b-a0db-95c1b431b1a2 | |
882 (do not change this comment) */ |