emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Things got very slow: profiler output


From: Bruno Cardoso
Subject: Re: Things got very slow: profiler output
Date: Sat, 16 Mar 2024 10:31:56 -0300

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.

[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]

reply via email to

[Prev in Thread] Current Thread [Next in Thread]