changeset 19621:74151390752c

(free_marker): Call unchain_marker.
author Richard M. Stallman <rms@gnu.org>
date Fri, 29 Aug 1997 19:52:57 +0000
parents 7fccc0f34e57
children be0876941b71
files src/alloc.c
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/alloc.c	Fri Aug 29 17:07:26 1997 +0000
+++ b/src/alloc.c	Fri Aug 29 19:52:57 1997 +0000
@@ -1044,6 +1044,8 @@
 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);