Thanks Matt.
I wrote a Guile utility function and attached to a button using e-lisp:
Guile---
(define (back-out repl-stack )
(if (null? (cdr repl-stack))
(throw 'quit)
(begin
(throw 'quit)
(back-out (cdr repl-stack)
On 9/15/21 5:49 AM, Matt Wette wrote:
On 9/14/21 5:50 AM, Mortimer Cladwell wrote:
Hi,
Let's say I made a lot of mistakes. I look at my repl and see:
scheme@(guile-user) [10]>
Any way to back out to scheme@(guile-user)> without typing ,q ten times?
Thanks
Mortimer
Try binding a command to:
On 9/14/21 5:50 AM, Mortimer Cladwell wrote:
Hi,
Let's say I made a lot of mistakes. I look at my repl and see:
scheme@(guile-user) [10]>
Any way to back out to scheme@(guile-user)> without typing ,q ten times?
Thanks
Mortimer
Try binding a command to:
(while (pair? (cdr (fluid-ref *repl-sta
