Commit f4a374a1 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(Ftrace_to_stderr) [GLYPH_DEBUG]: Take args like

`format'.
parent caae20c7
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.
......
......@@ -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 (string)->data);
Lisp_Object s = Fformat (nargs, args);
fprintf (stderr, "%s", XSTRING (s)->data);
return Qnil;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment