[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] Performance of table computing
From: |
Sebastien Vauban |
Subject: |
[O] Performance of table computing |
Date: |
Tue, 31 Mar 2015 12:28:53 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.4.91 (windows-nt) |
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
- [O] Performance of table computing,
Sebastien Vauban <=