* fontset.c (fontset_get_font_group):

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

diff --git a/src/ChangeLog b/src/ChangeLog
index a03f35478433c2b03eba8fdeb656f05d7ee2699d..8470c1ffcfb4aace4e2e9ccdb2735d171cd44f93 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 8988b2193bd2506d1ef26b8845439b993bd90a53..91bb84239aea6cfb6fbaa70f1ff4db2a401d2fc5 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 5dbbadbe042cb13ce4b98c31bd64691471867fc6..caa732b6bc6f736f749aecc256d93cd29a46df6f 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;