* fontset.c (fontset_get_font_group):

* font.c (font_check_otf): Specify argument types.

diff --git a/src/ChangeLog b/src/ChangeLog
index a03f354..8470c1f 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2008-07-09  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * fontset.c (fontset_get_font_group):
+       * font.c (font_check_otf): Specify argument types.
+
 2008-07-09  Kenichi Handa  <handa@m17n.org>
 
        * coding.c (detect_coding_utf_8): Set detect_info->found only when

diff --git a/src/font.c b/src/font.c
index 8988b21..91bb842 100644 (file)
--- a/src/font.c
+++ b/src/font.c
@@ -2404,7 +2404,7 @@ font_check_otf_features (script, langsys, features, table)
 /* Check if OTF_CAPABILITY satisfies SPEC (otf-spec).  */
 
 static int
-font_check_otf (spec, otf_capability)
+font_check_otf (Lisp_Object spec, Lisp_Object otf_capability)
 {
   Lisp_Object script, langsys = Qnil, gsub = Qnil, gpos = Qnil;
 

diff --git a/src/fontset.c b/src/fontset.c
index 5dbbadb..caa732b 100644 (file)
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -459,7 +459,7 @@ reorder_font_vector (font_group, font)
 }
 
 static Lisp_Object
-fontset_get_font_group (fontset, c)
+fontset_get_font_group (Lisp_Object fontset, int c)
 {
   Lisp_Object font_group;
   Lisp_Object base_fontset;