[Guile-commits] 05/05: GDB support: Add 'guile-backtrace' command.

[Ludovic Courtès]

civodul pushed a commit to branch stable-2.2
in repository guile.

commit 8209f0f5c067bdaa67c0acce50379c32aba996a2
Author: Ludovic Courtès <address@hidden>
Date:   Sun Jun 24 23:40:08 2018 +0200

    GDB support: Add 'guile-backtrace' command.
    
    * libguile/libguile-2.2-gdb.scm <top level>: Add 'register-command!' call.
---
 libguile/libguile-2.2-gdb.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/libguile/libguile-2.2-gdb.scm b/libguile/libguile-2.2-gdb.scm
index 5ef52ec..e0b573a 100644
--- a/libguile/libguile-2.2-gdb.scm
+++ b/libguile/libguile-2.2-gdb.scm
@@ -339,6 +339,14 @@ if the information is not available."
                      (dump-vm-frame frame port))
                    (vm-frames)))
 
+(register-command!
+ (make-command "guile-backtrace"
+               #:command-class COMMAND_STACK
+               #:doc "Display a backtrace of Guile's VM stack for the \
+current thread"
+               #:invoke (lambda (self args from-tty)
+                          (display-vm-frames))))
+
 
 ;;;
 ;;; Frame filters.