comparison src/buffer.c @ 4416:9657ef911049

(Fmove_overlay): Avoid initializer for Lisp_Object vars. (verify_overlay_modification): Declare ostart, oend as Lisp_Object.
author Richard M. Stallman <rms@gnu.org>
date Mon, 02 Aug 1993 07:28:31 +0000
parents 7c7e33d6386d
children 503af6aa135b
comparison
equal deleted inserted replaced
4415:b9ce445fb406 4416:9657ef911049
1614 if (!EQ (buffer, obuffer)) 1614 if (!EQ (buffer, obuffer))
1615 windows_or_buffers_changed = 1; 1615 windows_or_buffers_changed = 1;
1616 else 1616 else
1617 /* Redisplay the area the overlay has just left, or just enclosed. */ 1617 /* Redisplay the area the overlay has just left, or just enclosed. */
1618 { 1618 {
1619 Lisp_Object o_beg = OVERLAY_START (overlay); 1619 Lisp_Object o_beg;
1620 Lisp_Object o_end = OVERLAY_END (overlay); 1620 Lisp_Object o_end;
1621 int change_beg, change_end; 1621 int change_beg, change_end;
1622 1622
1623 o_beg = OVERLAY_START (overlay);
1624 o_end = OVERLAY_END (overlay);
1623 o_beg = OVERLAY_POSITION (o_beg); 1625 o_beg = OVERLAY_POSITION (o_beg);
1624 o_end = OVERLAY_POSITION (o_end); 1626 o_end = OVERLAY_POSITION (o_end);
1625 1627
1626 if (XINT (o_beg) == XINT (beg)) 1628 if (XINT (o_beg) == XINT (beg))
1627 redisplay_region (b, XINT (o_end), XINT (end)); 1629 redisplay_region (b, XINT (o_end), XINT (end));
1901 for (tail = current_buffer->overlays_before; 1903 for (tail = current_buffer->overlays_before;
1902 CONSP (tail); 1904 CONSP (tail);
1903 tail = XCONS (tail)->cdr) 1905 tail = XCONS (tail)->cdr)
1904 { 1906 {
1905 int startpos, endpos; 1907 int startpos, endpos;
1906 int ostart, oend; 1908 Lisp_Object ostart, oend;
1907 1909
1908 overlay = XCONS (tail)->car; 1910 overlay = XCONS (tail)->car;
1909 1911
1910 ostart = OVERLAY_START (overlay); 1912 ostart = OVERLAY_START (overlay);
1911 oend = OVERLAY_END (overlay); 1913 oend = OVERLAY_END (overlay);
1935 for (tail = current_buffer->overlays_after; 1937 for (tail = current_buffer->overlays_after;
1936 CONSP (tail); 1938 CONSP (tail);
1937 tail = XCONS (tail)->cdr) 1939 tail = XCONS (tail)->cdr)
1938 { 1940 {
1939 int startpos, endpos; 1941 int startpos, endpos;
1940 int ostart, oend; 1942 Lisp_Object ostart, oend;
1941 1943
1942 overlay = XCONS (tail)->car; 1944 overlay = XCONS (tail)->car;
1943 1945
1944 ostart = OVERLAY_START (overlay); 1946 ostart = OVERLAY_START (overlay);
1945 oend = OVERLAY_END (overlay); 1947 oend = OVERLAY_END (overlay);