1

我第一次尝试写一些elisp。我希望能够对其进行单元测试。

我有一个缓冲区，其中包含以下内容：

(ert-deftest addition-test ()
  (should (= (+ 1 2) 4)))

我跑去M-x eval-buffer将ert-deftest定义安装到我的 emacs 中。当我运行时M-x ert RET t RET，我看到：

Selector: t
Passed: 0
Failed: 0
Total:  0/1

Started at:   2015-11-16 00:27:46-0800
Aborted.
Aborted at:   2015-11-16 00:27:46-0800

A

A addition-test
    aborted

我在屏幕底部的小缓冲区中看到消息“测试失败：....”。为什么错误报告在那里而不是在 ERT 缓冲区中？

编辑：

似乎在命中失败的测试后出现“中止”消息，然后不会运行任何剩余的测试。例子：

(ert-deftest test1 ()
  (should 1))

(ert-deftest test2 ()
  (should nil))

(ert-deftest test3 ()
  (should 1))

M-x eval-buffer RET M-x ert RET打开一个名为的缓冲区*ert*，上面写着：

Selector: t
Passed: 1
Failed: 0
Total:  1/3

Started at:   2015-11-16 02:06:57-0800
Aborted.
Aborted at:   2015-11-16 02:06:57-0800

.A-

A test2
    aborted

在*Messages*我看到：

Aborted: Ran 3 tests, 1 results were as expected
ert-fail: Test failed: ((should nil) :form nil :value nil)

如果我进入*ert*并按下d，test2我会得到以下内容*Messages*：

Running test test2...ABORTED
ert-fail: Test failed: ((should nil) :form nil :value nil)

如果我在intest3上按 enter ， expand ，然后按它，我可以说服它运行。看起来像：-.A-test3d

Selector: t
Passed: 2
Failed: 0
Total:  2/3

Started at:   2015-11-16 02:08:40-0800
Aborted.
Aborted at:   2015-11-16 02:08:40-0800

.A.

A test2
    aborted

. test3
    passed

在获得回溯方面，打b过来test2给了我：

ert-results-pop-to-backtrace-for-test-at-point: cl-etypecase failed: [cl-struct-ert-test-aborted-with-non-local-exit  (((should nil) :form nil :value nil))], (ert-test-passed ert-test-result-with-condition)

我根本不理解回溯的输出。这种行为似乎与 ERT 文档所说的不符，所以我真的很困惑。这里发生了什么？

4

1 回答 1

1

您发布的代码在干净的 Emacs 中工作，以emacs -Q. 很可能，它是由某些已以某种方式加载的库引起的。

于 2015-11-16T11:50:29.403 回答