summaryrefslogtreecommitdiff
path: root/src/.gdbinit
diff options
context:
space:
mode:
authorNick Roberts <nickrob@snap.net.nz>2007-02-24 21:15:02 +0000
committerNick Roberts <nickrob@snap.net.nz>2007-02-24 21:15:02 +0000
commitd33322491eb66e9e10322ae688c5fcfbe255a2ad (patch)
tree3b3bdcd85aa800e91dab12e4f369cb34edb8bf36 /src/.gdbinit
parent174c9ce9746febf928d428641677df452a914815 (diff)
downloademacs-d33322491eb66e9e10322ae688c5fcfbe255a2ad.tar.gz
(xprintstr): Ensure GDB (> 6.6) prints symbol name
as strings and not character arrays.
Diffstat (limited to 'src/.gdbinit')
-rw-r--r--src/.gdbinit2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/.gdbinit b/src/.gdbinit
index 008305ca252..5a940e667dc 100644
--- a/src/.gdbinit
+++ b/src/.gdbinit
@@ -977,7 +977,7 @@ Print $ as a lisp object of any type.
end
define xprintstr
- set $data = $arg0->data
+ set $data = (char *) $arg0->data
output ($arg0->size > 1000) ? 0 : ($data[0])@($arg0->size_byte < 0 ? $arg0->size & ~gdb_array_mark_flag : $arg0->size_byte)
end