(defmethod constructor :static ((_x eieio--testing) newname &rest _args)
(list newname 2))
+(defun eieio-test-dump-trace ()
+ (message "%s" (with-current-buffer "*trace-output*"
+ (goto-char (point-min))
+ (while (re-search-forward "[\0-\010\013-\037]" nil t)
+ (insert (prog1 (format "\\%03o" (char-before))
+ (delete-char -1))))
+ (buffer-string))))
+(eieio-test-dump-trace)
+
(ert-deftest eieio-test-37-obsolete-name-in-constructor ()
- ;; FIXME repeated intermittent failures on hydra (bug#24503)
+ ;; FIXME repeated intermittent failures on hydra and elsewhere (bug#24503).
+ :tags '(:unstable)
- (should (equal (eieio--testing "toto") '("toto" 2))))
+ (with-current-buffer "*trace-output*"
+ (erase-buffer))
+ (unwind-protect
+ (should (equal (eieio--testing "toto") '("toto" 2)))
+ (eieio-test-dump-trace)))
(ert-deftest eieio-autoload ()
"Tests to see whether reftex-auc has been autoloaded"