* src/ftfont.c (ftfont_close): Add comment re Bug#20890.

diff --git a/src/ftfont.c b/src/ftfont.c
index b37b404c5ef6404031d9630b64d32ec68370795d..41d99dffeb63b43bd1ee8f892ef5fc70e6a1a298 100644 (file)
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -1315,6 +1315,10 @@ ftfont_open (struct frame *f, Lisp_Object entity, int pixel_size)
 static void
 ftfont_close (struct font *font)
 {
+  /* FIXME: Although this function can be called while garbage-collecting,
+     the function assumes that Lisp data structures are properly-formed.
+     This invalid assumption can lead to core dumps (Bug#20890).  */
+
   struct ftfont_info *ftfont_info = (struct ftfont_info *) font;
   Lisp_Object val, cache;