Mercurial > emacs

changeset 55654:edc2b57535e5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(face_at_buffer_position): Use GET_OVERLAYS_AT.
author Kim F. Storm <storm@cua.dk>
date Mon, 17 May 2004 22:49:26 +0000
parents 5b5102265ed8
children 79349ae5ee2d
files src/xfaces.c
diffstat 1 files changed, 2 insertions(+), 18 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfaces.c	Mon May 17 22:48:56 2004 +0000
+++ b/src/xfaces.c	Mon May 17 22:49:26 2004 +0000
@@ -7297,24 +7297,8 @@
   /* Look at properties from overlays.  */
   {
     int next_overlay;
-    int len;
-
-    /* First try with room for 40 overlays.  */
-    len = 40;
-    overlay_vec = (Lisp_Object *) alloca (len * sizeof (Lisp_Object));
-    noverlays = overlays_at (pos, 0, &overlay_vec, &len,
-			     &next_overlay, NULL, 0);
-
-    /* If there are more than 40, make enough space for all, and try
-       again.  */
-    if (noverlays > len)
-      {
-	len = noverlays;
-	overlay_vec = (Lisp_Object *) alloca (len * sizeof (Lisp_Object));
-	noverlays = overlays_at (pos, 0, &overlay_vec, &len,
-				 &next_overlay, NULL, 0);
-      }
-
+
+    GET_OVERLAYS_AT (pos, overlay_vec, noverlays, &next_overlay, 0);
     if (next_overlay < endpos)
       endpos = next_overlay;
   }