* [babel] Lisp error: (void-variable params)
@ 2013-12-10 9:47 Sebastien Vauban
2013-12-10 18:02 ` Eric Schulte
0 siblings, 1 reply; 7+ messages in thread
From: Sebastien Vauban @ 2013-12-10 9:47 UTC (permalink / raw)
To: emacs-orgmode-mXXj517/zsQ
Hello,
After this morning's update [1], I get the following backtrace when executing R code.
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (void-variable params)
(org-babel-merge-params (nth 2 info) params)
(sort (org-babel-merge-params (nth 2 info) params) (function (lambda (el1 el2) (string< (symbol-name (car el1)) (symbol-name (car el2))))))
(setcar c (sort (org-babel-merge-params (nth 2 info) params) (function (lambda (el1 el2) (string< (symbol-name (car el1)) (symbol-name (car el2)))))))
(let* ((c (nthcdr 2 info))) (setcar c (sort (org-babel-merge-params (nth 2 info) params) (function (lambda (el1 el2) (string< (symbol-name (car el1)) (symbol-name (car el2))))))))
(let* ((rm (function (lambda (lst) (progn (let (... p) (while --dolist-tail-- ... ... ...))) lst))) (norm (function (lambda (arg) (let ((v ...)) (if (and v ...) (progn ...)))))) (lang (nth 0 info)) (params (let* ((c (nthcdr 2 info))) (setcar c (sort (org-babel-merge-params (nth 2 info) params) (function (lambda ... ...)))))) (body (let* ((c (nthcdr 1 info))) (setcar c (if (org-babel-noweb-p params :eval) (org-babel-expand-noweb-references info) (nth 1 info))))) (expand-cmd (intern (concat "org-babel-expand-body:" lang))) (assignments-cmd (intern (concat "org-babel-variable-assignments:" lang))) (expanded (if (fboundp expand-cmd) (funcall expand-cmd body params) (org-babel-expand-body:generic body params (and (fboundp assignments-cmd) (funcall assignments-cmd params)))))) (let* ((it (format "%s-%s" (mapconcat (function identity) (delq nil (mapcar ... ...)) ":") expanded)) (hash (sha1 it))) (if (with-no-warnings (called-interactively-p (quote interactive))) (progn (message hash))) hash))
(let ((print-level nil) (info (or info (org-babel-get-src-block-info)))) (let* ((c (nthcdr 2 info))) (setcar c (sort (copy-sequence (nth 2 info)) (function (lambda (a b) (string< (car a) (car b))))))) (let* ((rm (function (lambda (lst) (progn (let ... ...)) lst))) (norm (function (lambda (arg) (let (...) (if ... ...))))) (lang (nth 0 info)) (params (let* ((c (nthcdr 2 info))) (setcar c (sort (org-babel-merge-params ... params) (function ...))))) (body (let* ((c (nthcdr 1 info))) (setcar c (if (org-babel-noweb-p params :eval) (org-babel-expand-noweb-references info) (nth 1 info))))) (expand-cmd (intern (concat "org-babel-expand-body:" lang))) (assignments-cmd (intern (concat "org-babel-variable-assignments:" lang))) (expanded (if (fboundp expand-cmd) (funcall expand-cmd body params) (org-babel-expand-body:generic body params (and (fboundp assignments-cmd) (funcall assignments-cmd params)))))) (let* ((it (format "%s-%s" (mapconcat (function identity) (delq nil ...) ":") expanded)) (hash (sha1 it))) (if (with-no-warnings (called-interactively-p (quote interactive))) (progn (message hash))) hash)))
org-babel-sha1-hash(("R" "<... my R code ...>" ((:cache . "no") (:colname-names) (:comments . "") (:eval . "never") (:exports . "results") (:hlines . "no") (:noweb . "yes") (:padline . "") (:result-params "replace") (:result-type . value) (:results . "replace") (:rowname-names) (:session . "none") (:shebang . "") (:tangle . "no")) "" "boxplot-plan" 0 1823))
(setq hash (org-babel-sha1-hash info))
(progn (let* ((lang-headers (intern (concat "org-babel-default-header-args:" lang))) (heading (nth 4 (condition-case nil (progn (org-heading-components)) (error nil)))) (export-buffer (current-buffer)) (original-buffer (org-babel-exp-get-export-buffer)) results) (if original-buffer (progn (set-buffer original-buffer) (save-restriction (if heading (progn (condition-case nil ... ...))) (setq results (let* (...) (setcar c ...)))) (set-buffer export-buffer) results))) (setq hash (org-babel-sha1-hash info)))
(if (member (cdr (assoc :exports (nth 2 info))) (quote ("both" "results"))) (progn (let* ((lang-headers (intern (concat "org-babel-default-header-args:" lang))) (heading (nth 4 (condition-case nil (progn ...) (error nil)))) (export-buffer (current-buffer)) (original-buffer (org-babel-exp-get-export-buffer)) results) (if original-buffer (progn (set-buffer original-buffer) (save-restriction (if heading (progn ...)) (setq results (let* ... ...))) (set-buffer export-buffer) results))) (setq hash (org-babel-sha1-hash info))))
(progn (if (member (cdr (assoc :exports (nth 2 info))) (quote ("both" "results"))) (progn (let* ((lang-headers (intern (concat "org-babel-default-header-args:" lang))) (heading (nth 4 (condition-case nil ... ...))) (export-buffer (current-buffer)) (original-buffer (org-babel-exp-get-export-buffer)) results) (if original-buffer (progn (set-buffer original-buffer) (save-restriction (if heading ...) (setq results ...)) (set-buffer export-buffer) results))) (setq hash (org-babel-sha1-hash info)))) (org-babel-exp-do-export info (quote block) hash))
(if info (progn (if (member (cdr (assoc :exports (nth 2 info))) (quote ("both" "results"))) (progn (let* ((lang-headers (intern ...)) (heading (nth 4 ...)) (export-buffer (current-buffer)) (original-buffer (org-babel-exp-get-export-buffer)) results) (if original-buffer (progn (set-buffer original-buffer) (save-restriction ... ...) (set-buffer export-buffer) results))) (setq hash (org-babel-sha1-hash info)))) (org-babel-exp-do-export info (quote block) hash)))
(let* ((info (org-babel-get-src-block-info (quote light))) (line (org-current-line)) (lang (nth 0 info)) (raw-params (nth 2 info)) hash) (if noninteractive nil (message "org-babel-exp process %s at line %d..." lang line)) (if info (progn (if (member (cdr (assoc :exports (nth 2 info))) (quote ("both" "results"))) (progn (let* ((lang-headers ...) (heading ...) (export-buffer ...) (original-buffer ...) results) (if original-buffer (progn ... ... ... results))) (setq hash (org-babel-sha1-hash info)))) (org-babel-exp-do-export info (quote block) hash))))
(save-excursion (let* ((info (org-babel-get-src-block-info (quote light))) (line (org-current-line)) (lang (nth 0 info)) (raw-params (nth 2 info)) hash) (if noninteractive nil (message "org-babel-exp process %s at line %d..." lang line)) (if info (progn (if (member (cdr (assoc :exports ...)) (quote ("both" "results"))) (progn (let* (... ... ... ... results) (if original-buffer ...)) (setq hash (org-babel-sha1-hash info)))) (org-babel-exp-do-export info (quote block) hash)))))
org-babel-exp-src-block(("R"))
--8<---------------cut here---------------end--------------->8---
Best regards,
Seb
[1] Org-mode version 8.2.3c (release_8.2.3c-344-ge6a6fe).
--
Sebastien Vauban
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: [babel] Lisp error: (void-variable params)
2013-12-10 9:47 [babel] Lisp error: (void-variable params) Sebastien Vauban
@ 2013-12-10 18:02 ` Eric Schulte
2013-12-10 19:17 ` Achim Gratz
0 siblings, 1 reply; 7+ messages in thread
From: Eric Schulte @ 2013-12-10 18:02 UTC (permalink / raw)
To: Sebastien Vauban; +Cc: emacs-orgmode
"Sebastien Vauban" <sva-news@mygooglest.com> writes:
> Hello,
>
> After this morning's update [1], I get the following backtrace when executing R code.
>
I just pushed up a change which fixes this when exporting on my system,
if the problem persists please provide an ECM.
Thanks for the report!
--
Eric Schulte
https://cs.unm.edu/~eschulte
PGP: 0x614CA05D
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: [babel] Lisp error: (void-variable params)
2013-12-10 18:02 ` Eric Schulte
@ 2013-12-10 19:17 ` Achim Gratz
2013-12-10 20:55 ` Eric Schulte
2013-12-12 3:06 ` Eric Schulte
0 siblings, 2 replies; 7+ messages in thread
From: Achim Gratz @ 2013-12-10 19:17 UTC (permalink / raw)
To: emacs-orgmode
Eric Schulte writes:
> I just pushed up a change which fixes this when exporting on my system,
> if the problem persists please provide an ECM.
This test is still failing:
Test test-ob/noweb-expansions-in-cache condition:
(void-variable <<foo>>)
FAILED 149/491 test-ob/noweb-expansions-in-cache
Apparently <<foo>> didn't get expanded before eLisp tries to interpret
the code.
Regards,
Achim.
--
+<[Q+ Matrix-12 WAVE#46+305 Neuron microQkb Andromeda XTk Blofeld]>+
SD adaptation for Waldorf microQ V2.22R2:
http://Synth.Stromeko.net/Downloads.html#WaldorfSDada
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: [babel] Lisp error: (void-variable params)
2013-12-10 19:17 ` Achim Gratz
@ 2013-12-10 20:55 ` Eric Schulte
2013-12-12 3:06 ` Eric Schulte
1 sibling, 0 replies; 7+ messages in thread
From: Eric Schulte @ 2013-12-10 20:55 UTC (permalink / raw)
To: Achim Gratz; +Cc: emacs-orgmode
Achim Gratz <Stromeko@nexgo.de> writes:
> Eric Schulte writes:
>> I just pushed up a change which fixes this when exporting on my system,
>> if the problem persists please provide an ECM.
>
> This test is still failing:
>
> Test test-ob/noweb-expansions-in-cache condition:
> (void-variable <<foo>>)
> FAILED 149/491 test-ob/noweb-expansions-in-cache
>
> Apparently <<foo>> didn't get expanded before eLisp tries to interpret
> the code.
>
That test passes for me when run interactively, but fails when run at
the command line. I'll have to investigate later...
>
>
> Regards,
> Achim.
--
Eric Schulte
https://cs.unm.edu/~eschulte
PGP: 0x614CA05D
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: [babel] Lisp error: (void-variable params)
2013-12-10 19:17 ` Achim Gratz
2013-12-10 20:55 ` Eric Schulte
@ 2013-12-12 3:06 ` Eric Schulte
2013-12-12 9:19 ` Achim Gratz
1 sibling, 1 reply; 7+ messages in thread
From: Eric Schulte @ 2013-12-12 3:06 UTC (permalink / raw)
To: Achim Gratz; +Cc: emacs-orgmode
Achim Gratz <Stromeko@nexgo.de> writes:
> Eric Schulte writes:
>> I just pushed up a change which fixes this when exporting on my system,
>> if the problem persists please provide an ECM.
>
> This test is still failing:
>
> Test test-ob/noweb-expansions-in-cache condition:
> (void-variable <<foo>>)
> FAILED 149/491 test-ob/noweb-expansions-in-cache
>
> Apparently <<foo>> didn't get expanded before eLisp tries to interpret
> the code.
>
This should be fixed now.
>
>
> Regards,
> Achim.
--
Eric Schulte
https://cs.unm.edu/~eschulte
PGP: 0x614CA05D
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: [babel] Lisp error: (void-variable params)
2013-12-12 3:06 ` Eric Schulte
@ 2013-12-12 9:19 ` Achim Gratz
2013-12-12 9:37 ` Sebastien Vauban
0 siblings, 1 reply; 7+ messages in thread
From: Achim Gratz @ 2013-12-12 9:19 UTC (permalink / raw)
To: emacs-orgmode
Eric Schulte writes:
> This should be fixed now.
Indeed it is. Thank you.
Regards,
Achim.
--
+<[Q+ Matrix-12 WAVE#46+305 Neuron microQkb Andromeda XTk Blofeld]>+
Wavetables for the Terratec KOMPLEXER:
http://Synth.Stromeko.net/Downloads.html#KomplexerWaves
^ permalink raw reply [flat|nested] 7+ messages in thread
* Re: [babel] Lisp error: (void-variable params)
2013-12-12 9:19 ` Achim Gratz
@ 2013-12-12 9:37 ` Sebastien Vauban
0 siblings, 0 replies; 7+ messages in thread
From: Sebastien Vauban @ 2013-12-12 9:37 UTC (permalink / raw)
To: emacs-orgmode-mXXj517/zsQ
Achim Gratz wrote:
> Eric Schulte writes:
>> This should be fixed now.
>
> Indeed it is. Thank you.
Also confirmed on my side.
Thank you for fixing the "hash computation" problem so quickly!
Best regards,
Seb
--
Sebastien Vauban
^ permalink raw reply [flat|nested] 7+ messages in thread
end of thread, other threads:[~2013-12-12 9:37 UTC | newest]
Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2013-12-10 9:47 [babel] Lisp error: (void-variable params) Sebastien Vauban
2013-12-10 18:02 ` Eric Schulte
2013-12-10 19:17 ` Achim Gratz
2013-12-10 20:55 ` Eric Schulte
2013-12-12 3:06 ` Eric Schulte
2013-12-12 9:19 ` Achim Gratz
2013-12-12 9:37 ` 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).