Re: org-clock-sum-today performance

emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed

From: Tijs Mallaerts <tijs.mallaerts@gmail.com>
To: Ihor Radchenko <yantar92@posteo.net>
Cc: emacs-orgmode@gnu.org
Subject: Re: org-clock-sum-today performance
Date: Thu, 2 Feb 2023 16:57:34 +0100	[thread overview]
Message-ID: <CAA8HaRyNLOgzdVqjU2t5tDxg1FWusG=_EAhxuND7nmEtZ7Rqew@mail.gmail.com> (raw)
In-Reply-To: <87bkmdjurf.fsf@localhost>

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

Hello Ihor,

This is the profiler report:

[profiler-profile "28.1" cpu #s(hash-table size 65 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] 11 ["#<subr auto-revert-buffers>"
auto-revert-buffers--buffer-list-filter apply auto-revert-buffers apply
timer-event-handler nil nil nil nil nil nil nil nil nil nil] 12 ["#<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_9>" apply
timer-event-handler nil nil nil nil nil nil nil nil nil nil nil nil nil] 7
["#<compiled 0x1a044bbfab7c2ab2>" execute-extended-command--shorter
"#<compiled -0x20b067094a388be>" apply timer-event-handler nil nil nil nil
nil nil nil nil nil nil nil] 19 ["#<compiled 0x7850c1edb66e883>"
completion--some completion--nth-completion completion-try-completion
execute-extended-command--shorter "#<compiled -0x20b067094a388be>" apply
timer-event-handler nil nil nil nil nil nil nil nil] 20
[completion-pcm--find-all-completions completion-pcm-try-completion
"#<compiled 0x7850c1f5dbee883>" completion--some completion--nth-completion
completion-try-completion execute-extended-command--shorter "#<compiled
-0x20b067094a388be>" apply timer-event-handler nil nil nil nil nil nil] 36
[completion-pcm--merge-try completion-pcm-try-completion "#<compiled
0x7850c1f5dbee883>" completion--some completion--nth-completion
completion-try-completion execute-extended-command--shorter "#<compiled
-0x20b067094a388be>" apply timer-event-handler nil nil nil nil nil nil] 4
["#<compiled 0x11470000ec98926f>" "#<compiled -0x20b067094a388be>" apply
timer-event-handler nil nil nil nil nil nil nil nil nil nil nil nil] 1
[read--expression byte-code command-execute nil nil nil nil nil nil nil nil
nil nil nil nil nil] 4 [byte-code command-execute nil nil nil nil nil nil
nil nil nil nil nil nil nil nil] 39 ["#<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_9>" apply
timer-event-handler read--expression byte-code command-execute nil nil nil
nil nil nil nil nil nil nil] 1 [auto-revert-handler auto-revert-buffer
"#<subr auto-revert-buffers>" auto-revert-buffers--buffer-list-filter apply
auto-revert-buffers apply timer-event-handler read--expression byte-code
command-execute nil nil nil nil nil] 7 [internal-timer-start-idle
read--expression byte-code command-execute nil nil nil nil nil nil nil nil
nil nil nil nil] 3 [org-element-at-point org-clock-sum org-clock-sum-today
eval-expression funcall-interactively command-execute nil nil nil nil nil
nil nil nil nil nil] 55 [org-element--current-element org-element--parse-to
org-element-at-point org-clock-sum org-clock-sum-today eval-expression
funcall-interactively command-execute nil nil nil nil nil nil nil nil] 376
[org-element--parse-to org-element-at-point org-clock-sum
org-clock-sum-today eval-expression funcall-interactively command-execute
nil nil nil nil nil nil nil nil nil] 196 [org-parse-time-string
org-element-timestamp-parser org-element-clock-parser
org-element--current-element org-element--parse-to org-element-at-point
org-clock-sum org-clock-sum-today eval-expression funcall-interactively
command-execute nil nil nil nil nil] 92 [org-element-clock-parser
org-element--current-element org-element--parse-to org-element-at-point
org-clock-sum org-clock-sum-today eval-expression funcall-interactively
command-execute nil nil nil nil nil nil nil] 246
[org-element-timestamp-parser org-element-clock-parser
org-element--current-element org-element--parse-to org-element-at-point
org-clock-sum org-clock-sum-today eval-expression funcall-interactively
command-execute nil nil nil nil nil nil] 108
[org-get-limited-outline-regexp org-element--current-element
org-element--parse-to org-element-at-point org-clock-sum
org-clock-sum-today eval-expression funcall-interactively command-execute
nil nil nil nil nil nil nil] 4 [org-element-section-parser
org-element--current-element org-element--parse-to org-element-at-point
org-clock-sum org-clock-sum-today eval-expression funcall-interactively
command-execute nil nil nil nil nil nil nil] 32 [org-clock-sum-today
eval-expression funcall-interactively command-execute nil nil nil nil nil
nil nil nil nil nil nil nil] 4 [derived-mode-p
org-get-limited-outline-regexp org-element--current-element
org-element--parse-to org-element-at-point org-clock-sum
org-clock-sum-today eval-expression funcall-interactively command-execute
nil nil nil nil nil nil] 4 [org-element--cache-put org-element--parse-to
org-element-at-point org-clock-sum org-clock-sum-today eval-expression
funcall-interactively command-execute nil nil nil nil nil nil nil nil] 7
[org-time-string-to-seconds org-clock-sum org-clock-sum-today
eval-expression funcall-interactively command-execute nil nil nil nil nil
nil nil nil nil nil] 8 [org-time-string-to-time org-time-string-to-seconds
org-clock-sum org-clock-sum-today eval-expression funcall-interactively
command-execute nil nil nil nil nil nil nil nil nil] 4
[org-element-headline-parser org-element--parse-to org-element-at-point
org-clock-sum org-clock-sum-today eval-expression funcall-interactively
command-execute nil nil nil nil nil nil nil nil] 4 ["#<compiled
-0xf5c4e2a00a29a80>" "#<compiled 0x4c7cc2751b00e55>" all-completions
complete-with-action "#<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_54>" all-completions
ivy--reset-state ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil] 10
[complete-with-action "#<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_54>" all-completions
ivy--reset-state ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil nil nil nil] 20
[all-completions complete-with-action "#<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_54>" all-completions
ivy--reset-state ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil nil nil] 8
["#<compiled 0x4c7cc2751b00e55>" all-completions complete-with-action
"#<subr F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_54>"
all-completions ivy--reset-state ivy-read ivy-completing-read
read-extended-command-1 read-extended-command byte-code command-execute nil
nil nil nil] 4 [read-from-minibuffer ivy-read ivy-completing-read
read-extended-command-1 read-extended-command byte-code command-execute nil
nil nil nil nil nil nil nil nil] 58 [ivy-read ivy-completing-read
read-extended-command-1 read-extended-command byte-code command-execute nil
nil nil nil nil nil nil nil nil nil] 14 ["#<compiled 0x1eb9ec24af2045a5>"
cl-delete cl-remove ivy--re-filter ivy--filter ivy--update-minibuffer
ivy--exhibit ivy--queue-exhibit read-from-minibuffer ivy-read
ivy-completing-read read-extended-command-1 read-extended-command byte-code
command-execute nil] 21 [cl--position cl-position ivy--recompute-index
ivy--filter ivy--update-minibuffer ivy--exhibit ivy--queue-exhibit
read-from-minibuffer ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil] 4
[ivy--insert-minibuffer ivy--exhibit ivy--queue-exhibit
read-from-minibuffer ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil nil nil nil] 8
["#<compiled -0xabf49e5c423277c>" cl-remove ivy--re-filter ivy--filter
ivy--update-minibuffer ivy--exhibit ivy--queue-exhibit read-from-minibuffer
ivy-read ivy-completing-read read-extended-command-1 read-extended-command
byte-code command-execute nil nil] 43 [ivy--re-filter ivy--filter
ivy--update-minibuffer ivy--exhibit ivy--queue-exhibit read-from-minibuffer
ivy-read ivy-completing-read read-extended-command-1 read-extended-command
byte-code command-execute nil nil nil nil] 17 [cl-remove ivy--re-filter
ivy--filter ivy--update-minibuffer ivy--exhibit ivy--queue-exhibit
read-from-minibuffer ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil] 22 ["#<subr
F616e6f6e796d6f75732d6c616d626461_anonymous_lambda_9>" apply
timer-event-handler read-from-minibuffer ivy-read ivy-completing-read
read-extended-command-1 read-extended-command byte-code command-execute nil
nil nil nil nil nil] 12 ["#<subr auto-revert-buffers>"
auto-revert-buffers--buffer-list-filter apply auto-revert-buffers apply
timer-event-handler read-from-minibuffer ivy-read ivy-completing-read
read-extended-command-1 read-extended-command byte-code command-execute nil
nil nil] 3 [ad-Advice-delete-backward-char apply delete-backward-char
funcall-interactively call-interactively ivy-backward-delete-char
funcall-interactively command-execute read-from-minibuffer ivy-read
ivy-completing-read read-extended-command-1 read-extended-command byte-code
command-execute nil] 4 [delete-selection-pre-hook read-from-minibuffer
ivy-read ivy-completing-read read-extended-command-1 read-extended-command
byte-code command-execute nil nil nil nil nil nil nil nil] 2
[undo-auto--ensure-boundary undo-auto--boundaries undo-auto--add-boundary
read-from-minibuffer ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil nil nil nil] 2
[ivy--insert-prompt ivy--insert-minibuffer ivy--exhibit ivy--queue-exhibit
read-from-minibuffer ivy-read ivy-completing-read read-extended-command-1
read-extended-command byte-code command-execute nil nil nil nil nil] 3
[funcall-interactively command-execute nil nil nil nil nil nil nil nil nil
nil nil nil nil nil] 3 [funcall-interactively command-execute
execute-extended-command funcall-interactively command-execute nil nil nil
nil nil nil nil nil nil nil nil] 4 [Automatic\ GC] 440)) (25563 56485
293720 164000) nil]

