Re: Lazy printing in tabulated-list-mode

[Artur Malabarba <bruce.connor.am@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 333 bytes --]

> Clearly, you used non-byte-compiled code here.  Can you try again after
> byte-compiling package.el?

Yes, sorry about that. Here is another report, bytecompiled.
The overall structure still looks the same. There's a little less
grabage collection (35%), 27% of the samples are lost in -print-entry
somehow, and 13% in -print-col.

[-- Attachment #2: tab-list-report --]
[-- Type: application/octet-stream, Size: 6457 bytes --]


[profiler-profile "24.3" cpu #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8 data ([maphash profiler-calltree-build-unified profiler-calltree-build profiler-report-render-calltree-1 profiler-report-rerender-calltree profiler-report-render-calltree profiler-report-setup-buffer profiler-report-profile-other-window profiler-report-cpu profiler-report progn eval eval-expression funcall-interactively call-interactively command-execute] 3 [tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil nil nil] 87 [aref progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute] 26 [memq and progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression] 6 [let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil] 15 [aref let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil] 3 [string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil] 10 [car aref let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil] 14 [sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil nil] 17 [cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil] 19 [package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil] 21 [and progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively] 36 [tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil] 228 [tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil] 541 [apply tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil] 22 [make-text-button apply insert-text-button apply tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil] 19 [add-text-properties tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil] 4 [apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil nil] 103 [put-text-property tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil] 23 [symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil] 17 [or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute] 9 [vectorp and progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression] 4 [bidi-string-mark-left-to-right tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil] 18 [apply insert-text-button apply tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil] 7 [progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively] 13 [add-text-properties make-text-button apply insert-text-button apply tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil] 3 [>= and progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression] 3 [progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 4 [aref memq and progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval] 4 [progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil] 3 [length >= and progn or progn symbol-name string< package-menu--name-predicate cond let package-menu--status-predicate sort tabulated-list-print progn eval] 3 [insert-text-button apply tabulated-list-print-col tabulated-list-print-entry apply tabulated-list-print progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil] 3 [profiler-cpu-profile profiler-report-cpu profiler-report progn eval eval-expression funcall-interactively call-interactively command-execute nil nil nil nil nil nil nil] 4 [Automatic\ GC] 725)) (21828 39284 676974 363000) nil]