diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-08-29 19:52:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-08-29 19:52:57 +0000 |
| commit | d4335ff9aedf20c15d2d7d8f5a78c04b2c729f06 (patch) | |
| tree | fc246fcf317021b15543796dc6ffb3734d89cec4 /src | |
| parent | d5b73ebdd76e2ac114e49c405f4a15addc844099 (diff) | |
| download | emacs-d4335ff9aedf20c15d2d7d8f5a78c04b2c729f06.tar.gz | |
(free_marker): Call unchain_marker.
Diffstat (limited to 'src')
| -rw-r--r-- | src/alloc.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/alloc.c b/src/alloc.c index b488a28309c..b5a45fd3845 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -1044,6 +1044,8 @@ DEFUN ("make-marker", Fmake_marker, Smake_marker, 0, 0, 0, free_marker (marker) Lisp_Object marker; { + unchain_marker (marker); + XMISC (marker)->u_marker.type = Lisp_Misc_Free; XMISC (marker)->u_free.chain = marker_free_list; marker_free_list = XMISC (marker); |