diff options
| author | Glenn Morris <rgm@gnu.org> | 2018-03-14 14:30:39 -0400 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2018-03-14 14:30:39 -0400 |
| commit | 5d968dbf6bb85f73b806d196b05db3406ce808be (patch) | |
| tree | 826afb5d14d49157b3aeedac8b0c30684e67173a /lisp/emacs-lisp | |
| parent | 5bebacc476259f854d3735a6dc5a639016f1673a (diff) | |
| download | emacs-5d968dbf6bb85f73b806d196b05db3406ce808be.tar.gz emacs-5d968dbf6bb85f73b806d196b05db3406ce808be.tar.bz2 emacs-5d968dbf6bb85f73b806d196b05db3406ce808be.zip | |
More hydra.nixos.org logging for unfinished tests
* lisp/emacs-lisp/ert.el (ert-summarize-tests-batch-and-exit):
Dump contents of any unfinished log files on hydra.nixos.org.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/ert.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el index 7d8d0a50e48..3beb8a070fc 100644 --- a/lisp/emacs-lisp/ert.el +++ b/lisp/emacs-lisp/ert.el @@ -1548,7 +1548,14 @@ Ran \\([0-9]+\\) tests, \\([0-9]+\\) results as expected\ (mapc (lambda (l) (message " %s" l)) notests)) (when badtests (message "%d files did not finish:" (length badtests)) - (mapc (lambda (l) (message " %s" l)) badtests)) + (mapc (lambda (l) (message " %s" l)) badtests) + (if (getenv "EMACS_HYDRA_CI") + (with-temp-buffer + (dolist (f badtests) + (erase-buffer) + (insert-file-contents f) + (message "Contents of unfinished file %s:" f) + (message "-----\n%s\n-----" (buffer-string)))))) (when unexpected (message "%d files contained unexpected results:" (length unexpected)) (mapc (lambda (l) (message " %s" l)) unexpected)) |