Re: A tip: how to display longer function names in profiler-report

[Alan Mackenzie <acm@muc.de>]

Hello, Clément.

On Mon, Dec 21, 2020 at 15:24:06 -0500, Clément Pit-Claudel wrote:
> On 12/21/20 11:32 AM, Alan Mackenzie wrote:
> > Hello, Emacs.

> > It's annoyed me for a long time that profiler-report wastes so much
> > horizontal screen space, and truncates function names horribly.  And
> > that's in CC Mode, which has a very short package prefix, "c-".

> I think the best fix would be to put the CPU samples and % columns
> first instead of last, and put the function name column last, with no
> limits on how far to the right it might expand.

That's an utterly brilliant idea!  Thanks!

Something like, very roughly: ....



diff --git a/lisp/profiler.el b/lisp/profiler.el
index bf8aacccc3..20486da29b 100644
--- a/lisp/profiler.el
+++ b/lisp/profiler.el
@@ -445,9 +445,10 @@ profiler-report-leaf-mark
   :group 'profiler)
 
 (defvar profiler-report-cpu-line-format
-  '((50 left)
-    (24 right ((19 right)
-	       (5 right)))))
+  '((24 right ((19 right)
+	       (5 right)))
+    (90 left))
+                           )
 
 (defvar profiler-report-memory-line-format
   '((55 left)
@@ -505,13 +512,14 @@ profiler-report-line-format
     (profiler-format (cl-ecase (profiler-profile-type profiler-report-profile)
 		       (cpu profiler-report-cpu-line-format)
 		       (memory profiler-report-memory-line-format))
-		     name-part
 		     (if diff-p
 			 (list (if (> count 0)
 				   (format "+%s" count)
 				 count)
 			       "")
-		       (list count count-percent)))))
+		       (list count count-percent))
+                     name-part
+                                                  )))
 
 (defun profiler-report-insert-calltree (tree)
   (let ((line (profiler-report-line-format tree)))
@@ -735,7 +748,8 @@ profiler-report-describe-entry
 	    (cpu
 	     (profiler-report-header-line-format
 	      profiler-report-cpu-line-format
-	      "Function" (list "CPU samples" "%")))
+	      (list "CPU samples" "%") "Function"
+                                                 ))
 	    (memory
 	     (profiler-report-header-line-format
 	      profiler-report-memory-line-format


-- 
Alan Mackenzie (Nuremberg, Germany).