Mercurial > emacs
changeset 6655:41be2ee67089
(overlays_at): Use XGCTYPE.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 03 Apr 1994 19:37:59 +0000 |
| parents | b188651d24d6 |
| children | 19bcf36f315e |
| files | src/buffer.c |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/buffer.c Sun Apr 03 19:37:32 1994 +0000 +++ b/src/buffer.c Sun Apr 03 19:37:59 1994 +0000 @@ -1304,13 +1304,13 @@ int inhibit_storing = 0; for (tail = current_buffer->overlays_before; - CONSP (tail); + XGCTYPE (tail) == Lisp_Cons; tail = XCONS (tail)->cdr) { int startpos; overlay = XCONS (tail)->car; - if (! OVERLAY_VALID (overlay)) + if (XGCTYPE (overlay) == Lisp_Overlay) abort (); start = OVERLAY_START (overlay); @@ -1344,13 +1344,13 @@ } for (tail = current_buffer->overlays_after; - CONSP (tail); + XGCTYPE (tail) == Lisp_Cons; tail = XCONS (tail)->cdr) { int startpos; overlay = XCONS (tail)->car; - if (! OVERLAY_VALID (overlay)) + if (XGCTYPE (overlay) == Lisp_Overlay) abort (); start = OVERLAY_START (overlay);