Avoid a warning message when x_error_quitter is not compiled in.

2 files changed, 12 insertions, 1 deletions

diff --git a/src/.gdbinit b/src/.gdbinit
index 48a0fecc0cf..f00a5449531 100644
--- a/src/.gdbinit
+++ b/src/.gdbinit
@@ -782,7 +782,15 @@ else
   # If we are running in synchronous mode, we want a chance to look around
   # before Emacs exits.  Perhaps we should put the break somewhere else
   # instead...
-  break x_error_quitter
+  xgetptr Vwindow_system
+  set $tem = (struct Lisp_Symbol *) $ptr
+  xgetptr $tem->xname
+  set $tem = (struct Lisp_String *) $ptr
+  set $tem = (char *) $tem->data
+  # x_error_quitter is defined only on X
+  if $tem[0] == 'x' && $tem[1] == '\0'
+    break x_error_quitter
+  end
 end
 
 # arch-tag: 12f34321-7bfa-4240-b77a-3cd3a1696dfe
diff --git a/src/ChangeLog b/src/ChangeLog
index cb01d728cff..75a0dcc5890 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2006-01-04  Eli Zaretskii  <eliz@gnu.org>
 
+        * .gdbinit: Avoid a warning message when x_error_quitter is not
+        compiled in.
+
         * process.c [WINDOWSNT]: Undef AF_INET6 to disable IPv6 support
         for w32.