]> code.delx.au - gnu-emacs/blobdiff - src/fontset.h
(Freplace_match): Give error if
[gnu-emacs] / src / fontset.h
index 8602ebba5f29fce7acab550749e36edd468b6428..a00688ac3e9c190361d38af01076df9d9a70af18 100644 (file)
@@ -71,7 +71,7 @@ struct font_info
      whose default value is defined in lisp/fontset.el.  Since there's
      no charset whose id is 1, we use encoding[1] to store the
      encoding information decided by the font itself.  */
-  char encoding[MAX_CHARSET];
+  char encoding[MAX_CHARSET + 1];
 
   /* The baseline position of a font is normally `ascent' value of the
      font.  However, there exists many fonts which don't set `ascent'
@@ -114,10 +114,14 @@ struct font_info
        height).  In this case, the character is drawn beneath the
        previous glyphs.
 
-     This value is take from a private font property
+     This value is taken from a private font property
      `_MULE_RELATIVE_COMPOSE' which is introduced by Emacs.  */
   int relative_compose;
 
+  /* Non zero means an ascent value to be used for a character
+     registered in char-table `use-default-ascent'.  */
+  int default_ascent;
+
   /* CCL program to calculate code points of the font.  */
   struct ccl_program *font_encoder;
 };
@@ -138,12 +142,12 @@ struct fontset_info
   int height;
 
   /* Table of font name for each character set.  */
-  char *fontname[MAX_CHARSET];
+  char *fontname[MAX_CHARSET + 1];
 
   /* Table of index numbers of fonts indexed by charset.  If a font is
      not yet loaded, the value is -1 (FONT_NOT_OPENED).  If font
      loading is failed, the value is -2 (FONT_NOT_FOUND).  */
-  int font_indexes[MAX_CHARSET];
+  int font_indexes[MAX_CHARSET + 1];
 };
 
 /* This data type is used for the fontset_data field of struct frame.  */
@@ -199,5 +203,7 @@ extern Lisp_Object list_fontsets ();
 extern Lisp_Object Vglobal_fontset_alist;
 
 extern Lisp_Object Qfontset;
+extern Lisp_Object Vuse_default_ascent; 
+extern Lisp_Object Valternative_fontname_alist;
 
 #endif /* _FONTSET_H */