# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 866853882 0
# Node ID 6e93b01c3883968301e81b0ee399eb3facc03c92
# Parent  dca9b4a8155e747854006f750e95240aa110c151
(font_idx_temp): Extern it.
(FS_LOAD_FONT): New macro.

diff -r dca9b4a8155e -r 6e93b01c3883 src/fontset.h
--- a/src/fontset.h	Sat Jun 21 00:35:11 1997 +0000
+++ b/src/fontset.h	Sat Jun 21 00:44:42 1997 +0000
@@ -213,3 +213,21 @@
 extern Lisp_Object Vclip_large_size_font;
 
 #endif /* _FONTSET_H */
+extern int font_idx_temp;
+
+/* Load a font named FONTNAME for displaying CHARSET on frame F.
+   All fonts for frame F is stored in a table pointed by FONT_TABLE.
+   Return a pointer to the struct font_info of the loaded font.
+   If loading fails, return 0;
+   If FONTNAME is NULL, the name is taken from the information of FONTSET.
+   If FONTSET is given, try to load a font whose size matches that of
+   FONTSET, and, the font index is stored in the table for FONTSET.  */
+
+#define FS_LOAD_FONT(f, font_table, charset, fontname, fontset)		  \
+  (fontset >= 0 && fontset < FRAME_FONTSET_DATA (f)->n_fontsets		  \
+   && (font_idx_temp = (FRAME_FONTSET_DATA (f)				  \
+			->fontset_table[fontset]->font_indexes[charset]), \
+       font_idx_temp >= 0)						  \
+   ? font_table + font_idx_temp						  \
+   : fs_load_font (f, font_table, charset, fontname, fontset))
+