aboutsummaryrefslogtreecommitdiffstats
path: root/src/keymap.c
diff options
context:
space:
mode:
authorLeo Liu2014-10-09 06:05:48 +0800
committerLeo Liu2014-10-09 06:05:48 +0800
commit2dbd7a37a809e2dcef6c8e7323ac15c98b051cd9 (patch)
tree3325d872642948f831a9acb971a2c06ce7d10b4d /src/keymap.c
parent289a43910e29999f125d76a48602b63cea7ed9b9 (diff)
downloademacs-2dbd7a37a809e2dcef6c8e7323ac15c98b051cd9.tar.gz
emacs-2dbd7a37a809e2dcef6c8e7323ac15c98b051cd9.zip
Enhance terpri to allow conditionally output a newline
* doc/lispref/streams.texi (Output Functions): Document new argument ENSURE to terpri. * doc/misc/cl.texi (Porting Common Lisp): Remove parse-integer. * lisp/emacs-lisp/cl-extra.el (cl-fresh-line): New function. * src/keymap.c (describe_vector_princ): * src/keyboard.c (Fcommand_error_default_function): Adapt to change to Fterpri. * src/print.c (printchar_stdout_last): Declare. (printchar): Record the last char written to stdout. (Fterpri): Add optional argument ENSURE. * test/automated/print-tests.el: New file. (terpri): Tests for terpri. (Bug#18652)
Diffstat (limited to 'src/keymap.c')
-rw-r--r--src/keymap.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/keymap.c b/src/keymap.c
index fa2d4e942b8..d633bdcaae7 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -3364,7 +3364,7 @@ describe_vector_princ (Lisp_Object elt, Lisp_Object fun)
3364{ 3364{
3365 Findent_to (make_number (16), make_number (1)); 3365 Findent_to (make_number (16), make_number (1));
3366 call1 (fun, elt); 3366 call1 (fun, elt);
3367 Fterpri (Qnil); 3367 Fterpri (Qnil, Qnil);
3368} 3368}
3369 3369
3370DEFUN ("describe-vector", Fdescribe_vector, Sdescribe_vector, 1, 2, 0, 3370DEFUN ("describe-vector", Fdescribe_vector, Sdescribe_vector, 1, 2, 0,