# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 960497895 0
# Node ID e89a3b5d7c138a29ba515e986e9cfaa83a038a63
# Parent  e31f7884415722e4d23d5a0df056ea1dc037be1a
(handle_fontified_prop): Don't GCPRO local var `pos';
it's an integer.

diff -r e31f78844157 -r e89a3b5d7c13 src/xdisp.c
--- a/src/xdisp.c	Thu Jun 08 20:57:47 2000 +0000
+++ b/src/xdisp.c	Thu Jun 08 20:58:15 2000 +0000
@@ -1787,7 +1787,6 @@
 {
   Lisp_Object prop, pos;
   enum prop_handled handled = HANDLED_NORMALLY;
-  struct gcpro gcpro1;
 
   /* Get the value of the `fontified' property at IT's current buffer
      position.  (The `fontified' property doesn't have a special
@@ -1802,7 +1801,6 @@
     {
       Lisp_Object args[2];
 
-      GCPRO1 (pos);
       /* Run the hook functions.  */
       args[0] = Qfontification_functions;
       args[1] = pos;
@@ -1813,7 +1811,6 @@
 	 fontify the text for which reason ever.  */
       if (!NILP (Fget_char_property (pos, Qfontified, Qnil)))
 	handled = HANDLED_RECOMPUTE_PROPS;
-      UNGCPRO;
     }
 
   return handled;