(ftfont_get_cache): Adjust the argument type.

diff --git a/src/ftfont.c b/src/ftfont.c
index 11715fbbfff65cd5987fe8a3072ed9ff9cd1e3c9..2c8d899a620da112dcc212a385f03921564fc467 100644 (file)
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -262,7 +262,7 @@ ftfont_list_generic_family (spec, frame, registry)
 }
 
 
-static Lisp_Object ftfont_get_cache P_ ((Lisp_Object));
+static Lisp_Object ftfont_get_cache P_ ((FRAME_PTR));
 static Lisp_Object ftfont_list P_ ((Lisp_Object, Lisp_Object));
 static Lisp_Object ftfont_match P_ ((Lisp_Object, Lisp_Object));
 static Lisp_Object ftfont_list_family P_ ((Lisp_Object));
@@ -316,8 +316,8 @@ struct font_driver ftfont_driver =
 extern Lisp_Object QCname;
 
 static Lisp_Object
-ftfont_get_cache (frame)
-     Lisp_Object frame;
+ftfont_get_cache (f)
+     FRAME_PTR f;
 {
   return freetype_font_cache;
 }