From: James Harkins <jamshark70@gmail.com>
To: Nicolas Goaziou <n.goaziou@gmail.com>
Cc: Emacs-orgmode@gnu.org
Subject: Re: Fwd: [bug] Beamer export fails in current master
Date: Sat, 18 Jan 2014 09:39:16 +0800 [thread overview]
Message-ID: <c56b1cc1-49a3-4b6d-8120-783d79052e6a@dewdrop-world.net> (raw)
In-Reply-To: <87ppntvsqr.fsf@gmail.com>
On Thursday, January 16, 2014 5:29:32 AM HKT, Nicolas Goaziou wrote:
> I see nothing wrong in that process. Can you still reproduce the error
> with latest Org?
Quite strange. I just moved up to current master -- "Org-mode version
8.2.5f (release_8.2.5f-518-gd74205 @ /home/dlm/share/org-mode.git/lisp/)"
-- HEAD is:
~~
commit d74205b0f9e0707642c7b81e1c33a4a059323bea
Author: Nicolas Goaziou <n.goaziou@gmail.com>
Date: Fri Jan 17 23:05:20 2014 +0100
ox-koma-letter: Improve defcustom docstrings
~~
Now, with a simple org file, just a few frames, C-c C-e l B finishes
successfully. With my full presentation, I get a different error [1].
Moreover, I wanted to see if the :noexport: tags had something to do with
it, so I hit shift-tab twice to show all and then M-S-5 :noexport: RET RET,
then "!" to replace all. It completed the second replacement (third
top-level heading) and threw another error related to org-element--cache
[2].
You can get my files at:
https://github.com/jamshark70/scweek2014
The one I was trying to export is ./shows/01-intro/01-contents.org. To
produce the .tex file, you'll also need ./shows/slidehead.org and
./shows/glossary.org.
It's not especially pressing -- I can keep using org 8.2.4. But, for
whatever reason, org element cache seems to be broken in my environment.
hjh
[1]
Debugger entered--Lisp error: (wrong-number-of-arguments #[(tree data)
"\303\b\304H >\204
[tree cl-struct-avl-tree--tags data avl-tree--do-delete 0 error
"avl-tree--cmpfun accessing a non-avl-tree-" 2 "avl-tree--dummyroot
accessing a non-avl-tree-" 1] 5
("/usr/share/emacs/23.3/lisp/emacs-lisp/avl-tree.elc" . 14229)] 4)
avl-tree-delete([cl-struct-avl-tree- [[[[nil nil ... 0] [nil nil ... 0]
... 0] [nil [nil nil ... 0] ... 1] ... 0] nil nil 0]
org-element--cache-compare] (keyword (:key "EMAIL" :value "" :begin 130
:end 141 :post-blank 1 :post-affiliated 130 :parent nil)) nil t)
(cond ((not data) (throw ... t)) ((> ... end) nil) (t (setq end ...)
(avl-tree-delete org-element--cache data nil t)))
(let ((node ...) data) (while node (let* ... ...)) (cond (... ...) (...
nil) (t ... ...)))
(while (let (... data) (while node ...) (cond ... ... ...)))
(let ((beg ...)) (while (let ... ... ...)))
(let ((inhibit-quit t) (offset ...) (end ...)) (let (...) (while ...))
(unless (zerop offset) (catch ... ...)))
(catch (quote escape) (let (... ... ...) (let ... ...) (unless ... ...)))
(progn (catch (quote escape) (let ... ... ...))
(org-element--cache-cancel-changes))
(if (org-element--cache-pending-changes-p) (progn (catch ... ...)
(org-element--cache-cancel-changes)))
(when (org-element--cache-pending-changes-p) (catch (quote escape) (let
... ... ...)) (org-element--cache-cancel-changes))
(save-current-buffer (set-buffer buffer) (when
(org-element--cache-pending-changes-p) (catch ... ...)
(org-element--cache-cancel-changes)))
(with-current-buffer buffer (when (org-element--cache-pending-changes-p)
(catch ... ...) (org-element--cache-cancel-changes)))
(progn (with-current-buffer buffer (when ... ... ...)))
(if (buffer-live-p buffer) (progn (with-current-buffer buffer ...)))
(when (buffer-live-p buffer) (with-current-buffer buffer (when ... ...
...)))
org-element--cache-sync(#<buffer 01-contents.org<2>>)
(progn (org-element--cache-sync (current-buffer)))
(if (and (not ignore-changes) (org-element--cache-pending-changes-p))
(progn (org-element--cache-sync ...)))
(when (and (not ignore-changes) (org-element--cache-pending-changes-p))
(org-element--cache-sync (current-buffer)))
(progn (when (and ... ...) (org-element--cache-sync ...)) (if (not ...)
(gethash key org-element--cache-objects) (let ... ...)))
(if (and org-element-use-cache org-element--cache) (progn (when ... ...)
(if ... ... ...)))
(when (and org-element-use-cache org-element--cache) (when (and ... ...)
(org-element--cache-sync ...)) (if (not ...) (gethash key
org-element--cache-objects) (let ... ...)))
org-element-cache-get(3203)
(let* ((cached ...) (begin ...)) (cond (... ... ... ...) (... ...) (...
... ... ...) (t ...)))
(let ((origin ...) element next) (end-of-line) (skip-chars-backward "
\n") (cond (... ...) (... ... ...)) (goto-char origin) (let* (... ...)
(cond ... ... ... ...)) (let (... parent special-flag) (while t ... ...
...)))
(save-restriction (widen) (let (... element next) (end-of-line)
(skip-chars-backward "
\n") (cond ... ...) (goto-char origin) (let* ... ...) (let ... ...)))
(save-excursion (save-restriction (widen) (let ... ... ... ... ... ...
...)))
(org-with-wide-buffer (let (... element next) (end-of-line)
(skip-chars-backward "
\n") (cond ... ...) (goto-char origin) (let* ... ...) (let ... ...)))
(catch (quote exit) (org-with-wide-buffer (let ... ... ... ... ... ...
...)))
org-element-at-point()
(progn (org-element-at-point))
(unwind-protect (progn (org-element-at-point)) (set-match-data
save-match-data-internal (quote evaporate)))
(let ((save-match-data-internal ...)) (unwind-protect (progn ...)
(set-match-data save-match-data-internal ...)))
(save-match-data (org-element-at-point))
(let ((element ...)) (when (eq ... ...) (beginning-of-line) (let* ... ...
...)))
(while (re-search-forward "^[ ]*#\\+INCLUDE:" nil t) (let (...) (when
... ... ...)))
(let ((case-fold-search t)) (goto-char (point-min)) (while
(re-search-forward "^[ ]*#\\+INCLUDE:" nil t) (let ... ...)))
org-export-expand-include-keyword()
(progn (run-hook-with-args (quote org-export-before-processing-hook)
(org-export-backend-name backend)) (org-export-expand-include-keyword)
(org-macro-initialize-templates) (org-macro-replace-all
org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args ... ...)) (setq info (org-export-install-filters ...))
(org-macro-replace-all (list ... ... ... ...)) (setq tree
(org-element-parse-buffer nil visible-only))
(org-export-remove-uninterpreted-data tree info) (let (...) (dolist ...
...)) (setq tree (org-export-filter-apply-functions ... tree info)) (setq
info (org-combine-plists info ...)) (let* (... ... ... ...)
(org-no-properties ...)))
(save-current-buffer (set-buffer --buf-copy) (goto-char (point-min))
(progn (run-hook-with-args ... ...) (org-export-expand-include-keyword)
(org-macro-initialize-templates) (org-macro-replace-all
org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char ...) (save-excursion ...) (setq
info ...) (org-macro-replace-all ...) (setq tree ...)
(org-export-remove-uninterpreted-data tree info) (let ... ...) (setq tree
...) (setq info ...) (let* ... ...)))
(with-current-buffer --buf-copy (goto-char (point-min)) (progn
(run-hook-with-args ... ...) (org-export-expand-include-keyword)
(org-macro-initialize-templates) (org-macro-replace-all
org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char ...) (save-excursion ...) (setq
info ...) (org-macro-replace-all ...) (setq tree ...)
(org-export-remove-uninterpreted-data tree info) (let ... ...) (setq tree
...) (setq info ...) (let* ... ...)))
(unwind-protect (with-current-buffer --buf-copy (goto-char ...) (progn
... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...)) (and
(buffer-live-p --buf-copy) (progn ... ...)))
(let ((--buf-copy ...)) (unwind-protect (with-current-buffer --buf-copy
... ...) (and ... ...)))
(org-export-with-buffer-copy (run-hook-with-args (quote
org-export-before-processing-hook) (org-export-backend-name backend))
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char (point-min)) (save-excursion
(run-hook-with-args ... ...)) (setq info (org-export-install-filters ...))
(org-macro-replace-all (list ... ... ... ...)) (setq tree
(org-element-parse-buffer nil visible-only))
(org-export-remove-uninterpreted-data tree info) (let (...) (dolist ...
...)) (setq tree (org-export-filter-apply-functions ... tree info)) (setq
info (org-combine-plists info ...)) (let* (... ... ... ...)
(org-no-properties ...)))
(let* ((org-export-current-backend ...) (info ...) tree)
(org-export-with-buffer-copy (run-hook-with-args ... ...)
(org-export-expand-include-keyword) (org-macro-initialize-templates)
(org-macro-replace-all org-macro-templates) (org-export-execute-babel-code)
(org-update-radio-target-regexp) (goto-char ...) (save-excursion ...) (setq
info ...) (org-macro-replace-all ...) (setq tree ...)
(org-export-remove-uninterpreted-data tree info) (let ... ...) (setq tree
...) (setq info ...) (let* ... ...)))
(save-restriction (cond (... ...) (subtreep ... ... ... ...)) (let* (...
... tree) (org-export-with-buffer-copy ... ... ... ... ... ... ... ... ...
... ... ... ... ... ... ...)))
(save-excursion (save-restriction (cond ... ...) (let* ... ...)))
org-export-as(beamer nil nil nil nil)
(let ((output ...) (buffer ...) (encoding buffer-file-coding-system))
(when (and ... ...) (org-kill-new output)) (with-current-buffer buffer
(erase-buffer) (setq buffer-file-coding-system encoding) (insert output)
(goto-char ...) (and ... ...)) (when
org-export-show-temporary-export-buffer (switch-to-buffer-other-window
buffer)) buffer)
(if async (org-export-async-start (\` ...) (\` ...)) (let (... ... ...)
(when ... ...) (with-current-buffer buffer ... ... ... ... ...) (when
org-export-show-temporary-export-buffer ...) buffer))
org-export-to-buffer(beamer "*Org BEAMER Export*" nil nil nil nil nil
(lambda nil (LaTeX-mode)))
org-beamer-export-as-latex(nil nil nil nil)
funcall(org-beamer-export-as-latex nil nil nil nil)
(save-excursion (when arg (if ... ... ...)) (funcall action (and ... t)
(and ... t) (and ... t) (and ... t)))
(cond ((eql action ...) (org-export-insert-default-template nil optns))
((eql action ...) (org-export-stack)) ((eql action ...)
(org-publish-current-file ... ...)) ((eql action ...)
(org-publish-current-project ... ...)) ((eql action ...) (org-publish ...
... ...)) ((eql action ...) (org-publish-all ... ...)) (t (save-excursion
... ...)))
(case action (template (org-export-insert-default-template nil optns))
(stack (org-export-stack)) (publish-current-file (org-publish-current-file
... ...)) (publish-current-project (org-publish-current-project ... ...))
(publish-choose-project (org-publish ... ... ...)) (publish-all
(org-publish-all ... ...)) (otherwise (save-excursion ... ...)))
(let* ((input ...) (action ...) (optns ...)) (unless (memq ... optns)
(move-marker org-export-dispatch-last-position nil)) (case action (template
...) (stack ...) (publish-current-file ...) (publish-current-project ...)
(publish-choose-project ...) (publish-all ...) (otherwise ...)))
org-export-dispatch(nil)
call-interactively(org-export-dispatch nil nil)
[2]
Debugger entered--Lisp error: (void-function avl-tree-mapc)
(avl-tree-mapc (function (lambda ... ...)) org-element--cache (quote
reverse))
(catch (quote exit) (avl-tree-mapc (function ...) org-element--cache
(quote reverse)))
(if (zerop offset) nil (catch (quote exit) (avl-tree-mapc ...
org-element--cache ...)))
(unless (zerop offset) (catch (quote exit) (avl-tree-mapc ...
org-element--cache ...)))
(let ((inhibit-quit t) (offset ...) (end ...)) (let (...) (while ...))
(unless (zerop offset) (catch ... ...)))
(catch (quote escape) (let (... ... ...) (let ... ...) (unless ... ...)))
(progn (catch (quote escape) (let ... ... ...))
(org-element--cache-cancel-changes))
(if (org-element--cache-pending-changes-p) (progn (catch ... ...)
(org-element--cache-cancel-changes)))
(when (org-element--cache-pending-changes-p) (catch (quote escape) (let
... ... ...)) (org-element--cache-cancel-changes))
(save-current-buffer (set-buffer buffer) (when
(org-element--cache-pending-changes-p) (catch ... ...)
(org-element--cache-cancel-changes)))
(with-current-buffer buffer (when (org-element--cache-pending-changes-p)
(catch ... ...) (org-element--cache-cancel-changes)))
(progn (with-current-buffer buffer (when ... ... ...)))
(if (buffer-live-p buffer) (progn (with-current-buffer buffer ...)))
(when (buffer-live-p buffer) (with-current-buffer buffer (when ... ...
...)))
org-element--cache-sync(#<buffer 01-contents.org>)
(progn (org-element--cache-sync (current-buffer))
(org-element--cache-push-change top (- bottom offset) offset))
(if (> gap org-element-cache-merge-changes-threshold) (progn
(org-element--cache-sync ...) (org-element--cache-push-change top ...
offset)) (timer-activate-when-idle (aref org-element--cache-status 4) t)
(aset org-element--cache-status 0 t) (aset org-element--cache-status 1 (min
top current-start)) (aset org-element--cache-status 2 (- ... offset)) (incf
(aref org-element--cache-status 3) offset))
(let* ((current-start ...) (current-end ...) (gap ...)) (if (> gap
org-element-cache-merge-changes-threshold) (progn ... ...)
(timer-activate-when-idle ... t) (aset org-element--cache-status 0 t) (aset
org-element--cache-status 1 ...) (aset org-element--cache-status 2 ...)
(incf ... offset)))
(if (not (org-element--cache-pending-changes-p))
(org-element--cache-push-change top (- bottom offset) offset) (let* (...
... ...) (if ... ... ... ... ... ... ...)))
(let ((offset ...)) (if (not ...) (org-element--cache-push-change top ...
offset) (let* ... ...)))
(let ((top ...) (bottom ...)) (org-with-limited-levels (save-match-data
...)) (let (...) (if ... ... ...)))
(save-restriction (widen) (goto-char beg) (beginning-of-line) (let (...
...) (org-with-limited-levels ...) (let ... ...)))
(save-excursion (save-restriction (widen) (goto-char beg)
(beginning-of-line) (let ... ... ...)))
(org-with-wide-buffer (goto-char beg) (beginning-of-line) (let (... ...)
(org-with-limited-levels ...) (let ... ...)))
(progn (org-with-wide-buffer (goto-char beg) (beginning-of-line) (let ...
... ...)))
(if (and org-element-use-cache org-element--cache) (progn
(org-with-wide-buffer ... ... ...)))
(when (and org-element-use-cache org-element--cache)
(org-with-wide-buffer (goto-char beg) (beginning-of-line) (let ... ...
...)))
(let ((inhibit-quit t)) (when (and org-element-use-cache
org-element--cache) (org-with-wide-buffer ... ... ...)))
org-element--cache-record-change(3381 3381 10)
replace-match("" nil t)
replace-match-maybe-edit("" nil t nil (3381 3391 #<buffer
01-contents.org>))
perform-replace(":noexport:" "" t nil nil nil nil nil nil)
query-replace(":noexport:" "" nil nil nil)
call-interactively(query-replace nil nil)
next prev parent reply other threads:[~2014-01-18 1:39 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-01-11 3:40 [bug] Beamer export fails in current master James Harkins
2014-01-11 8:25 ` Nicolas Goaziou
[not found] ` <CAFniQ7XfifzACfVQLTTtesmUaCOpM3Q-esyYMorc7KFUQcmRhg@mail.gmail.com>
2014-01-11 9:44 ` Fwd: " James Harkins
2014-01-15 21:29 ` Nicolas Goaziou
2014-01-18 1:39 ` James Harkins [this message]
2014-01-18 16:33 ` Nicolas Goaziou
2014-01-19 5:25 ` James Harkins
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=c56b1cc1-49a3-4b6d-8120-783d79052e6a@dewdrop-world.net \
--to=jamshark70@gmail.com \
--cc=Emacs-orgmode@gnu.org \
--cc=n.goaziou@gmail.com \
/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).