Function: ert--pp-with-indentation-and-newline
ert--pp-with-indentation-and-newline is a byte-compiled function
defined in ert.el.gz.
Signature
(ert--pp-with-indentation-and-newline OBJECT)
Documentation
Pretty-print OBJECT, indenting it to the current column of point.
Ensures a final newline is inserted.
Source Code
;; Defined in /usr/src/emacs/lisp/emacs-lisp/ert.el.gz
(defun ert--pp-with-indentation-and-newline (object)
"Pretty-print OBJECT, indenting it to the current column of point.
Ensures a final newline is inserted."
(let ((begin (point))
(pp-escape-newlines t)
(print-escape-control-characters t))
(pp object (current-buffer))
(unless (bolp) (insert "\n"))
(save-excursion
(goto-char begin)
(indent-sexp))))