Re: 2 Org tests failing

[Sebastien Vauban <sva-news-D0wtAvR13HarG/iDocfnWg@public.gmane.org>]

Bastien wrote:
> Sebastien Vauban <sva-news-D0wtAvR13HarG/iDocfnWg-XMD5yJDbdMReXY1tMh2IBg@public.gmane.org>
> writes:
>
>> Running org_test, please wait (this can take a while)...
>>    FAILED  test-org-table/org-table-calc-current-TBLFM
>>    FAILED  test-org-table/org-table-calc-current-TBLFM-when-stop-because-of-error
>
> I can't reproduce this.  Can you run the tests manually and report
> the backtrace?

--8<---------------cut here---------------start------------->8---
Test test-org-table/org-table-calc-current-TBLFM condition:
    (file-error "Opening output file" "No such file or directory" "/tmp/org_test/org-test8984aQq")
   FAILED  354/427  test-org-table/org-table-calc-current-TBLFM
Test test-org-table/org-table-calc-current-TBLFM-when-stop-because-of-error backtrace:
  write-region("" nil "/tmp/org_test/org-test8984naw" nil silent nil e
  byte-code("\305\30G!\203\307  !\202\310       \"!
                                                   \203\n
                                                         P\f\203
  make-temp-file("org-test")
  (let ((file (make-temp-file "org-test")) (kill-buffer-query-function
  (lambda nil (let ((file (make-temp-file "org-test")) (kill-buffer-qu
  byte-code("\306\307!q\210\310\216\311 \312\216\313\314\315\316\3
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  byte-code("\306\307!\211\211r\310\311!q\210\312 d\313\223)L\210)\3
  ert-run-test([cl-struct-ert-test test-org-table/org-table-calc-curre
  ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
  ert-run-tests("\\(org\\|ob\\)" #[(event-type &rest event-args) "\306
  ert-run-tests-batch("\\(org\\|ob\\)")
  ert-run-tests-batch-and-exit("\\(org\\|ob\\)")
  (let ((org-id-track-globally t) (org-test-selector (if org-test-sele
  org-test-run-batch-tests()
  call-interactively(org-test-run-batch-tests nil nil)
  command-execute(org-test-run-batch-tests)
  command-line-1(("-L" "lisp/" "-L" "testing/" "-l" "org-test.el" "--e
  command-line()
  normal-top-level()
--8<---------------cut here---------------end--------------->8---

These were run successfully from within Emacs itself (on Windows).

I've solved the reported problem by creating the missing TMPDIR (set to
/tmp/org_test) for the invocation from my Zsh (Cygwin) terminal...

Though, now, I do have another test failing when testing from the shell:

--8<---------------cut here---------------start------------->8---
Test ob-shell/bash-uses-assoc-arrays backtrace:
  signal(ert-test-failed (((should (equal "20 cm" (org-babel-execute-s
  ert-fail(((should (equal "20 cm" (org-babel-execute-src-block))) :fo
  (if (unwind-protect (setq value-502 (apply fn-500 args-501)) (setq f
  (let (form-description-504) (if (unwind-protect (setq value-502 (app
  (let ((value-502 (quote ert-form-evaluation-aborted-503))) (let (for
  (let ((fn-500 (function equal)) (args-501 (list "20 cm" (org-babel-e
  (save-restriction (org-babel-next-src-block 2) (let ((fn-500 (functi
  (progn (org-id-goto "82320a48-3409-49d7-85c9-5de1c6d3ff87") (setq to
  (unwind-protect (progn (org-id-goto "82320a48-3409-49d7-85c9-5de1c6d
  (let ((save-match-data-internal (match-data))) (unwind-protect (prog
  (progn (let ((save-match-data-internal (match-data))) (unwind-protec
  (unwind-protect (progn (let ((save-match-data-internal (match-data))
  (let ((wconfig (current-window-configuration))) (unwind-protect (pro
  (unwind-protect (let ((wconfig (current-window-configuration))) (unw
  (let* ((id-location (org-id-find "82320a48-3409-49d7-85c9-5de1c6d3ff
  (lambda nil (let* ((id-location (org-id-find "82320a48-3409-49d7-85c
  byte-code("\306\307!q\210\310\216\311 \312\216\313\314\315\316\3
  ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
  byte-code("\306\307!\211\211r\310\311!q\210\312 d\313\223)L\210)\3
  ert-run-test([cl-struct-ert-test ob-shell/bash-uses-assoc-arrays "Ba
  ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
  ert-run-tests("\\(org\\|ob\\)" #[(event-type &rest event-args) "\306
  ert-run-tests-batch("\\(org\\|ob\\)")
  ert-run-tests-batch-and-exit("\\(org\\|ob\\)")
  (let ((org-id-track-globally t) (org-test-selector (if org-test-sele
  org-test-run-batch-tests()
  call-interactively(org-test-run-batch-tests nil nil)
  command-execute(org-test-run-batch-tests)
  command-line-1(("-L" "lisp/" "-L" "testing/" "-l" "org-test.el" "--e
  command-line()
  normal-top-level()
Test ob-shell/bash-uses-assoc-arrays condition:
    (ert-test-failed
     ((should
       (equal "20 cm"
              (org-babel-execute-src-block)))
      :form
      (equal "20 cm" nil)
      :value nil :explanation
      (different-types "20 cm" nil)))
   FAILED   24/427  ob-shell/bash-uses-assoc-arrays
--8<---------------cut here---------------end--------------->8---

Best regards,
  Seb

-- 
Sebastien Vauban