diff src/xgccache.h @ 5118:e0db3c197671 ben-lisp-object

merge up to latest default branch, doesn't compile yet
author Ben Wing <ben@xemacs.org>
date Sat, 26 Dec 2009 21:18:49 -0600
parents ad2f4ae9895b
children b3ce27ca7647
line wrap: on
line diff
--- a/src/xgccache.h	Sat Dec 26 00:20:27 2009 -0600
+++ b/src/xgccache.h	Sat Dec 26 21:18:49 2009 -0600
@@ -31,4 +31,18 @@
 void free_gc_cache (struct gc_cache *cache);
 GC gc_cache_lookup (struct gc_cache *, XGCValues *, unsigned long mask);
 
+#define XE_GCONTEXT(cell) (XGContextFromGC(cell->gc))
+
+#ifdef DEBUG_XEMACS
+
+void describe_gc_cache (struct gc_cache *cache, int flags);
+
+#define DGCCFLAG_DISABLE		0
+#define DGCCFLAG_SUMMARY		1 << 0
+#define DGCCFLAG_LIST_CELLS		1 << 1
+#define DGCCFLAG_CELL_DETAILS		1 << 2
+/* A combination of the flags above. */
+#define DGCCFLAG_DEFAULT		DGCCFLAG_SUMMARY | DGCCFLAG_LIST_CELLS
+#endif
+
 #endif /* INCLUDED_xgccache_h_ */