Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
c6f7982f
Commit
c6f7982f
authored
Feb 08, 1994
by
Roland McGrath
Browse files
(print): If print_escapes_newlines, print '\f' as "\\f".
(syms_of_print): Update docstring.
parent
f0456945
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
2 deletions
+8
-2
src/print.c
src/print.c
+8
-2
No files found.
src/print.c
View file @
c6f7982f
/* Lisp object printing and output streams.
Copyright (C) 1985, 1986, 1988, 1993 Free Software Foundation, Inc.
Copyright (C) 1985, 1986, 1988, 1993
, 1994
Free Software Foundation, Inc.
This file is part of GNU Emacs.
...
...
@@ -793,6 +793,11 @@ print (obj, printcharfun, escapeflag)
PRINTCHAR
(
'\\'
);
PRINTCHAR
(
'n'
);
}
else
if
(
c
==
'\f'
&&
print_escape_newlines
)
{
PRINTCHAR
(
'\\'
);
PRINTCHAR
(
'f'
);
}
else
{
if
(
c
==
'\"'
||
c
==
'\\'
)
...
...
@@ -1069,7 +1074,8 @@ A value of nil means no limit.");
Vprint_level
=
Qnil
;
DEFVAR_BOOL
(
"print-escape-newlines"
,
&
print_escape_newlines
,
"Non-nil means print newlines in strings as backslash-n."
);
"Non-nil means print newlines in strings as backslash-n.
Also print formfeeds as backslash-f."
);
print_escape_newlines
=
0
;
/* prin1_to_string_buffer initialized in init_buffer_once in buffer.c */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment