[Guile-commits] GNU Guile branch, master, updated. release_1-9-6-59-g441891f

[Andy Wingo]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=441891f376221d7bcd1f6fc8927595fe25417255

The branch, master has been updated
       via  441891f376221d7bcd1f6fc8927595fe25417255 (commit)
      from  0c2a05c3213da8b1269af37d65af3f8bffdb01c2 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 441891f376221d7bcd1f6fc8927595fe25417255
Author: Andy Wingo <address@hidden>
Date:   Tue Dec 29 21:26:48 2009 +0100

    cleanups to debugger
    
    * module/system/vm/debug.scm (debugger-repl): Remove the `bindings'
      command, it is superseded by `locals'.
      Update the TODO.
      (debug-pre-unwind-handler): Remove scary "beta" warning. Already being
      able to bt #:width 1000 #:full? #t is quite useful...

-----------------------------------------------------------------------

Summary of changes:
 module/system/vm/debug.scm |   12 ++----------
 1 files changed, 2 insertions(+), 10 deletions(-)

diff --git a/module/system/vm/debug.scm b/module/system/vm/debug.scm
index c2175c5..e9f30f5 100644
--- a/module/system/vm/debug.scm
+++ b/module/system/vm/debug.scm
@@ -263,10 +263,6 @@ With an argument, select a frame by index, then show it."
             (format #t "No such frame.~%"))))
          (else (show-frame))))
 
-      (define-command ((commands bindings))
-        "Show some information about locally-bound variables in the selected 
frame."
-         (format #t "~a\n" (frame-bindings cur)))
-      
       (define-command ((commands locals))
         "Show locally-bound variables in the selected frame."
         (print-locals cur))
@@ -345,12 +341,10 @@ With an argument, select a frame by index, then show it."
           (apply values args))))))
 
 
-;; things this debugger should do:
+;; TODO:
 ;;
 ;; eval expression in context of frame
 ;; set local variable in frame
-;; display backtrace
-;; display full backtrace
 ;; step until next instruction
 ;; step until next function call/return
 ;; step until return from frame
@@ -363,7 +357,6 @@ With an argument, select a frame by index, then show it."
 ;; display a truncated backtrace
 ;; go to a frame by index
 ;; (reuse gdb commands perhaps)
-;; help
 ;; disassemble a function
 ;; disassemble the current function
 ;; inspect any object
@@ -374,8 +367,7 @@ With an argument, select a frame by index, then show it."
   ;; herald
   (format #t "Throw to key `~a' with args `~s'.
 Entering the debugger. Type `bt' for a backtrace or `c' to continue.
-This debugger implementation is temporary. See system/vm/debug.scm for
-some ideas on how to make it better.\n" key args)
+" key args)
   (run-debugger (stack-ref (make-stack #t) 1))
   (save-stack 1)
   (apply throw key args))


hooks/post-receive
-- 
GNU Guile