diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-10-11 07:45:41 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-10-11 07:45:41 +0000 |
| commit | 0ac482fb8a7e095929b50cdf269f34b4fe51aa6f (patch) | |
| tree | 7d417f20cc5faecee58b78e4233688ba9296f5a4 /src/buffer.h | |
| parent | b397359efafd1a6fac312dad7a89237249538ea2 (diff) | |
| download | emacs-0ac482fb8a7e095929b50cdf269f34b4fe51aa6f.tar.gz | |
(OVERLAY_POSITION): Marker assert now tests substructure.
Diffstat (limited to 'src/buffer.h')
| -rw-r--r-- | src/buffer.h | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/buffer.h b/src/buffer.h index 4e2a6495886..d456e1bd68e 100644 --- a/src/buffer.h +++ b/src/buffer.h @@ -426,8 +426,9 @@ extern Lisp_Object Vtransient_mark_mode; /* Return the actual buffer position for the marker P. We assume you know which buffer it's pointing into. */ -#define OVERLAY_POSITION(P) \ - (XGCTYPE ((P)) == Lisp_Marker ? marker_position ((P)) : (abort (), 0)) +#define OVERLAY_POSITION(P) \ + (XGCTYPE ((P)) == Lisp_Misc && XMISC ((P))->type == Lisp_Misc_Marker \ + ? marker_position ((P)) : (abort (), 0)) /* Allocation of buffer text. */ |