Thanks!
Tijs

Op wo 1 feb. 2023 om 15:59 schreef Ihor Radchenko <yantar92@posteo.net>:

> Tijs Mallaerts <tijs.mallaerts@gmail.com> writes:
>
> > After building emacs from the master branch (with Org mode version 9.6
> > release_9.6-81-g563a43) I noticed the org-clock-sum-today function takes
> > much more time compared to my previous emacs build (with Org mode version
> > 9.5.4 release_9.5.4-19-g4dff42) in a large org buffer.
> >
> > Are there any settings that could speed up the calculation?
>
> May you please
> 1. run M-x profiler-start <RET> cpu <RET>
> 2. Run org-clock-sum-today
> 3. M-x profiler-report
> 4. M-x profiler-report-write-profile
> 5. Share the saved profile
>
> --
> Ihor Radchenko // yantar92,
> Org mode contributor,
> Learn more about Org mode at <https://orgmode.org/>.
> Support Org development at <https://liberapay.com/org-mode>,
> or support my work at <https://liberapay.com/yantar92>
>

[-- Attachment #2: Type: text/html, Size: 11820 bytes --]

next prev parent reply	other threads:[~2023-02-02 15:58 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2023-01-08  6:32 org-clock-sum-today performance Tijs Mallaerts
2023-02-01 15:00 ` Ihor Radchenko
2023-02-02 15:57   ` Tijs Mallaerts [this message]
2023-02-03 12:12     ` Ihor Radchenko
  -- strict thread matches above, loose matches on Subject: below --
2023-01-06 17:54 Tijs Mallaerts

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='CAA8HaRyNLOgzdVqjU2t5tDxg1FWusG=_EAhxuND7nmEtZ7Rqew@mail.gmail.com' \
    --to=tijs.mallaerts@gmail.com \
    --cc=emacs-orgmode@gnu.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).