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
28b8f740
Commit
28b8f740
authored
May 17, 2004
by
Kim F. Storm
Browse files
(print_object): Increase buf size.
parent
1a8da670
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
3 deletions
+3
-3
src/print.c
src/print.c
+3
-3
No files found.
src/print.c
View file @
28b8f740
...
...
@@ -791,7 +791,7 @@ A printed representation of an object is text which describes that object. */)
if
(
SBYTES
(
object
)
==
SCHARS
(
object
))
STRING_SET_UNIBYTE
(
object
);
/* Note that this won't make prepare_to_modify_buffer call
/* Note that this won't make prepare_to_modify_buffer call
ask-user-about-supersession-threat because this buffer
does not visit a file. */
Ferase_buffer
();
...
...
@@ -929,7 +929,7 @@ DEFUN ("redirect-debugging-output", Fredirect_debugging_output, Sredirect_debugg
doc
:
/* Redirect debugging output (stderr stream) to file FILE.
If FILE is nil, reset target to the initial stderr stream.
Optional arg APPEND non-nil (interactively, with prefix arg) means
append to existing target file. */
)
append to existing target file. */
)
(
file
,
append
)
Lisp_Object
file
,
append
;
{
...
...
@@ -1400,7 +1400,7 @@ print_object (obj, printcharfun, escapeflag)
register
Lisp_Object
printcharfun
;
int
escapeflag
;
{
char
buf
[
3
0
];
char
buf
[
4
0
];
QUIT
;
...
...
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