From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 21 Sep 2007 07:00:04 +0000 (+0000)
Subject: (xbacktrace): Print the arg's address rather than the value
X-Git-Tag: emacs-pretest-23.0.90~10768
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c51842ec0fb0cbef7fa7b2f5e2b8bf2b299591a4;p=emacs.git

(xbacktrace): Print the arg's address rather than the value
of the first arg, since that value may be a union.
---

diff --git a/src/.gdbinit b/src/.gdbinit
index be91a100f49..ad7b666f188 100644
--- a/src/.gdbinit
+++ b/src/.gdbinit
@@ -998,7 +998,7 @@ define xbacktrace
     xgettype (*$bt->function)
     if $type == Lisp_Symbol
       xprintsym (*$bt->function)
-      printf " (0x%x)\n", *$bt->args
+      printf " (0x%x)\n", $bt->args
     else
       printf "0x%x ", *$bt->function
       if $type == Lisp_Vectorlike
diff --git a/src/ChangeLog b/src/ChangeLog
index 1c303f806ce..fce33201988 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2007-09-21  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* .gdbinit (xbacktrace): Print the arg's address rather than the value
+	of the first arg, since that value may be a union.
+
 	* callproc.c (child_setup, getenv_internal): Use the frame's `display'
 	parameter rather than Qdisplay_environment_variable.  If all else
 	fails, look for DISPLAY in initial-environment.