emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* Performance of table computing
@ 2015-03-31 10:28 Sebastien Vauban
  2015-03-31 11:57 ` Jacob Nielsen
  2015-03-31 12:02 ` Jacob Nielsen
  0 siblings, 2 replies; 4+ messages in thread
From: Sebastien Vauban @ 2015-03-31 10:28 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

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

^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2015-03-31 12:58 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2015-03-31 10:28 Performance of table computing Sebastien Vauban
2015-03-31 11:57 ` Jacob Nielsen
2015-03-31 12:02 ` Jacob Nielsen
2015-03-31 12:58   ` Sebastien Vauban

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).