主页 / coding / 问题 / 79527141
Accepted
Demihm Seinname
Asked: 2025-03-22 16:33:50 +0800 CST

有没有办法在 Common Lisp 中获得 SLIME-REPL-CLEAR-BUFFER 的效果

  • 772

我曾经在某处读到，我们可以将全局 Emacs 变量设置为T（或者NIL，我不知道）以便（大致）使 Emacs 可以从 Common Lisp 访问。

此信息附带警告，即这可能会产生不良副作用。我想避免这种情况，这就是为什么我把所有信息都记在心里/dev/null。

但是：有没有一种方法，可以让它slime-repl在函数的狭窄上下文中就能被它所承载的 Common Lisp 识别？

我想写一个函数，最好重新绘制整个 Emacs 窗口，就像中slime-clear-screen的效果一样。或者，根据当前窗口大小的行数重复。C-c M-oslime(format t "~%")

所以我想我需要找到一种方法来访问 Emacs 窗口控件或其大小信息。

但是在 Slime/Emacs 键和弦配置请求和 ANSI 转义序列的噪音中，我很难听到有希望的信息。

你知道我需要什么吗？或者更好的是：你知道一个已经提供同等功能的公共库吗？虽然我真的喜欢修修补补，但我也会明确地从大量库中寻找常用或值得推荐的库，以建立一个一致的开源“准标准”库框架。

我非常感谢您的建议。

common-lisp

2 个回答

  1. Best Answer

    该变量是slime-enable-evaluate-in-emacs，如果设置为 T 则调用eval-in-emacs。

    但有一种方法可以避免这样做。Common Lisp 端 Swank 使用send-to-emacs向 Emacs Lisp 端 Slime 发送消息。这类似于(:my-message x y z)。但这必须是有效消息，是双方都认可的消息之一。

    在 中slime.el有一个名为的钩子，slime-event-hooks您可以在其中处理自定义消息。它的使用方式如下：

    (or (run-hooks-with-args-until-success 'slime-event-hooks event)
    (slime-dcase event
      ... ; builtin events
    ))

    例如，查看发生contrib/slime-media.el时钩子被注册在哪里:on-load。

    Lisp 端也存在同样的机制。在 中swank.lisp有一个特殊变量*event-hook*，可以包含用于运行和处理事件的附加代码。

    (or (run-hook-until-success *event-hook* connection event)
    (dcase event
      ... ; builtin events
    ))

    据我所知，contrib 中没有使用它的例子。

    因此，肯定有一种方法可以为 Slime 实现一个新的贡献功能，而它看起来不像是黑客攻击，您需要通过注册消息来实现自己的协议，然后在 Emacs 中执行您想做的事情。

    • 2

  2. 我误解了你的问题，以为你正在寻找一种在常见的 Lisp REPL 中清除屏幕的方法。

    哪个命令可用于清除 CLISP 中的屏幕？

    在那里你可以找到如下方法：

    (screen:with-window (screen:clear-window screen:*window*))

    或者

    (defun cls()
  (format t "~A[H~@*~A[J" #\escape))

(cls)

    即使在裸终端 CLISP 或 SBCL 上也能正常工作（而 SBCL 只能使用后者）。后者实际上打印了很多空行 - 看起来像是一个清除的屏幕。

    • 1

相关问题