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

Fix dumping of Lisp profiles

Browse source 
* lisp/profiler.el (profiler-fixup-entry): New function.
(profiler-fixup-backtrace): Use it.  (Bug#72559)
This commit is contained in:
Stefan Monnier 2024-08-14 08:48:43 -04:00 • committed by Eli Zaretskii
parent bfe07eca59
commit 7b752a93a4
1 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/profiler.el
View file

@ -103,8 +103,13 @@
;;; Backtraces ;;; Backtraces
(defun profiler-fixup-entry (entry)
(if (symbolp entry)
entry
(substring-no-properties (help-fns-function-name entry))))
(defun profiler-fixup-backtrace (backtrace) (defun profiler-fixup-backtrace (backtrace)
(apply #'vector (mapcar #'help-fns-function-name backtrace))) (apply #'vector (mapcar #'profiler-fixup-entry backtrace)))
;;; Logs ;;; Logs