comparison src/lrecord.h @ 5179:14fda1dbdb26

add memory usage info for specifiers -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-03-29 Ben Wing <ben@xemacs.org> * alloc.c: * alloc.c (lisp_object_storage_size): * alloc.c (Fobject_memory_usage): * alloc.c (lisp_object_memory_usage_full): Don't crash if passed a non-record object (int or char). * alloc.c (tree_memory_usage_1): * lrecord.h: New function tree_memory_usage() to return the memory usage of a tree of conses and/or vectors. * lisp.h: * lisp.h (PRIVATE_UNVERIFIED_LIST_LOOP_7): Add SAFE_LIST_LOOP_* functions for looping over a list not known to be correct or non-circular, but without signalling an error -- instead, just stop enumerating when an error detected. * emacs.c (main_1): * specifier.c: * specifier.c (specifier_memory_usage): * specifier.c (vars_of_specifier): * symsinit.h: Add memory usage info for specifiers.
author Ben Wing <ben@xemacs.org>
date Mon, 29 Mar 2010 22:47:55 -0500
parents 5ddbab03b0e6
children 4cd28c29a7a1
comparison
equal deleted inserted replaced
5172:be6e5ea38dda 5179:14fda1dbdb26
2083 Bytecount *storage_size, 2083 Bytecount *storage_size,
2084 Bytecount *extra_nonlisp_storage, 2084 Bytecount *extra_nonlisp_storage,
2085 Bytecount *extra_lisp_storage, 2085 Bytecount *extra_lisp_storage,
2086 struct generic_usage_stats *stats); 2086 struct generic_usage_stats *stats);
2087 Bytecount lisp_object_memory_usage (Lisp_Object object); 2087 Bytecount lisp_object_memory_usage (Lisp_Object object);
2088 Bytecount tree_memory_usage (Lisp_Object arg, int vectorp);
2088 void free_normal_lisp_object (Lisp_Object obj); 2089 void free_normal_lisp_object (Lisp_Object obj);
2089 2090
2090 2091
2091 /************************************************************************/ 2092 /************************************************************************/
2092 /* Dumping */ 2093 /* Dumping */