Mercurial > hg > xemacs-beta

comparison lisp/diagnose.el @ 3888:099851392ea7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-03-30 14:38:39 by stephent] Fix docstring typo. <87648iyel3.fsf@uwakimon.sk.tsukuba.ac.jp>
author stephent
date Fri, 30 Mar 2007 14:38:42 +0000
parents a921f5f2aa11
children b4f4e0cc90f1
comparison
equal deleted inserted replaced
3887:328ed8d54bff 3888:099851392ea7
167 (princ (format "\n\ngrand total: %s\n" grandtotal))) 167 (princ (format "\n\ngrand total: %s\n" grandtotal)))
168 grandtotal)))) 168 grandtotal))))
169 169
170 170
171 (defun show-object-memory-usage-stats () 171 (defun show-object-memory-usage-stats ()
172 "Show statistics about object memeory usage in XEmacs." 172 "Show statistics about object memory usage in XEmacs."
173 (interactive) 173 (interactive)
174 (garbage-collect) 174 (garbage-collect)
175 (let ((buffer "*object memory usage statistics*") 175 (let ((buffer "*object memory usage statistics*")
176 (plist (object-memory-usage-stats)) 176 (plist (object-memory-usage-stats))
177 (fmt "%-30s%10s%10s\n") 177 (fmt "%-30s%10s%10s\n")