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
f4a374a1
Commit
f4a374a1
authored
Sep 10, 2001
by
Gerd Moellmann
Browse files
(Ftrace_to_stderr) [GLYPH_DEBUG]: Take args like
`format'.
parent
caae20c7
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
12 additions
and
6 deletions
+12
-6
src/ChangeLog
src/ChangeLog
+5
-0
src/xdisp.c
src/xdisp.c
+7
-6
No files found.
src/ChangeLog
View file @
f4a374a1
2001-09-10 Gerd Moellmann <gerd@gnu.org>
* xdisp.c (Ftrace_to_stderr) [GLYPH_DEBUG]: Take args like
`format'.
2001-09-10 Richard M. Stallman <rms@gnu.org>
* frame.c (Fmouse_position): Doc fix.
...
...
src/xdisp.c
View file @
f4a374a1
...
...
@@ -12165,13 +12165,14 @@ With ARG, turn tracing on if and only if ARG is positive.")
}
DEFUN ("trace-to-stderr", Ftrace_to_stderr, Strace_to_stderr, 1, 1, "",
"Print STRING to stderr.")
(string)
Lisp_Object string;
DEFUN ("trace-to-stderr", Ftrace_to_stderr, Strace_to_stderr, 1, MANY, "",
"Like `format', but print result to stderr.")
(nargs, args)
int nargs;
Lisp_Object *args;
{
CHECK_STRING (string, 0
);
fprintf (stderr, "%s", XSTRING (s
tring
)->data);
Lisp_Object s = Fformat (nargs, args
);
fprintf (stderr, "%s", XSTRING (s)->data);
return Qnil;
}
...
...
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