X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fdebug.c;fp=src%2Fdebug.c;h=3e50d0a84ff96af1aebc8115ffc57b81fe25bdb5;hb=ea1ea793fe6e244ef5555ed983423a204101af13;hp=d3eb58ded760143c1c3f092852cbdd20074870b1;hpb=399b9f4466f37412410de8ec4a08e3dc5504ad10;p=chise%2Fxemacs-chise.git.1

diff --git a/src/debug.c b/src/debug.c
index d3eb58d..3e50d0a 100644
--- a/src/debug.c
+++ b/src/debug.c
@@ -39,8 +39,7 @@ Boston, MA 02111-1307, USA.  */
  * 4.  Add a FROB line for it in xemacs_debug_loop.
  */
 
-Lisp_Object Qredisplay, Qbuffers, Qfaces;
-Lisp_Object Qwindows, Qframes, Qdevices;
+static Lisp_Object Qredisplay, Qbuffers, Qfaces, Qwindows, Qframes, Qdevices;
 
 struct debug_classes active_debug_classes;
 
@@ -194,7 +193,6 @@ syms_of_debug (void)
   defsymbol (&Qwindows, "windows");
   defsymbol (&Qframes, "frames");
   defsymbol (&Qdevices, "devices");
-  /* defsymbol (&Qbyte_code, "byte-code"); in bytecode.c */
 
   DEFSUBR (Fadd_debug_class_to_check);
   DEFSUBR (Fdelete_debug_class_to_check);
@@ -206,7 +204,7 @@ syms_of_debug (void)
 }
 
 void
-vars_of_debug (void)
+reinit_vars_of_debug (void)
 {
   /* If you need to have any classes active early on in startup, then
      the flags should be set here.
@@ -214,3 +212,9 @@ vars_of_debug (void)
      to emacs.c. */
   xemacs_debug_loop (INIT, Qnil, Qnil);
 }
+
+void
+vars_of_debug (void)
+{
+  reinit_vars_of_debug ();
+}