From 64c4ec0379c3a9be132f65b574c61c4559878f51 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 14 Mar 2018 14:30:39 -0400 Subject: [PATCH] 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 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)) -- 2.39.2