[Openmcl-devel] Customizing the debugger

[Leslie P. Polzer]

>> I like the ability of SBCL's debugger interface to select
>> restart by simply typing their number (and hitting return).
>
> [...]
> Otherwise, see ccl::*default-integer-command*.  It's currently only
> used to implement integer shortcuts in the inspector, you might want
> to look at how it does that (in ccl:lib;describe.lisp), and do
> something similar in ccl::break-loop.

Here's the patch (relative to level-1 against latest svn)
if you want to include it:

Index: l1-readloop-lds.lisp
===================================================================
--- l1-readloop-lds.lisp        (revision 11958)
+++ l1-readloop-lds.lisp        (working copy)
@@ -616,6 +616,7 @@
          (*signal-printing-errors* nil)
          (*read-suppress* nil)
          (*print-readably* nil)
+         (*default-integer-command* `(:c 0 ,(1- (length (compute-restarts condition)))))
          (context (new-backtrace-info nil
                                       frame-pointer
                                       (if *backtrace-contexts*

I will also implement an option to immediately show the available
restarts when the break loop is entered.

  Leslie

-- 
LinkedIn Profile: http://www.linkedin.com/in/polzer
Xing Profile: https://www.xing.com/profile/LeslieP_Polzer
Blog: http://blog.viridian-project.de/