Commit 0bc90bba authored by Kim F. Storm's avatar Kim F. Storm

(face_at_buffer_position): Use GET_OVERLAYS_AT.

parent 7994a991
2004-05-18 Kim F. Storm <storm@cua.dk>
* buffer.h (GET_OVERLAYS_AT): New macro.
* msdos.c (IT_note_mouse_highlight): Use it.
* textprop.c (get_char_property_and_overlay): Use it.
* xdisp.c (next_overlay_change, note_mouse_highlight): Use it.
* xfaces.c (face_at_buffer_position): Use it.
* print.c (print_object): Increase buf size.
2004-05-17 Kim F. Storm <storm@cua.dk>
* alloc.c (mark_object): Ignore Lisp_Misc_Free objects.
......
......@@ -7297,24 +7297,8 @@ face_at_buffer_position (w, pos, region_beg, region_end,
/* 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;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment