Mercurial > hg > xemacs-beta

comparison src/alloc.c @ 1276:beb703ae34fd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-02-08 15:03:45 by michaels] 2003-02-07 Mike Sperber <mike@xemacs.org> * alloc.c (GC_CHECK_NOT_FREE): Pull this out of USE_KKCC.
author michaels
date Sat, 08 Feb 2003 15:03:46 +0000
parents de6cf052e10b
children f3437b56874d
comparison
equal deleted inserted replaced
1275:57b76886836d 1276:beb703ae34fd
3123 } 3123 }
3124 } 3124 }
3125 3125
3126 #endif /* defined (USE_KKCC) || defined (PDUMP) */ 3126 #endif /* defined (USE_KKCC) || defined (PDUMP) */
3127 3127
3128 #define GC_CHECK_NOT_FREE(lheader) \
3129 gc_checking_assert (LHEADER_IMPLEMENTATION (lheader)->basic_p || \
3130 ! ((struct lcrecord_header *) lheader)->free)
3131
3128 #ifdef USE_KKCC 3132 #ifdef USE_KKCC
3129 /* The following functions implement the new mark algorithm. 3133 /* The following functions implement the new mark algorithm.
3130 They mark objects according to their descriptions. They 3134 They mark objects according to their descriptions. They
3131 are modeled on the corresponding pdumper procedures. */ 3135 are modeled on the corresponding pdumper procedures. */
3132 3136
3133 static void mark_struct_contents (const void *data, 3137 static void mark_struct_contents (const void *data,
3134 const struct sized_memory_description *sdesc, 3138 const struct sized_memory_description *sdesc,
3135 int count); 3139 int count);
3136
3137 #define GC_CHECK_NOT_FREE(lheader) \
3138 gc_checking_assert (LHEADER_IMPLEMENTATION (lheader)->basic_p || \
3139 ! ((struct lcrecord_header *) lheader)->free)
3140
3141 3140
3142 #ifdef ERROR_CHECK_GC 3141 #ifdef ERROR_CHECK_GC
3143 #define KKCC_DO_CHECK_FREE(obj, allow_free) \ 3142 #define KKCC_DO_CHECK_FREE(obj, allow_free) \
3144 do \ 3143 do \
3145 { \ 3144 { \