From: Bruno Cardoso <cardoso.bc@gmail.com>
To: Ihor Radchenko <yantar92@posteo.net>
Cc: William Denton <william@williamdenton.org>,
Emacs Org mode mailing list <emacs-orgmode@gnu.org>
Subject: Re: Things got very slow: profiler output
Date: Sat, 16 Mar 2024 10:31:56 -0300 [thread overview]
Message-ID: <87edcacng3.fsf@gmail.com> (raw)
In-Reply-To: <87edcawo5y.fsf@localhost>
[-- Attachment #1: Type: text/plain, Size: 1153 bytes --]
On 2024-03-16, 08:56 +0000, Ihor Radchenko <yantar92@posteo.net> wrote:
> Bruno Cardoso <cardoso.bc@gmail.com> writes:
>
> What if you try the following version of `org-activate-folds'?
>
> (defun org-activate-folds (limit)
> "Arrange trailing newlines after folds to inherit face before the fold."
> (let ((next-unfolded-newline (search-forward "\n" limit 'move)))
> (while (and next-unfolded-newline (org-fold-folded-p) (not (eobp)))
> (goto-char (org-fold-core-next-visibility-change nil limit 'only-folds))
> (setq next-unfolded-newline (search-forward "\n" limit 'move)))
> (when next-unfolded-newline
> (org-with-wide-buffer
> (when (and (> (match-beginning 0) (point-min))
> (org-fold-folded-p (1- (match-beginning 0)))
> (not (org-fold-folded-p (1- (match-beginning 0)) 'org-link)))
> (put-text-property
> (match-beginning 0) (match-end 0)
> 'face
> (get-text-property
> (org-fold-previous-visibility-change
> (1- (match-beginning 0)))
> 'face)))
> t))))
>
It makes almost no difference.
[-- Attachment #2: 20240316_profiler-org.txt --]
[-- Type: text/plain, Size: 29848 bytes --]
[profiler-profile "28.1" cpu #s(hash-table size 145 test equal rehash-size 1.5 rehash-threshold 0.8125 data ([nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 736 [line-move previous-line funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil nil] 4 [org-eldoc-documentation-function eldoc-documentation-default eldoc--invoke-strategy eldoc-print-current-symbol-info "#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_12>" apply timer-event-handler nil nil nil nil nil nil nil nil nil] 2 [org-fold-core--property-symbol-get-create org-fold-core-get-region-at-point org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil] 63 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-folded-p and while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b96fbec66943>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil] 332 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-folded-p and if save-restriction save-excursion progn if let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b95fd7835d43>" jit-lock--run-functions] 322 [org-fold-core--property-symbol-get-create "#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_23>" mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b964bcd96b43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil] 235 [jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil nil nil] 27 [org-at-table-p "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 5 [org-fold-core--check-spec mapc org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b9323ef7e343>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil] 8 [org-fold-core--property-symbol-get-create "#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_23>" mapcar org-fold-core-next-folding-state-change org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil] 21 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b93502f4f943>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil] 225 [font-lock-extend-jit-lock-region-after-change jit-lock-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 4 [font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b933758ed543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil] 105 [org-fold-check-before-invisible-edit-maybe apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil] 1 [org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b92b4afb7d43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil] 17 [font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b922b564dd43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil] 171 ["#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil] 24 [org-cite-get-processor org-cite-processor-has-capability-p org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b9205f32af43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil] 6 [org-element--cache-find org-element--cache-for-removal org-element--cache-submit-request org-element--cache-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil] 5 [org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b9268d93cb43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil] 28 [redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 12 [org-footnote-next-reference-or-definition org-activate-footnote-links font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc311227f743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil] 61 [jit-lock-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 4 [org-fold-core-get-folding-spec org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 4 [font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2ea0da8f43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil] 20 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil] 21 [org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 9 [org-element--cache-for-removal org-element--cache-submit-request org-element--cache-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil] 2 [org--newline "#<subr org-return>" apply org-return funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 4 [org-element--cache-submit-request org-element--cache-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 3 [org-do-emphasis-faces font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc3dd16f4943>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 23 [org-fontify-inline-src-blocks-1 org-fontify-inline-src-blocks font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf70b6761043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil] 18 [org-element--cache-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 6 [org-element--parse-to org-element-at-point "#<subr org-return>" apply org-return funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 3 [org-fold-folded-p and while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc79f3bf5043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil] 17 [org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf73ced89043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 42 [clear-minibuffer-message nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 3 [mapc org-fold-core-next-folding-state-change org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil] 5 [org-activate-links--overlays org-activate-links font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc57c9ad3043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil] 52 [org-fold-core-get-folding-spec org-fold-folded-p and if save-restriction save-excursion progn if let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc630dc91043>" jit-lock--run-functions jit-lock-fontify-now] 11 [jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 4 [org-fold-core-get-folding-spec-from-alias org-fold-core--check-spec mapc org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bfd613f2cd43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil] 3 [newline org--newline "#<subr org-return>" apply org-return funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 8 [org-fold-folded-p and if save-restriction save-excursion progn if let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf1aac005d43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function] 10 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-core-folded-p org-fold-core-next-visibility-change goto-char while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf1f2443d243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\)] 4 [org-cycle-optimize-window-after-visibility-change run-hook-with-args org-cycle-internal-local org-cycle funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 6 [font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf1f2443d243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function org-subtree-end-visible-p org-cycle-optimize-window-after-visibility-change run-hook-with-args org-cycle-internal-local org-cycle funcall-interactively command-execute nil nil nil] 7 [org-fontify-meta-lines-and-blocks font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf1f2443d243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 9 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-folded-p and while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf2bf1e4f243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move] 20 [line-move next-line funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil nil] 11 [run-at-time run-with-timer blink-cursor--start-timer blink-cursor-start apply timer-event-handler nil nil nil nil nil nil nil nil nil nil] 2 [org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf1f2443d243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move next-line funcall-interactively command-execute nil nil nil nil] 3 [org-fontify-meta-lines-and-blocks font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf2bf1e4f243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move next-line funcall-interactively command-execute nil nil nil nil] 3 [org-fold-core--property-symbol-get-create "#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_23>" mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf2a8da6fb43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move] 8 [org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf2a8da6fb43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move next-line funcall-interactively command-execute nil nil nil] 3 [org-fold-folded-p and while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf2e0dd26243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move next-line funcall-interactively command-execute] 3 [org-element--cache-find org-element--parse-to org-element-at-point org-eldoc-get-src-lang org-eldoc-documentation-function eldoc-documentation-default eldoc--invoke-strategy eldoc-print-current-symbol-info "#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_12>" apply timer-event-handler nil nil nil nil nil] 3 [apply timer-event-handler nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 1 [org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf2dbeab5143>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively command-execute nil nil nil] 4 [org-element-headline-parser org-element--cache-for-removal org-element--cache-submit-request org-element--cache-after-change delete-and-extract-region "#<compiled 0x1532240bfe9cdc71>" apply "#<compiled -0x698526e89acbe2>" buffer-substring--filter org-fold-core--buffer-substring-filter filter-buffer-substring kill-region kill-line funcall-interactively org-kill-line funcall-interactively] 2 ["#<compiled 0x6ad39cfad4f6c6d>" "#<compiled 0x84e099b9d36e0ee>" mapc seq-do seq-find org-cite-get-processor org-cite-processor-has-capability-p org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bfdfccfc8c43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\)] 4 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bf10499a8743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move previous-line funcall-interactively] 8 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bfdf20e12743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move previous-line funcall-interactively command-execute] 2 [org-do-latex-and-related font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bfdf20e12743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 3 [insert-for-yank yank funcall-interactively call-interactively org-yank-generic org-yank funcall-interactively command-execute nil nil nil nil nil nil nil nil] 1 [line-move-visual line-move previous-line funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil] 4 [syntax-ppss show-paren--default show-paren-function apply timer-event-handler nil nil nil nil nil nil nil nil nil nil nil] 1 [org-do-emphasis-faces font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b9297563a043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively command-execute nil nil nil] 3 [show-paren--locate-near-paren show-paren--default show-paren-function apply timer-event-handler nil nil nil nil nil nil nil nil nil nil nil] 2 [mapc seq-do seq-find org-cite-get-processor org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b921becf8143>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil] 4 [font-lock-flush org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b921becf8143>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil] 23 [org-fold-core-get-folding-spec-from-alias org-fold-core-get-folding-spec org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b925964d9e43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil] 6 [org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b94b16ee5443>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil] 20 ["#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_23>" mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc067c4c3a43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil] 3 [let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b94b16ee5443>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil] 3 [font-lock-fontify-region "#<compiled -0x1568bc324ec53843>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil] 18 [org-fold-core-get-folding-spec-from-alias org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 1 [org-fold-core-get-folding-spec org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568ba78ce3f9743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil] 13 ["#<compiled -0x1568b94b16ee5443>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil] 3 [buffer-match-p show-paren--enabled-p show-paren-function apply timer-event-handler nil nil nil nil nil nil nil nil nil nil nil] 3 [org-element--cache-after-change delete-forward-char funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil nil] 2 [insert-before-markers-and-inherit org-todo funcall-interactively org-shiftright funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 3 [mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568ba78ce3f9743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively] 3 [save-excursion progn if let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc384ec73043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively] 3 [font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc3ffa323243>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively command-execute nil nil nil nil] 4 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b94f1c2d9643>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively] 3 [mapc org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2320d43543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move-visual line-move next-line funcall-interactively] 3 [org-fold-core--property-symbol-get-create "#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_23>" mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc384ec73043>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move next-line] 3 [font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc385fdc2b43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function line-move next-line funcall-interactively command-execute nil nil nil nil nil nil] 10 [run-at-time undo-auto--boundary-ensure-timer undo-auto--undoable-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil] 4 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-folded-p not and if save-restriction save-excursion progn if let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568ba78ce3f9743>"] 6 [org-fold-core-get-folding-spec org-fold-folded-p and while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc20d29f5d43>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil] 23 [timer-event-handler nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] 2 [org-fold-core--property-symbol-get-create org-fold-core-get-folding-spec org-fold-folded-p and while let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2d07634543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function pos-visible-in-window-p blink-matching-open] 3 [font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2320d43543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function pos-visible-in-window-p blink-matching-open blink-paren-post-self-insert-function "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil] 4 [org-activate-footnote-links font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc277590a743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 4 [org-cite-processor-has-capability-p org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2320d43543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil] 7 [org-activate-links font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568ba78ce3f9743>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 4 [org-fold-core-get-folding-spec-from-alias org-fold-core-get-region-at-point org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil] 3 ["#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_23>" mapcar org-fold-core-next-folding-state-change org-fold-core--fix-folded-region "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil] 3 [org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2320d43543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil] 3 [progn if let org-activate-folds font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b94f1c2d9643>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil] 6 ["#<compiled 0x84e099b9d36e0ee>" mapc seq-do seq-find org-cite-get-processor org-cite-processor-has-capability-p org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b94b16ee5443>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil] 3 [derived-mode-p font-lock-set-defaults font-lock-fontify-region "#<compiled -0x1568b94f1c2d9643>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil] 4 [jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil nil nil nil] 3 [org-element--cache-sync org-element-at-point "#<subr org-return>" apply org-return funcall-interactively command-execute nil nil nil nil nil nil nil nil nil] 3 [font-lock-set-defaults font-lock-fontify-region "#<compiled -0x1568b94f1c2d9643>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil nil nil nil nil nil nil] 5 [org-element-headline-parser org-element--cache-for-removal org-element--cache-submit-request org-element--cache-after-change "#<subr org-self-insert-command>" apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil] 3 ["#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_22>" mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2320d43543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil] 3 [mapcar org-fold-core-next-folding-state-change org-fold-core-get-regions org-fold-region org-unfontify-region font-lock-unfontify-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568b94b16ee5443>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil] 3 [apply org-self-insert-command funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil nil] 3 [seq-do seq-find org-cite-get-processor org-cite-processor-has-capability-p org-cite-activate font-lock-fontify-keywords-region font-lock-default-fontify-region font-lock-fontify-region "#<compiled -0x1568bc2320d43543>" jit-lock--run-functions jit-lock-fontify-now jit-lock-function redisplay_internal\ \(C\ function\) nil nil nil] 6 [next-line funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil nil nil nil] 5 [forward-sexp elisp--preceding-sexp elisp--eval-last-sexp eval-last-sexp funcall-interactively command-execute nil nil nil nil nil nil nil nil nil nil] 5 [Automatic\ GC] 330)) (26101 39955 208865 599000) nil]
next prev parent reply other threads:[~2024-03-16 13:33 UTC|newest]
Thread overview: 30+ messages / expand[flat|nested] mbox.gz Atom feed top
2024-02-29 5:13 Things got very slow: profiler output William Denton
2024-02-29 9:21 ` Bruno Barbier
2024-02-29 9:28 ` Ihor Radchenko
[not found] ` <notmuch-sha1-998a6a574db756b51dbdd759ff59b5174d99c7f1>
2024-02-29 9:25 ` Bruno Barbier
2024-03-07 16:12 ` William Denton
2024-03-07 17:42 ` Bruno Barbier
2024-03-09 19:27 ` William Denton
2024-03-12 12:43 ` Ihor Radchenko
2024-03-13 23:19 ` Bruno Cardoso
2024-03-14 1:17 ` William Denton
2024-03-14 7:34 ` Gerard Vermeulen
2024-03-14 10:27 ` Bruno Cardoso
2024-03-14 10:22 ` Bruno Cardoso
2024-03-14 21:23 ` Ihor Radchenko
2024-03-15 1:09 ` Bruno Cardoso
2024-03-15 14:24 ` Ihor Radchenko
2024-03-15 16:33 ` Bruno Cardoso
2024-03-15 17:18 ` Ihor Radchenko
2024-03-15 17:49 ` Bruno Cardoso
2024-03-16 8:56 ` Ihor Radchenko
2024-03-16 13:31 ` Bruno Cardoso [this message]
2024-03-16 15:56 ` Ihor Radchenko
2024-03-16 18:39 ` William Denton
2024-03-16 18:56 ` Ihor Radchenko
2024-03-17 18:59 ` William Denton
2024-03-17 19:33 ` Ihor Radchenko
2024-03-16 20:21 ` Bruno Cardoso
2024-03-16 21:14 ` Ihor Radchenko
2024-03-17 13:02 ` Bruno Cardoso
2024-03-17 14:19 ` Ihor Radchenko
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87edcacng3.fsf@gmail.com \
--to=cardoso.bc@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=william@williamdenton.org \
--cc=yantar92@posteo.net \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).