diff src/.gdbinit @ 66817:98ff41842c94

(pitx): Fix output format if n_overlay_strings > 0. (bt): Add post hook to "backtrace" to always dump lisp call stack to increase chance of people sending it to us when reporting bugs.

--- a/src/.gdbinit	Fri Nov 11 15:45:18 2005 +0000
+++ b/src/.gdbinit	Fri Nov 11 15:45:44 2005 +0000
@@ -162,7 +162,7 @@
     printf " HL"
   end
   if ($it->n_overlay_strings > 0)
-    printf " nov=%d"
+    printf " nov=%d", $it->n_overlay_strings
   end
   if ($it->sp != 0)
     printf " sp=%d", $it->sp
@@ -712,6 +712,16 @@
   an error was signaled.
 end
 
+# Show Lisp backtrace after normal backtrace.
+define hookpost-backtrace
+  set $bt = backtrace_list
+  if $bt
+    echo \n
+    echo Lisp Backtrace:\n
+    xbacktrace
+  end
+end
+
 define xreload
   set $tagmask = (((long)1 << gdb_gctypebits) - 1)
   set $valmask = gdb_use_lsb ? ~($tagmask) : ((long)1 << gdb_valbits) - 1