Mercurial > emacs

comparison src/alloc.c @ 27746:2556e20596b8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(enum mem_type): Compile unconditionally.
author Gerd Moellmann <gerd@gnu.org>
date Thu, 17 Feb 2000 16:14:11 +0000
parents 581c76c41ca4
children 27014604bbd3
comparison
equal deleted inserted replaced
27745:8796c6b4b7c2 27746:2556e20596b8
256 static void free_large_strings P_ ((void)); 256 static void free_large_strings P_ ((void));
257 static void sweep_strings P_ ((void)); 257 static void sweep_strings P_ ((void));
258 258
259 extern int message_enable_multibyte; 259 extern int message_enable_multibyte;
260 260
261
262 #if GC_MARK_STACK
263
264 #if GC_MARK_STACK == GC_USE_GCPROS_CHECK_ZOMBIES
265 #include <stdio.h> /* For fprintf. */
266 #endif
267
268 /* A unique object in pure space used to make some Lisp objects
269 on free lists recognizable in O(1). */
270
271 Lisp_Object Vdead;
272
273 /* When scanning the C stack for live Lisp objects, Emacs keeps track 261 /* When scanning the C stack for live Lisp objects, Emacs keeps track
274 of what memory allocated via lisp_malloc is intended for what 262 of what memory allocated via lisp_malloc is intended for what
275 purpose. This enumeration specifies the type of memory. */ 263 purpose. This enumeration specifies the type of memory. */
276 264
277 enum mem_type 265 enum mem_type
283 MEM_TYPE_MISC, 271 MEM_TYPE_MISC,
284 MEM_TYPE_SYMBOL, 272 MEM_TYPE_SYMBOL,
285 MEM_TYPE_FLOAT, 273 MEM_TYPE_FLOAT,
286 MEM_TYPE_VECTOR 274 MEM_TYPE_VECTOR
287 }; 275 };
276
277 #if GC_MARK_STACK
278
279 #if GC_MARK_STACK == GC_USE_GCPROS_CHECK_ZOMBIES
280 #include <stdio.h> /* For fprintf. */
281 #endif
282
283 /* A unique object in pure space used to make some Lisp objects
284 on free lists recognizable in O(1). */
285
286 Lisp_Object Vdead;
288 287
289 struct mem_node; 288 struct mem_node;
290 static void *lisp_malloc P_ ((int, enum mem_type)); 289 static void *lisp_malloc P_ ((int, enum mem_type));
291 static void mark_stack P_ ((void)); 290 static void mark_stack P_ ((void));
292 static void init_stack P_ ((Lisp_Object *)); 291 static void init_stack P_ ((Lisp_Object *));