Mercurial > hg > xemacs-beta

comparison src/objects.h @ 2:ac2d302a0011 r19-15b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b2
author cvs
date Mon, 13 Aug 2007 08:46:35 +0200
parents 376386a54a3c
children 0293115a14e9
comparison
equal deleted inserted replaced
1:c0c6a60d29db 2:ac2d302a0011
137 137
138 /* console-type-specific data */ 138 /* console-type-specific data */
139 void *data; 139 void *data;
140 }; 140 };
141 141
142 #define COLOR_INSTANCE_NAME(c) ((c)->name) 142 #define COLOR_INSTANCE_NAME(c) ((c)->name)
143 #define COLOR_INSTANCE_DEVICE(c) ((c)->device) 143 #define COLOR_INSTANCE_DEVICE(c) ((c)->device)
144 144
145 /**************************************************************************** 145 /****************************************************************************
146 * Font Instance Object * 146 * Font Instance Object *
147 ****************************************************************************/ 147 ****************************************************************************/
152 #define FONT_INSTANCEP(x) RECORDP (x, font_instance) 152 #define FONT_INSTANCEP(x) RECORDP (x, font_instance)
153 #define GC_FONT_INSTANCEP(x) GC_RECORDP (x, font_instance) 153 #define GC_FONT_INSTANCEP(x) GC_RECORDP (x, font_instance)
154 #define CHECK_FONT_INSTANCE(x) CHECK_RECORD (x, font_instance) 154 #define CHECK_FONT_INSTANCE(x) CHECK_RECORD (x, font_instance)
155 #define CONCHECK_FONT_INSTANCE(x) CONCHECK_RECORD (x, font_instance) 155 #define CONCHECK_FONT_INSTANCE(x) CONCHECK_RECORD (x, font_instance)
156 156
157 int font_spec_matches_charset (struct device *d, Lisp_Object charset,
158 CONST Bufbyte *nonreloc,
159 Lisp_Object reloc, Bytecount offset,
160 Bytecount length);
161
162 Lisp_Object Fmake_font_instance (Lisp_Object name, Lisp_Object device, 157 Lisp_Object Fmake_font_instance (Lisp_Object name, Lisp_Object device,
163 Lisp_Object no_error); 158 Lisp_Object no_error);
164 Lisp_Object Ffont_instance_p (Lisp_Object obj); 159 Lisp_Object Ffont_instance_p (Lisp_Object obj);
165 Lisp_Object Ffont_instance_name (Lisp_Object obj); 160 Lisp_Object Ffont_instance_name (Lisp_Object obj);
166 Lisp_Object Ffont_instance_truename (Lisp_Object obj); 161 Lisp_Object Ffont_instance_truename (Lisp_Object obj);
167 162
168 extern Lisp_Object Vthe_null_font_instance; 163 extern Lisp_Object Vthe_null_font_instance;
169 164
170 struct Lisp_Font_Instance 165 struct Lisp_Font_Instance
181 176
182 /* console-type-specific data */ 177 /* console-type-specific data */
183 void *data; 178 void *data;
184 }; 179 };
185 180
186 #define FONT_INSTANCE_NAME(f) ((f)->name) 181 #define FONT_INSTANCE_NAME(f) ((f)->name)
187 #define FONT_INSTANCE_DEVICE(f) ((f)->device) 182 #define FONT_INSTANCE_DEVICE(f) ((f)->device)
188 183 #define FONT_INSTANCE_ASCENT(f) ((f)->ascent)
189 #define FONT_INSTANCE_WIDTH(f) ((f)->width)
190 #define FONT_INSTANCE_HEIGHT(f) ((f)->height)
191 #define FONT_INSTANCE_ASCENT(f) ((f)->ascent)
192 #define FONT_INSTANCE_DESCENT(f) ((f)->descent) 184 #define FONT_INSTANCE_DESCENT(f) ((f)->descent)
185 #define FONT_INSTANCE_WIDTH(f) ((f)->width)
186 #define FONT_INSTANCE_HEIGHT(f) ((f)->height)
193 187
194 #endif /* _XEMACS_OBJECTS_H_ */ 188 #endif /* _XEMACS_OBJECTS_H_ */