[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 5d968db: More hydra.nixos.org logging for unfinishe
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] master 5d968db: More hydra.nixos.org logging for unfinished tests |
Date: |
Wed, 14 Mar 2018 14:30:50 -0400 (EDT) |
branch: master
commit 5d968dbf6bb85f73b806d196b05db3406ce808be
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>
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.
---
lisp/emacs-lisp/ert.el | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index 7d8d0a5..3beb8a0 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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 5d968db: More hydra.nixos.org logging for unfinished tests,
Glenn Morris <=