Make Emacs functions such as Fatom 'static' by default.

[bpt/emacs.git] / src / xdisp.c

diff --git a/src/xdisp.c b/src/xdisp.c
index 6fd3945..7553841 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -16377,7 +16377,7 @@ dump_glyph_row (row, vpos, glyphs)
 }
 
 
-DEFUN ("dump-glyph-matrix", Fdump_glyph_matrix,
+DEFUE ("dump-glyph-matrix", Fdump_glyph_matrix,
        Sdump_glyph_matrix, 0, 1, "p",
        doc: /* Dump the current matrix of the selected window to stderr.
 Shows contents of glyph row structures.  With non-nil
@@ -16399,7 +16399,7 @@ glyphs in short form, otherwise show glyphs in long form.  */)
 }
 
 
-DEFUN ("dump-frame-glyph-matrix", Fdump_frame_glyph_matrix,
+DEFUE ("dump-frame-glyph-matrix", Fdump_frame_glyph_matrix,
        Sdump_frame_glyph_matrix, 0, 0, "", doc: /* */)
   (void)
 {
@@ -16409,7 +16409,7 @@ DEFUN ("dump-frame-glyph-matrix", Fdump_frame_glyph_matrix,
 }
 
 
-DEFUN ("dump-glyph-row", Fdump_glyph_row, Sdump_glyph_row, 1, 2, "",
+DEFUE ("dump-glyph-row", Fdump_glyph_row, Sdump_glyph_row, 1, 2, "",
        doc: /* Dump glyph row ROW to stderr.
 GLYPH 0 means don't dump glyphs.
 GLYPH 1 means dump glyphs in short form.
@@ -16430,7 +16430,7 @@ GLYPH > 1 or omitted means dump glyphs in long form.  */)
 }
 
 
-DEFUN ("dump-tool-bar-row", Fdump_tool_bar_row, Sdump_tool_bar_row, 1, 2, "",
+DEFUE ("dump-tool-bar-row", Fdump_tool_bar_row, Sdump_tool_bar_row, 1, 2, "",
        doc: /* Dump glyph row ROW of the tool-bar of the current frame to stderr.
 GLYPH 0 means don't dump glyphs.
 GLYPH 1 means dump glyphs in short form.
@@ -16450,7 +16450,7 @@ GLYPH > 1 or omitted means dump glyphs in long form.  */)
 }
 
 
-DEFUN ("trace-redisplay", Ftrace_redisplay, Strace_redisplay, 0, 1, "P",
+DEFUE ("trace-redisplay", Ftrace_redisplay, Strace_redisplay, 0, 1, "P",
        doc: /* Toggle tracing of redisplay.
 With ARG, turn tracing on if and only if ARG is positive.  */)
   (Lisp_Object arg)
@@ -16467,7 +16467,7 @@ With ARG, turn tracing on if and only if ARG is positive.  */)
 }
 
 
-DEFUN ("trace-to-stderr", Ftrace_to_stderr, Strace_to_stderr, 1, MANY, "",
+DEFUE ("trace-to-stderr", Ftrace_to_stderr, Strace_to_stderr, 1, MANY, "",
        doc: /* Like `format', but print result to stderr.
 usage: (trace-to-stderr STRING &rest OBJECTS)  */)
   (size_t nargs, Lisp_Object *args)