emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [PATCH] make test: Make failure results more verbose


From: Max Nikulin
Subject: Re: [PATCH] make test: Make failure results more verbose
Date: Fri, 21 Jan 2022 22:01:05 +0700
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.14.0

On 21/01/2022 20:33, Ihor Radchenko wrote:
Max Nikulin <manikulin@gmail.com> writes:

I am attaching a tentative patch for Org that should make
EMACS_TEST_VERBOSE setting more transparent.

Thanks! Your patch looks cleaner.

In the meanwhile Lars fixed ERT in Emacs-29, so empty string is considered as false now, see https://debbugs.gnu.org/53313 Values like "no" should not be considered as false by Org makefiles, so I am attaching an updated version.

In addition, I am attaching a tentative hack to make ERT pretty-print
the failure reason as you wished. WDYT?

Sorry, I was not clear enough. Summary should remain single-line. There are pretty-printed failure reason in the main part of the log. I was complained concerning the following brick

  signal(ert-test-failed (((should (equal "aB " (org-test-with-parsed-
  ert-fail(((should (equal "aB " (org-test-with-parsed-data "* Headlin
  (if (unwind-protect (setq value-5061 (apply fn-5059 args-5060)) (set
  (let (form-description-5063) (if (unwind-protect (setq value-5061 (a
  (let ((value-5061 'ert-form-evaluation-aborted-5062)) (let (form-des
  (let* ((fn-5059 #'equal) (args-5060 (condition-case err (let ((signa
  (closure (t) nil (let* ((fn-5059 #'equal) (args-5060 (condition-case
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
ert-run-test(#s(ert-test :name test-org-export/get-previous-element ert-run-or-rerun-test(#s(ert--stats :selector "test-org-export/get-p
  ert-run-tests("test-org-export/get-previous-element" #f(compiled-fun
  ert-run-tests-batch("test-org-export/get-previous-element")
  ert-run-tests-batch-and-exit("test-org-export/get-previous-element")
  (let ((org-id-track-globally t) (org-test-selector (if org-test-sele
  org-test-run-batch-tests("test-org-export/get-previous-element")
  eval((org-test-run-batch-tests org-test-select-re) t)
  command-line-1(("-L" "/home/ubuntu/ert" "--eval" "(setq vc-handled-b
  command-line()
  normal-top-level()

However it will be too long when pretty printed.

Attachment: 0001-make-test-Make-failure-summary-more-verbose.patch
Description: Text Data


reply via email to

[Prev in Thread] Current Thread [Next in Thread]