diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-02-26 04:05:17 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-02-26 04:05:17 +0000 |
| commit | d00c875cf6b9837725b8823e2dd2cc1f298047e7 (patch) | |
| tree | 315f672690c5f8c673c0f10a3bce27346ed79281 /src/buffer.h | |
| parent | 52f04d46fe299cfdb62efbed57a1dd1916f15fb8 (diff) | |
| download | emacs-d00c875cf6b9837725b8823e2dd2cc1f298047e7.tar.gz | |
(OVERLAY_POSITION): Don't check which buffer it points to.
Diffstat (limited to 'src/buffer.h')
| -rw-r--r-- | src/buffer.h | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/src/buffer.h b/src/buffer.h index 7d6e1475de9..53fdac121d1 100644 --- a/src/buffer.h +++ b/src/buffer.h @@ -373,10 +373,7 @@ extern Lisp_Object Vtransient_mark_mode; /* Overlays */ -/* Overlays are ordinary Lisp objects, and users can alter their contents. - Therefore, we cannot assume that they remain valid--we must check. */ - -/* 1 if the OV is a cons cell whose car is a cons cell. */ +/* 1 if the OV is an overlay object. */ #define OVERLAY_VALID(OV) (OVERLAYP (OV)) /* Return the marker that stands for where OV starts in the buffer. */ @@ -385,13 +382,11 @@ extern Lisp_Object Vtransient_mark_mode; /* Return the marker that stands for where OV ends in the buffer. */ #define OVERLAY_END(OV) (XCONS (XCONS ((OV))->car)->cdr) -/* Return the actual buffer position for the marker P, - if it is a marker and points into the current buffer. - Otherwise, zero. */ +/* Return the actual buffer position for the marker P. + We assume you know which buffer it's pointing into. */ #define OVERLAY_POSITION(P) \ - ((MARKERP ((P)) && XMARKER ((P))->buffer == current_buffer) \ - ? marker_position ((P)) : 0) + (MARKERP ((P)) ? marker_position ((P)) : (abort (), 0)) /* Allocation of buffer text. */ |