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

(Ftrace_to_stderr) [GLYPH_DEBUG]: Take args like

parent caae20c7
2001-09-10 Gerd Moellmann <>
* xdisp.c (Ftrace_to_stderr) [GLYPH_DEBUG]: Take args like
2001-09-10 Richard M. Stallman <>
* 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.")
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