# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 780128726 0
# Node ID 722763fed8ce11b7befab80e80996b599dc2782a
# Parent  940ca63c26c895630b2e157e37ef8c86fe3f0656
(Fget_char_property): Pass new arg to overlays_at.
(NULL): Define if not defined.

diff -r 940ca63c26c8 -r 722763fed8ce src/textprop.c
--- a/src/textprop.c	Wed Sep 21 06:04:20 1994 +0000
+++ b/src/textprop.c	Wed Sep 21 06:25:26 1994 +0000
@@ -22,6 +22,10 @@
 #include "intervals.h"
 #include "buffer.h"
 #include "window.h"
+
+#ifndef NULL
+#define NULL (void *)0
+#endif
 
 
 /* NOTES:  previous- and next- property change will have to skip
@@ -543,7 +547,8 @@
       len = 40;
       overlay_vec = (Lisp_Object *) alloca (len * sizeof (Lisp_Object));
 
-      noverlays = overlays_at (posn, 0, &overlay_vec, &len, &next_overlay);
+      noverlays = overlays_at (posn, 0, &overlay_vec, &len,
+			       &next_overlay, NULL);
 
       /* If there are more than 40,
 	 make enough space for all, and try again.  */
@@ -551,7 +556,8 @@
 	{
 	  len = noverlays;
 	  overlay_vec = (Lisp_Object *) alloca (len * sizeof (Lisp_Object));
-	  noverlays = overlays_at (posn, 0, &overlay_vec, &len, &next_overlay);
+	  noverlays = overlays_at (posn, 0, &overlay_vec, &len,
+				   &next_overlay, NULL);
 	}
       noverlays = sort_overlays (overlay_vec, noverlays, w);