如何退出 LispWorks REPL 调试器，返回到顶层，只输入一个数字，比如 SBCL？

Question

我目前正在使用 LispWorks，我想设置 REPL，以便只需键入 (abort) Return to top loop level 0 对应的数字即可退出调试器，就像使用 SBCL 一样。

通常情况下，使用 LispWorks 需要键入 :c + [abort option number]。

查看一个简单的示例，使用 LispWorks：

CL-USER 1 > a

Error: The variable A is unbound.
  1 (continue) Try evaluating A again.
  2 Return the value of :A instead.
  3 Specify a value to use this time instead of evaluating A.
  4 Specify a value to set A to.
  5 (abort) Return to top loop level 0.

Type :b for backtrace or :c <option number> to proceed.
Type :bug-form "<subject>" for a bug report template or :? for other options.

CL-USER 2 : 1 > :c 5

CL-USER 3 >

在使用 SBCL 时，只需数字就足够了：

* a

debugger invoked on a UNBOUND-VARIABLE in thread
#<THREAD "main thread" RUNNING {10012E0613}>:
  The variable A is unbound.

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [CONTINUE   ] Retry using A.
  1: [USE-VALUE  ] Use specified value.
  2: [STORE-VALUE] Set specified value and use it.
  3: [ABORT      ] Exit debugger, returning to top level.

(SB-INT:SIMPLE-EVAL-IN-LEXENV A #<NULL-LEXENV>)
0] 3

*

REPL debugger commands documentation似乎没有列出这种可能性。

如果可能，如何退出 LispWorks REPL 调试器，返回到顶层，只输入一个数字，就像使用 SBCL 一样？

Answer 1

当发生错误时，您在 LispWorks 的 REPL 中看到的内容是由 error 函数生成的，由 Lispworks 实现。要更改选项的处理方式，您必须修改该函数，您没有相关文档，因为它以特定方式与 LispWorks 的 REPL 交互。所以，简而言之，你不能。（顺便说一句，:c 中的 'c' 代表 'continue'。）

Answer 2

基本上你不能。它也更一致：

* a

debugger invoked on a UNBOUND-VARIABLE in thread
#<THREAD "main thread" RUNNING {10005004F3}>:
  The variable A is unbound.

    Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

    restarts (invokable by number or by possibly-abbreviated name):
      0: [CONTINUE   ] Retry using A.
      1: [USE-VALUE  ] Use specified value.
      2: [STORE-VALUE] Set specified value and use it.
      3: [ABORT      ] Exit debugger, returning to top level.

    (SB-INT:SIMPLE-EVAL-IN-LEXENV A #<NULL-LEXENV>)
    0] 4

    4
    0] 3
    *

在上面的 SBCL 示例中，数字 0...3 选择该调试器选项，所有其他数字评估...这有点奇怪。

LispWorks：在调试器中简单中止

在 LispWorks 中，如果您想使用 abort 重新启动，请使用 :a:

CL-USER 1 > a

Error: The variable A is unbound.
  1 (continue) Try evaluating A again.
  2 Return the value of :A instead.
  3 Specify a value to use this time instead of evaluating A.
  4 Specify a value to set A to.
  5 (abort) Return to level 0.
  6 Return to top-level loop.
  7 Return from multiprocessing.

Type :b for backtrace or :c <option number> to proceed.
Type :bug-form "<subject>" for a bug report template or :? for other options.

CL-USER 2 : 1 > :a

CL-USER 3 >

还有LispWorks环境中的meta-shift-a键盘命令在调试器中中止。此外，重新启动在菜单和 right-click 上下文菜单中可用。也可以使用 listener/debugger/...

图标栏中的中止图标

优点：您不必记住重新启动的次数，因为这可能因错误而异。

如何退出 LispWorks REPL 调试器，返回到顶层，只输入一个数字，比如 SBCL？

How to exit LispWorks REPL debugger, returning to top level typing just a number, like SBCL?

debugging

common-lisp

abort

read-eval-print-loop

lispworks