Hi!
On Sun 06 Jun 2010 16:08, l...@gnu.org (Ludovic Courtès) writes:
> Andy Wingo <wi...@pobox.com> writes:
>
>> I am currently poking about to make it possible to run a recursive repl,
>> from the debugger, in the context of the error. It would be nice to be
>> able to exit said recursive repl via Control-D, and it would likewise be
>> nice to be able to exit the debugger via Control-D. I'm sure this is
>> possible. Can someone hook this up?
>
> What about C-] as in Emacs?
Ah yes that would be nice as well. Both would be nice, in fact ;)
By the way we do have a recursive repl from the debugger now, but you
have to exit it with (quit). For example:
scheme@(guile-user)> (let ((a 10) (b 0)) (/ a b))
Throw to key `numerical-overflow':
ERROR: In procedure /:
ERROR: Numerical overflow
Entering the debugger. Type `bt' for a backtrace or `c' to continue.
0 debug> bt 2
In module/ice-9/boot-9.scm:
61: 1 (call-with-prompt prompt0 #<procedure 8fe40e0 at modu...> #)
In current input:
1: 0 (#<procedure 8fe40f0 at <current input>:1:0 ()>)
0 debug> repl
Read-only local variable a = 10
Read-only local variable b = 0
scheme@(#{\ g35}#) [1]> a
$1 = 10
scheme@(#{\ g35}#) [1]> (quit)
0 debug> bt
In module/ice-9/boot-9.scm:
1056: 2 (#<procedure 8f33060 ()>)
61: 1 (call-with-prompt prompt0 #<procedure 8fe40e0 at modu...> #)
In current input:
1: 0 (#<procedure 8fe40f0 at <current input>:1:0 ()>)
0 debug> up
#1 0x00000016 in (call-with-prompt prompt0 #<procedure 8fe40e0 at mo...> #)
1 debug> repl
Read-only local variable tag = prompt0
Read-only local variable thunk = #<procedure 8fe40e0 at module/sys...>
Read-only local variable handler = #<procedure default-prompt-hand...>
scheme@(#{\ g76}#) [1]> handler
$2 = #<procedure default-prompt-handler (k proc)>
Et cetera...
Andy
--
http://wingolog.org/
