Re: [O] Offline until sunday eve -- please heavily test current HEAD

[Bastien]

Hi Achim,

Achim Gratz <address@hidden> writes:

> I get these test fails with Emacs 24.1, 24.2-rc (but not on 24.1.50 or
> 24.2.50, although the latter activates only 214 instead of 371 tests,
> which seems to require a separate investigation since the setup is the
> same otherwise):

Thanks for testing.

> Test ob-exp/exports-both condition:
>     (void-function my-map)
>    FAILED   17/371  ob-exp/exports-both
>
> Test test-org-babel/multi-line-header-arguments condition:
>     (void-function my-map)
>    FAILED  156/371  test-org-babel/multi-line-header-arguments
>
> Test test-org-babel/multi-line-header-arguments backtrace:
>   (my-map (quote list) (function list) numbers letters)
>   (let ((numbers (quote (1 2 3 4 5 6 7))) (letters (quote (a b c d e f
>   (progn (let ((numbers (quote (1 2 3 4 5 6 7))) (letters (quote (a b 
>   eval((progn (let ((numbers (quote (1 2 3 4 5 6 7))) (letters (quote 
>   ((lambda (result) (if (or (member "scalar" (cdr (assoc :result-param
>   (progn ((lambda (result) (if (or (member "scalar" (cdr (assoc :resul
>   (unwind-protect (progn ((lambda (result) (if (or (member "scalar" (c
>   (let ((wconfig (current-window-configuration))) (unwind-protect (pro
>   (save-window-excursion ((lambda (result) (if (or (member "scalar" (c
>   org-babel-execute:emacs-lisp("(require 'cl)\n(defalias 'my-map (if (
>   funcall(org-babel-execute:emacs-lisp "(require 'cl)\n(defalias 'my-m
>   ((lambda (result) (if (and (eq (cdr (assoc :result-type params)) (qu
>   (setq result ((lambda (result) (if (and (eq (cdr (assoc :result-type
>   (if (and (not arg) new-hash (equal new-hash old-hash)) (save-excursi
>   (let ((call-process-region (lambda (&rest args) (apply (quote org-ba
>   (unwind-protect (let ((call-process-region (lambda (&rest args) (app
>   (let* ((lang (nth 0 info)) (params (if params (org-babel-process-par
>   (progn (let* ((lang (nth 0 info)) (params (if params (org-babel-proc
>   (if (org-babel-confirm-evaluate (let ((i info)) (setf (nth 2 i) (org
>   (when (org-babel-confirm-evaluate (let ((i info)) (setf (nth 2 i) (o
>   (let ((info (or info (org-babel-get-src-block-info)))) (when (org-ba
>   org-babel-execute-src-block()
>   (let ((results (org-babel-execute-src-block))) (should (equal (quote
>   (progn (org-babel-next-src-block) (let ((results (org-babel-execute-
>   (setq G16529 (progn (org-babel-next-src-block) (let ((results (org-b
>   (let ((kill-buffer-query-functions nil) G16529) (with-temp-file "/tm
>   (org-test-with-temp-text-in-file "\n\n#+headers: :var letters='(a b 
>
> With Emacs 23.3, I get this test error:
>
> Test test-ob-sh/session condition:
>     (error "Marker does not point anywhere")
>    FAILED  112/211  test-ob-sh/session
>
> Test test-ob-sh/session backtrace:
>   (cl-block-wrapper (catch (quote --cl-block-nil--) (let* ((i 6) (fram
>   (block nil (let* ((i 6) (frame nil) (--cl-var-- nil)) (while (progn 
>   (loop for i from 6 for frame = (backtrace-frame i) while frame colle
>   ert--record-backtrace()
>   (let* ((condition (first more-debugger-args)) (type (case (car condi
>   (cond ((member* first-debugger-arg (quote (lambda debug t exit nil))
>   (case first-debugger-arg ((lambda debug t exit nil) (apply (ert--tes
>   (ecase first-debugger-arg ((lambda debug t exit nil) (apply (ert--te
>   (let* ((more-debugger-args debugger-args) (first-debugger-arg (if mo
>   (progn (let* ((more-debugger-args debugger-args) (first-debugger-arg
>   (destructuring-bind (first-debugger-arg &rest more-debugger-args) de
>   ert--run-test-debugger([cl-struct-ert--test-execution-info [cl-struc
>   (lambda (G99254 &rest debugger-args) (ert--run-test-debugger (symbol
>   apply((lambda (G99254 &rest debugger-args) (ert--run-test-debugger (
>   (lambda (&rest --cl-rest--) (apply (lambda (G99254 &rest debugger-ar
>   ansi-color-apply-on-region(#<marker in no buffer> #<marker at 16 in 
>   ansi-color-process-output("")
>   run-hook-with-args(ansi-color-process-output "")
>   comint-send-input(nil t)
>
> These look like further fallout from the cl-flet excision...  

Not really -- this is related to the recent version bump in Emacs trunk.

The should be fixed now.  See this commit:
http://orgmode.org/w/?p=org-mode.git;a=commit;h=00e5c2

Can you try again and report remaining problems, if any?

Thanks!

-- 
 Bastien