金大哥 - lisp-dev-mcp MCP 详情

article

README

🚀 40ants-lisp-dev-mcp

40ants-lisp-dev-mcp 是一个 MCP（Message Control Protocol）工具，它为运行中的 Lisp 环境提供了 LLM（Large Language Model）工具，方便开发者与 Lisp 环境进行交互。

🚀 快速开始

在开始使用 40ants-lisp-dev-mcp 之前，你需要了解如何安装它以及如何使用不同的模式来运行它。

📦 安装指南

你可以通过 Quicklisp 安装这个库，但如果你想快速接收更新，可以从 Ultralisp.org 进行安装：

(ql-dist:install-dist "http://dist.ultralisp.org/"
                      :prompt nil)

然后执行以下命令：

ros install 40ants/lisp-dev-mcp

💻 使用示例

基础用法

在标准输入输出模式下运行

以下是一个将 lisp-dev-mcp 添加到 Qwen 的配置示例：

{
  "mcpServers": {
    "lisp-dev": {
      "command": "lisp-dev-mcp",
      "args": []
    }
  },
  "$version": 2
}

如果你想调试 MCP 服务器，可以启动它并输出日志，同时打开一个 SLYNK 端口：

{
  "mcpServers": {
    "lisp-dev": {
      "command": "lisp-dev-mcp",
      "args": ["--log", "mcp.log", "--verbose"],
      "env": {
        "SLYNK_PORT": "9991"
      }
    }
  },
  "$version": 2
}

在 HTTP 流式模式下运行

启动 Lisp 进程：

qlot exec roswell/lisp-dev-mcp.ros --port 7890

或者在 REPL 中执行：

(ql:quickload :40ants-lisp-dev-mcp)

(40ants-lisp-dev-mcp/core:start-server :port 7890)

然后配置你的 IDE：

{
  "mcpServers": {
    "lisp-dev": {
      "url": "http://localhost:7890/mcp"
    }
  },
  "$version": 2
}

📚 详细文档

40ANTS-LISP-DEV-MCP/CORE 包

包信息

包名：40ants-lisp-dev-mcp/core

函数说明

`40ants-lisp-dev-mcp/core:start-server`

(40ants-lisp-dev-mcp/core:start-server &key port (in-thread t))

该函数用于启动 MCP 服务器。

PORT：TCP 端口号（整数，若为 nil 则使用标准输入输出传输）。
IN-THREAD：布尔值，若为 true 则在后台线程中启动服务器，否则阻塞（默认）。

如果 IN-THREAD 为 true，返回线程对象，否则阻塞。

📄 许可证

本项目采用 Unlicense 许可证。

🔗 项目信息

| 属性 | 详情 | |------|------| | 描述 | 为运行中的 Lisp 环境提供 LLM 工具的 MCP | | 许可证 | Unlicense | | 作者 | Alexander Artemenko svetlyak.40wt@gmail.com | | 主页 | https://40ants/lisp-dev-mcp/ | | 问题跟踪 | https://github.com/40ants/lisp-dev-mcp/issues | | 源代码控制 | GIT | | 依赖项 | 40ants-logging、40ants-mcp、40ants-slynk、alexandria、bordeaux-threads、defmain、jsonrpc、log4cl、openrpc-server、serapeum、str、trivial-backtrace |

GitHub Actions

lisp-dev-mcp