* alloc.c (mark_backtrace): Move decl from here ...

* lisp.h: ... to here, so that it can be checked.

diff --git a/src/ChangeLog b/src/ChangeLog
index a5a4657..0036125 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2011-03-16  Paul Eggert  <eggert@cs.ucla.edu>
 
+       * alloc.c (mark_backtrace): Move decl from here ...
+       * lisp.h: ... to here, so that it can be checked.
+
        * eval.c (call_debugger, do_debug_on_call, grow_specpdl): Now static.
        (Fdefvar): Rewrite so as not to use empty "else".
        (lisp_indirect_variable): Name an expression,

diff --git a/src/alloc.c b/src/alloc.c
index 6262e00..66695e7 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -270,7 +270,6 @@ Lisp_Object Qpost_gc_hook;
 
 static void mark_buffer (Lisp_Object);
 static void mark_terminals (void);
-extern void mark_backtrace (void);
 static void gc_sweep (void);
 static void mark_glyph_matrix (struct glyph_matrix *);
 static void mark_face_cache (struct face_cache *);

diff --git a/src/lisp.h b/src/lisp.h
index 5a5e7db..074c758 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2872,6 +2872,7 @@ extern Lisp_Object safe_call (int, Lisp_Object *);
 extern Lisp_Object safe_call1 (Lisp_Object, Lisp_Object);
 extern Lisp_Object safe_call2 (Lisp_Object, Lisp_Object, Lisp_Object);
 extern void init_eval (void);
+extern void mark_backtrace (void);
 extern void syms_of_eval (void);
 
 /* Defined in editfns.c */