Re: [O] Heads-up: test failures

[Nick Dokos]

Nicolas Goaziou <address@hidden> writes:

> What is the failure in each case?

The move-down/up failures look like this:

,----
|    passed  512/710  test-org-list/list-navigation
| FOLDED
| FOLDED
| FOLDED
| FOLDED
| Test test-org-list/move-item-down backtrace:
|   (if (unwind-protect (setq value-6667 (apply fn-6665 args-6666)) (set
|   (let (form-description-6669) (if (unwind-protect (setq value-6667 (a
|   (let ((value-6667 (quote ert-form-evaluation-aborted-6668))) (let (f
|   (let ((fn-6665 (function org-invisible-p2)) (args-6666 (list))) (let
|   (progn (org-mode) (let ((point (string-match "<point>" inside-text))
|   (unwind-protect (progn (org-mode) (let ((point (string-match "<point
|   (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
|   (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
|   (let ((inside-text (if (stringp "\n- item 1\n  #+BEGIN_CENTER\n  Tex
|   (lambda nil (let ((inside-text (if (stringp "- item 1\n- item 2") "-
|   ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
|   ert-run-test([cl-struct-ert-test test-org-list/move-item-down "Test 
|   ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
|   ert-run-tests("\\(org\\|ob\\)" #[385 "\306\307\"\203G\211\211G\310
|   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("\\(org\\|ob\\)")
|   eval((org-test-run-batch-tests org-test-select-re))
|   command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
|   command-line()
|   normal-top-level()
| Test test-org-list/move-item-down condition:
|     (ert-test-failed
|      ((should
|        (org-invisible-p2))
|       :form
|       (org-invisible-p2)
|       :value nil))
|    FAILED  513/710  test-org-list/move-item-down
| FOLDED
| FOLDED
| FOLDED
| FOLDED
| Test test-org-list/move-item-up backtrace:
|   (if (unwind-protect (setq value-6729 (apply fn-6727 args-6728)) (set
|   (let (form-description-6731) (if (unwind-protect (setq value-6729 (a
|   (let ((value-6729 (quote ert-form-evaluation-aborted-6730))) (let (f
|   (let ((fn-6727 (function org-invisible-p2)) (args-6728 (list))) (let
|   (progn (org-mode) (let ((point (string-match "<point>" inside-text))
|   (unwind-protect (progn (org-mode) (let ((point (string-match "<point
|   (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn
|   (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-b
|   (let ((inside-text (if (stringp "\n- item 1\n  #+BEGIN_CENTER\n  Tex
|   (lambda nil (let ((inside-text (if (stringp "- item 1\n- item 2") "-
|   ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
|   ert-run-test([cl-struct-ert-test test-org-list/move-item-up "Test `o
|   ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
|   ert-run-tests("\\(org\\|ob\\)" #[385 "\306\307\"\203G\211\211G\310
|   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("\\(org\\|ob\\)")
|   eval((org-test-run-batch-tests org-test-select-re))
|   command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
|   command-line()
|   normal-top-level()
| Test test-org-list/move-item-up condition:
|     (ert-test-failed
|      ((should
|        (org-invisible-p2))
|       :form
|       (org-invisible-p2)
|       :value nil))
|    FAILED  514/710  test-org-list/move-item-up
|    passed  515/710  test-org-list/outdent-item
`----

The custom-id failure looks like this:

,----
|    passed  624/710  test-org/custom-id
| Test test-org/custom-properties backtrace:
|   (if (unwind-protect (setq value-10586 (let ((org-custom-properties (
|   (let (form-description-10587) (if (unwind-protect (setq value-10586 
|   (let ((value-10586 (cl-gensym "ert-form-evaluation-aborted-"))) (let
|   (lambda nil (let ((value-10586 (cl-gensym "ert-form-evaluation-abort
|   ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
|   ert-run-test([cl-struct-ert-test test-org/custom-properties "Test cu
|   ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
|   ert-run-tests("\\(org\\|ob\\)" #[385 "\306\307\"\203G\211\211G\310
|   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("\\(org\\|ob\\)")
|   eval((org-test-run-batch-tests org-test-select-re))
|   command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
|   command-line()
|   normal-top-level()
| Test test-org/custom-properties condition:
|     (ert-test-failed
|      ((should
|        (let
|          (...)
|        (org-test-with-temp-text "* H
| :PROPERTIES:
| <point>:FOO: val
| :END:
| " ... ...)))
|       :form
|       (let
|         ((org-custom-properties ...))
|       (org-test-with-temp-text "* H
| :PROPERTIES:
| <point>:FOO: val
| :END:
| "
|         (org-toggle-custom-properties-visibility)
|         (org-invisible-p2)))
|       :value nil))
|    FAILED  625/710  test-org/custom-properties
`----

The forward-paragraph failrue looks like this:

,----
|    passed  645/710  test-org/forward-element
| Test test-org/forward-paragraph backtrace:
|   (if (unwind-protect (setq value-10777 (let ((inside-text (if (string
|   (let (form-description-10778) (if (unwind-protect (setq value-10777 
|   (let ((value-10777 (cl-gensym "ert-form-evaluation-aborted-"))) (let
|   (lambda nil (let ((value-10769 (cl-gensym "ert-form-evaluation-abort
|   ert--run-test-internal([cl-struct-ert--test-execution-info [cl-struc
|   ert-run-test([cl-struct-ert-test test-org/forward-paragraph "Test `o
|   ert-run-or-rerun-test([cl-struct-ert--stats "\\(org\\|ob\\)" [[cl-st
|   ert-run-tests("\\(org\\|ob\\)" #[385 "\306\307\"\203G\211\211G\310
|   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("\\(org\\|ob\\)")
|   eval((org-test-run-batch-tests org-test-select-re))
|   command-line-1(("--eval" "(setq vc-handled-backends nil org-startup-
|   command-line()
|   normal-top-level()
| Test test-org/forward-paragraph condition:
|     (ert-test-failed
|      ((should
|        (org-test-with-temp-text "#+BEGIN_CENTER
| P1
| 
| P2
| #+END_CENTER
| P3"
|        (org-hide-block-toggle)
|        (org-forward-paragraph)
|        (looking-at "P3")))
|       :form
|       (let
|         ((inside-text ...)
|          (org-mode-hook nil))
|       (with-temp-buffer
|         (org-mode)
|         (let ... ...)
|         (org-hide-block-toggle)
|         (org-forward-paragraph)
|         (looking-at "P3")))
|       :value nil))
|    FAILED  646/710  test-org/forward-paragraph
`----

Version info:
GNU Emacs 26.0.50.2 (x86_64-unknown-linux-gnu, GTK+ Version 3.20.9) of 
2017-02-07
Org mode version 9.0.5 (release_9.0.5-260-geb59c7 @ 
/home/nick/elisp/org-mode/lisp/)

Note: I don't remember the last time that I ran `make test', so these may (or 
may not) be
recent.
And another note: I deleted some NULs from the backtraces to keep Gnus from 
asking.

-- 
Nick