procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make `memory-report-object-size' work standalone

Browse source 
* lisp/emacs-lisp/memory-report.el (memory-report--type-size):
Default to nil so that the test in `memory-report-object-size' works.
(memory-report--set-size): Initialize
memory-report-object-size.
This commit is contained in:
Lars Ingebrigtsen 2021-10-05 08:40:52 +02:00
parent 6640942221
commit e498e5be20
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/memory-report.el
View file

@ -31,7 +31,7 @@
(require 'subr-x)
(require 'cl-lib)
(defvar memory-report--type-size (make-hash-table))
(defvar memory-report--type-size nil)
;;;###autoload
(defun memory-report ()
@ -84,6 +84,7 @@ by counted more than once."
(gethash 'object memory-report--type-size)))
(defun memory-report--set-size (elems)
(setq memory-report--type-size (make-hash-table))
(setf (gethash 'string memory-report--type-size)
(cadr (assq 'strings elems)))
(setf (gethash 'cons memory-report--type-size)