# HG changeset patch # User michaels # Date 1044716626 0 # Node ID beb703ae34fdb76d5a2d5d393d660709d99bd0bb # Parent 57b76886836d11d36ee035009304021bfcc1c954 [xemacs-hg @ 2003-02-08 15:03:45 by michaels] 2003-02-07 Mike Sperber * alloc.c (GC_CHECK_NOT_FREE): Pull this out of USE_KKCC. diff -r 57b76886836d -r beb703ae34fd src/ChangeLog --- a/src/ChangeLog Sat Feb 08 02:29:55 2003 +0000 +++ b/src/ChangeLog Sat Feb 08 15:03:46 2003 +0000 @@ -1,3 +1,7 @@ +2003-02-07 Mike Sperber + + * alloc.c (GC_CHECK_NOT_FREE): Pull this out of USE_KKCC. + 2003-02-07 Ben Wing * lread.c (Fload_internal): @@ -167,7 +171,6 @@ Document exact functioning of `vertical-motion' better, and its differences from GNU Emacs. - 2003-02-06 Ben Wing * unicode.c: diff -r 57b76886836d -r beb703ae34fd src/alloc.c --- a/src/alloc.c Sat Feb 08 02:29:55 2003 +0000 +++ b/src/alloc.c Sat Feb 08 15:03:46 2003 +0000 @@ -3125,6 +3125,10 @@ #endif /* defined (USE_KKCC) || defined (PDUMP) */ +#define GC_CHECK_NOT_FREE(lheader) \ + gc_checking_assert (LHEADER_IMPLEMENTATION (lheader)->basic_p || \ + ! ((struct lcrecord_header *) lheader)->free) + #ifdef USE_KKCC /* The following functions implement the new mark algorithm. They mark objects according to their descriptions. They @@ -3134,11 +3138,6 @@ const struct sized_memory_description *sdesc, int count); -#define GC_CHECK_NOT_FREE(lheader) \ - gc_checking_assert (LHEADER_IMPLEMENTATION (lheader)->basic_p || \ - ! ((struct lcrecord_header *) lheader)->free) - - #ifdef ERROR_CHECK_GC #define KKCC_DO_CHECK_FREE(obj, allow_free) \ do \