emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Sebastien Vauban <sva-news-D0wtAvR13HarG/iDocfnWg@public.gmane.org>
To: emacs-orgmode-mXXj517/zsQ@public.gmane.org
Subject: Performance of table computing
Date: Tue, 31 Mar 2015 12:28:53 +0200	[thread overview]
Message-ID: <86pp7p1mvu.fsf@example.com> (raw)

Hello,

In one of my Org files, I have 20 small tables. Among them, 11 have
a line of formula's (TBLFM), mainly for computing a total (sum), so
that's in essence relatively standard and simple.

The file in itself is quite big (11,000 lines), but I did not expect to
see that re-applying formulas to all of them would take 30 seconds... at
every save... since I did add the following to my `.emacs' file:

--8<---------------cut here---------------start------------->8---
  (defmacro measure-time (message &rest body)
    "Measure the time it takes to evaluate BODY."
    `(let ((time (current-time)))
       ,@body
       (message "__%s (in %.02f s)___________________________"
                ,message (float-time (time-since time)))))

  (defun my/org-update-buffer ()
    "Update all dynamic blocks and all tables in the buffer."
    (interactive)
    (when (derived-mode-p 'org-mode)
      (message "(Info) Update Org buffer %s"
               (file-name-nondirectory (buffer-file-name)))
      (sit-for 1.5)
      (let ((flyspell-mode-before-save flyspell-mode))
        (flyspell-mode -1)              ; Temporarily disable Flyspell to
                                        ; avoid checking the following
                                        ; modifications of the buffer.
        (measure-time "Updated all dynamic blocks"
                      (org-update-all-dblocks))
        (measure-time "Re-applied formulas to all tables"
                      (org-table-iterate-buffer-tables))
        (when flyspell-mode-before-save (flyspell-mode 1)))))

  ;; Make sure that all dynamic blocks and all tables are always up-to-date.
  (add-hook 'before-save-hook 'my/org-update-buffer)
--8<---------------cut here---------------end--------------->8---

Is my observation shared?

Best regards,
  Seb

-- 
Sebastien Vauban

             reply	other threads:[~2015-03-31 10:28 UTC|newest]

Thread overview: 4+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2015-03-31 10:28 Sebastien Vauban [this message]
2015-03-31 11:57 ` Performance of table computing Jacob Nielsen
2015-03-31 12:02 ` Jacob Nielsen
2015-03-31 12:58   ` Sebastien Vauban

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=86pp7p1mvu.fsf@example.com \
    --to=sva-news-d0wtavr13harg/idocfnwg@public.gmane.org \
    --cc=emacs-orgmode-mXXj517/zsQ@public.gmane.org \
    /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).