diff options
author | Eli Zaretskii <eliz@gnu.org> | 2016-12-04 19:59:17 +0200 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2016-12-04 19:59:17 +0200 |
commit | de4624c99ea5bbe38ad5aff7b6461cc5c740d0be (patch) | |
tree | 1b57de9e769cdb695cb2cecf157b50f7dea9cfe5 /src/.gdbinit | |
parent | a486fabb41cdbaa5813c2687fd4008945297d71d (diff) | |
parent | e7bde34e939451d87fb42a36195086bdbe48b5e1 (diff) | |
download | emacs-de4624c99ea5bbe38ad5aff7b6461cc5c740d0be.tar.gz |
Merge branch 'concurrency'
Conflicts (resolved):
configure.ac
src/Makefile.in
src/alloc.c
src/bytecode.c
src/emacs.c
src/eval.c
src/lisp.h
src/process.c
src/regex.c
src/regex.h
Diffstat (limited to 'src/.gdbinit')
-rw-r--r-- | src/.gdbinit | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/src/.gdbinit b/src/.gdbinit index b0c0dfd7e90..9160ffa439e 100644 --- a/src/.gdbinit +++ b/src/.gdbinit @@ -1215,6 +1215,21 @@ document xwhichsymbols maximum number of symbols referencing it to produce. end +define xbytecode + set $bt = byte_stack_list + while $bt + xgetptr $bt->byte_string + set $ptr = (struct Lisp_String *) $ptr + xprintbytestr $ptr + printf "\n0x%x => ", $bt->byte_string + xwhichsymbols $bt->byte_string 5 + set $bt = $bt->next + end +end +document xbytecode + Print a backtrace of the byte code stack. +end + # Show Lisp backtrace after normal backtrace. define hookpost-backtrace set $bt = backtrace_top () |