# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1087912565 0
# Node ID 10ec6b8cf09a32eaaa6766d1d36e5c23d2c5cb87
# Parent  3464ef80e67d078dab631cb6b39efd8fdefbfe91
*** empty log message ***

diff -r 3464ef80e67d -r 10ec6b8cf09a src/ChangeLog
--- a/src/ChangeLog	Tue Jun 22 03:04:58 2004 +0000
+++ b/src/ChangeLog	Tue Jun 22 13:56:05 2004 +0000
@@ -1,3 +1,17 @@
+2004-06-22  Kim F. Storm  <storm@cua.dk>
+
+	* lisp.h (struct Lisp_Save_Value): New member dogc.
+	(SAFE_ALLOCA_LISP): Change second arg to number of elements.
+	Set dogc member in Lisp_Save_Value object so it will be GC'ed.
+	(SAFE_FREE_LISP): New macro.
+
+	* alloc.c (safe_alloca_unwind): Clear dogc and pointer members.
+	(make_save_value): Init new dogc member.
+	(mark_object): Mark Lisp_Save_Value pointer array if dogc is set.
+
+	* fns.c (Fmapconcat, Fmapcar): Use new SAFE_ALLOCA_LISP and
+	SAFE_FREE_LISP macros.
+
 2004-06-22  Kim F. Storm  <storm@cua.dk>
 
 	* lisp.h (SAFE_ALLOCA_LISP): New macro to allocate Lisp_Objects.