@calcit/procs 0.12.47 → 0.12.48

package/RFCs/README.md

@@ -1,6 +1,6 @@
 # RFC 整理索引
 
-更新时间：2026-06-15
+更新时间：2026-06-29
 
 ## 目录原则
 
@@ -10,24 +10,25 @@
 
 ## 当前保留文件
 
-| 文件                                | 状态          | 建议                                                       |
-| ----------------------------------- | ------------- | ---------------------------------------------------------- |
-| `03-05-function-schema-dual-track-rfc.md` | Active        | 已收敛为当前 schema 约定说明，涉及函数 schema 时优先参考。 |
-| `02-04-runtime-traits-plan.md`            | Active        | runtime traits 主设计文档。                                |
-| `02-17-register-platform-api-rfc.md`      | Active        | host capability / register API 规范草案。                  |
-| `02-18-language-theory-evolution-plan.md` | Review-needed | 偏理论路线图，阅读时需区分愿景与已落地内容。               |
-| `02-23-optional-record-macro-plan.md`     | Review-needed | 小范围提案，尚未进入稳定实现。                             |
-| `02-14-project-modernization-roadmap.md`  | Review-needed | 工程路线图可参考，但不要当作语法或行为文档。               |
-| `03-16-runtime-boundary-refactor-plan.md` | Review-needed | 运行时边界重构方案。 |
-| `03-18-query-def-tree-show-chunked-display-plan.md` | Review-needed | query/tree show 分块展示方案。 |
-| `04-13-call-arg-literal-rewrite-rfc.md` | Active | 调用参数字面量重写优化提案。 |
-| `04-13-type-slot-mechanism-rfc.md` | Active | Type slot 机制提案。 |
-| `04-15-match-syntax-rfc.md` | Active | match 语法改进提案。 |
-| `04-15-type-directed-optimization-catalog.md` | Active | 基于 `&record:nth` 经验，系统梳理 Record/Tuple/Scope 等类型导向优化机会。 |
-| `04-15-wasm-compilation-feasibility.md` | Active | WASM 编译三条路径（解释器→WASM / AOT 子集 / WASM GC）的可行性评估。 |
-| `04-16-wasm-data-structures.md` | Active | WASM codegen 中 Tag/Record/Tuple 等数据结构的内存布局与编译策略。 |
-| `05-31-generic-where-bounds-mfs.md` | Active | 函数 schema 泛型 `:where` 约束的最小功能规格，先作为主链路开发基线。 |
-| `06-15-effects-graph-rfc.md` | Draft | `cr analyze effects-graph`：State/Transform/Effect 语义分解图与类型驱动 effect 标注路线。 |
+| 文件                                                | 状态          | 建议                                                                                      |
+| --------------------------------------------------- | ------------- | ----------------------------------------------------------------------------------------- |
+| `03-05-function-schema-dual-track-rfc.md`           | Active        | 已收敛为当前 schema 约定说明，涉及函数 schema 时优先参考。                                |
+| `02-04-runtime-traits-plan.md`                      | Active        | runtime traits 主设计文档。                                                               |
+| `02-17-register-platform-api-rfc.md`                | Active        | host capability / register API 规范草案。                                                 |
+| `02-18-language-theory-evolution-plan.md`           | Review-needed | 偏理论路线图，阅读时需区分愿景与已落地内容。                                              |
+| `02-23-optional-record-macro-plan.md`               | Review-needed | 小范围提案，尚未进入稳定实现。                                                            |
+| `02-14-project-modernization-roadmap.md`            | Review-needed | 工程路线图可参考，但不要当作语法或行为文档。                                              |
+| `03-16-runtime-boundary-refactor-plan.md`           | Review-needed | 运行时边界重构方案。                                                                      |
+| `03-18-query-def-tree-show-chunked-display-plan.md` | Review-needed | query/tree show 分块展示方案。                                                            |
+| `04-13-call-arg-literal-rewrite-rfc.md`             | Active        | 调用参数字面量重写优化提案。                                                              |
+| `04-13-type-slot-mechanism-rfc.md`                  | Active        | Type slot 机制提案。                                                                      |
+| `04-15-match-syntax-rfc.md`                         | Active        | match 语法改进提案。                                                                      |
+| `04-15-type-directed-optimization-catalog.md`       | Active        | 基于 `&record:nth` 经验，系统梳理 Record/Tuple/Scope 等类型导向优化机会。                 |
+| `04-15-wasm-compilation-feasibility.md`             | Active        | WASM 编译三条路径（解释器→WASM / AOT 子集 / WASM GC）的可行性评估。                       |
+| `04-16-wasm-data-structures.md`                     | Active        | WASM codegen 中 Tag/Record/Tuple 等数据结构的内存布局与编译策略。                         |
+| `05-31-generic-where-bounds-mfs.md`                 | Active        | 函数 schema 泛型 `:where` 约束的最小功能规格，先作为主链路开发基线。                      |
+| `06-15-effects-graph-rfc.md`                        | Draft         | `cr analyze effects-graph`：State/Transform/Effect 语义分解图与类型驱动 effect 标注路线。 |
+| `06-29-cr-exec-cli-builtins-rfc.md`                 | **Active**    | `cr exec` + `calcit.cli/*` 内建函数：绕过 Shell 转义的 Cirru 函数调用方案。               |
 
 ## 已执行的清理
 

package/editing-history/2026-06-27-0052-cli-improvements.md

@@ -0,0 +1,41 @@
+## CLI 改进: target-replace → search-replace, 新增 batch-delete, --parent-path
+
+### 改动机
+根据 pudica-schedule-viewer 升级过程中暴露的多次 cr 命令使用痛点:
+
+1. `target-replace` 命名不直观（"目标替换"不如"搜索替换"清晰）
+2. 连续删除多个属性时需要手动从高到低删除，容易出错
+3. 搜索结果的路径是叶子路径，用户需要手动去掉末尾索引得到可编辑父路径
+4. map 属性中用 `$` 编辑的规则未在文档中明确
+
+### 改动清单
+
+**src/cli_args.rs:**
+- `TargetReplace(TreeTargetReplaceCommand)` → `SearchReplace(TreeSearchReplaceCommand)`
+- `#[argh(subcommand, name = "target-replace")]` → `#[argh(subcommand, name = "search-replace")]`
+- 新增 `BatchDelete(TreeBatchDeleteCommand)` 枚举变体
+- 新增 `TreeBatchDeleteCommand` 结构体（`-p` 接受多个路径）
+- `QuerySearchCommand` 新增 `--parent-path` 开关
+
+**src/bin/cli_handlers/tree.rs:**
+- `handle_target_replace` → `handle_search_replace`
+- 新增 `handle_batch_delete`: 按路径降序依次调用 `handle_delete`
+
+**src/bin/cli_handlers/query.rs:**
+- `SearchCommonOpts` 新增 `parent_path: bool` 字段
+- 搜索结果中 `--parent-path` 开启时额外打印父路径
+
+**src/bin/cli_handlers/command_echo.rs:**
+- 更新所有 `TargetReplace` → `SearchReplace` 分发
+- 新增 `BatchDelete` 的三个 match arm
+
+**src/bin/cli_handlers/edit.rs:**
+- 错误提示 `target-replace` → `search-replace`
+
+**src/bin/cli_handlers/docs_tests.rs:**
+- 测试数据中 `target-replace` → `search-replace`
+
+**docs/CalcitAgent.md + 其他文档:**
+- 所有 `target-replace` 替换为 `search-replace`
+- 新增 `batch-delete` 和 `--parent-path` 用法说明
+- 新增 `$` 在属性 map 中的编辑指南

package/editing-history/2026-06-27-0202-docs-indexing-improvements.md

@@ -0,0 +1,22 @@
+## 文档索引改进: abstract 字段 + --summary 模式 + Hub 标记
+
+### 改动内容
+
+**P0: abstract/summary 字段**
+- `GuideDocFrontmatter` 新增 `summary: Option<String>` 字段
+- `parse_doc_frontmatter` 支持解析 `summary:` 键值对
+- `score_metadata_hit` 加入 summary 评分（exact 200，contains 130）
+- 8 个核心文档已添加 summary 描述
+
+**P0: `cr docs search --summary` 模式**
+- `DocsSearchCommand` 新增 `--summary` 开关
+- 搜索时只显示文档标题 + summary，不输出内容片段
+- 无 summary 的文档显示 `(no summary)`
+
+**P0: Hub 标记**
+- 搜索结果中 `kind: hub` 的文档显示 `[Hub]` 前缀
+- 帮助 LLM 快速识别导航页 vs 详细页
+
+**文档更新**
+- `docs-indexing.md` 新增 `summary` 字段规范说明和 `--summary` 用法
+- `docs-validation.md` 新增 `--summary` 和 hub 标记的验证用例

package/editing-history/2026-06-27-0315-file-splits.md

@@ -0,0 +1,17 @@
+## 文档拆分: agent-advanced.md 和 CalcitAgent.md 的部分内容拆成独立文件
+
+### 改动内容
+
+**从 `run/agent-advanced.md` 拆分:**
+- `## 快速开始` 节 (原 lines 24-58) → 新建 `run/quick-start.md` (47行)
+- 原文替换为交叉链接
+
+**从 `CalcitAgent.md` 拆分:**
+- `calcit.cirru EDN 结构` + `deps.cirru` 两节 (原 lines 156-231) → 新建 `run/project-structure.md` (82行)
+- `结构化策略（5 招）` 节 → 新建 `run/structural-strategies.md` (53行)
+- 原文替换为交叉链接
+
+### 新文件
+- `docs/run/quick-start.md` — 新 LLM 快速开始工作流
+- `docs/run/project-structure.md` — calcit.cirru EDN 结构 + deps.cirru
+- `docs/run/structural-strategies.md` — cp/mv/wrap/raise/rewrite 策略

package/editing-history/2026-06-27-0416-agent-advanced-split.md

@@ -0,0 +1,15 @@
+## agent-advanced.md 拆分: CLI 命令和语言基础节替换为交叉链接, 开发调试拆出独立文件
+
+### 改动
+
+**`run/agent-advanced.md` 精简 (1598→807 行, ~49%):**
+
+- `## Calcit CLI 命令` 节 (~508行): 替换为独立文件链接列表，保留 `LLM 辅助：动态方法提示` 和 `复杂表达式分段组装策略` 两个独特子节
+- `## Calcit 语言基础` 节 (~266行): 替换为 cirru-syntax.md / features/tuples.md / features/static-analysis.md 链接，保留 `其他易错点`
+- `## 开发调试` 节 (~99行): 拆出为独立 `run/debugging.md`
+
+**新增文件:**
+- `run/debugging.md` — watcher 监听模式、增量更新、编译检查
+
+### 删除的重复内容
+CLI 命令和语言基础的子节内容在 `run/query.md`、`run/edit-tree.md`、`cirru-syntax.md`、`features/static-analysis.md` 等文件中已有完整覆盖。

package/editing-history/202607040040-fix-format-cirru-edn-quoting.md

@@ -0,0 +1,14 @@
+## fix format-cirru-edn missing quotes for strings with spaces in JS codegen
+
+### 问题
+`format-cirru-edn` 在 JS runtime 中对含空格的字符串（如 `"a b"`）输出缺少外层双引号，产生 `|a b` 而非正确的 `"|a b"`。
+
+### 定位
+`ts-src/js-cirru.mts:439` — `format_cirru_edn` 对字符串类型直接拼接 `"\ndo " + to_cirru_edn(data)`，跳过了 `writer.ts` 中 `generateLeaf` 的 `JSON.stringify` 引号回退逻辑。
+
+### 修复
+改为走 `writeCirruCode([[to_cirru_edn(data)]])` → `generateLeaf` 路径，利用已有的字符合法性检查（`isCharAllowed`）决定是否加引号。同时保持 `\ndo ... \n` 外围格式与 Rust 版本一致。
+
+### 文件变更
+- `ts-src/js-cirru.mts` — 字符串分支改用 `writeCirruCode` 格式化
+- `calcit/test-edn.cirru` — 新增含空格字符串和无空格字符串的测试用例

package/editing-history/archived/2026-06-29-0117-upgrade-doc-snapshot-migration.md

@@ -0,0 +1,2 @@
+- docs/run/upgrade.md: added snapshot migration section — documents the transition from two-file setup (calcit.cirru snapshot + compact.cirru compact code) to single calcit.cirru with compact code only, no separate snapshot file needed
+- Recommended: delete old snapshot file, compact code saved directly in calcit.cirru for cr command to use directly

package/editing-history/archived/2026-06-29-calcit-cli.md

@@ -0,0 +1,80 @@
+# calcit.cli / cr exec 完整实现
+
+## 概要
+
+实现 `cr exec` + `calcit.cli/*` 内建函数（共 77 个），让 Agent 用 Cirru heredoc 调用常用 `cr query` / `edit` / `tree` / `analyze` / `docs` 能力，绕开 Shell 转义。RFC：`RFCs/06-29-cr-exec-cli-builtins-rfc.md`。
+
+## 架构
+
+- **运行时**：`src/bin/injection/mod.rs` 注册 handler；**单一 options map 参数**（arity 1）
+- **参数解析**：`calcit_cli_args.rs` — `resolve_cli_args`、类型 coercion、默认值填充、command echo
+- **参数规格**：`calcit_cli_specs.rs` — 每个函数的 `CliArgSpec` 列表（语义化键名）
+- **元数据**：`src/cirru/calcit-core.cirru` 的 `|calcit.cli` — schema 为 `(:args $ [] (:: :map :tag :dynamic))`
+- **同步**：`python3 scripts/gen_calcit_cli_core.py`（从 mod.rs + calcit_cli_specs.rs 生成）
+- **约束**：`calcit_cli*` 不得依赖 `cli_handlers`（保证 `cr-wasm` 可编译）
+
+### 调用约定（2026-06-29 重构）
+
+```cirru
+calcit.cli/peek-def $ {} (:file-path |calcit.cirru) (:target |app.main/main!)
+```
+
+- 唯一参数为 options map；键为 tag（`:file-path`、`:target`、`:lines` 等）
+- 省略的可选键由 Rust 侧默认值填充；非 quiet 模式下 stderr echo 展示完整调用（含默认值）
+- 位置参数已移除（breaking change）
+
+| 文件 | 职责 |
+|------|------|
+| `calcit_cli_args.rs` | map 解析、echo、docs_hint 生成 |
+| `calcit_cli_specs.rs` | 77 个函数的参数 spec 常量 |
+| `calcit_cli.rs` | 基础 query/write、snapshot 读写、`load_calcit_snapshot_with_deps` |
+| `calcit_cli_tree.rs` | AST 树变换（delete/insert/wrap/cp/mv…） |
+| `calcit_cli_extra.rs` | edit/config/cirru 工具、trigger-inc、semver bump |
+| `calcit_cli_program.rs` | 加载 snapshot+modules+core 并 preprocess（analyze/validate） |
+| `calcit_cli_analyze.rs` | call/effects/count + check-types/weak-types |
+| `calcit_cli_query.rs` | show-pkg/ns、list-defs-by-tag、validate-file、search-*、list-host-procs |
+| `calcit_cli_docs.rs` | docs-agents/read/sections |
+| `src/type_coverage.rs` | check-types / weak-types 共享逻辑（`cr analyze` 与 calcit.cli 共用） |
+
+## 分批功能（合并记录）
+
+### 第一批：树/定义/import 写操作（17）
+
+`tree-delete` `tree-insert` `tree-wrap` `tree-unwrap` `tree-raise` `tree-cp` `tree-mv` `rename-def` `rm-def` `mv-def` `split-def` `add-ns` `edit-doc` `edit-schema` `add-example` `rm-import` `show-error`
+
+要点：`tree-wrap` 用 `self` leaf；`position` 同 CLI（`|before` `|after` 等）。
+
+### 第二批：edit/config/cirru（20）
+
+`rm-ns` `set-imports` `format-file` `show-doc` `show-ns-doc` `list-tags` `set-tags` `rm-example` `clear-examples` `set-examples` `tree-replace-leaf` `tree-swap-*` `tree-batch-delete` `tree-rewrite` `set-config` `add/rm-module` `cirru-parse/format` `read-text-file`
+
+修复：`build_ns_code` 对齐 `(ns name (:require ...))` 嵌套结构。
+
+### 第三批：analyze / inc / docs 搜索（9）
+
+`trigger-inc` `cirru-parse-edn` `cirru-show-guide` `docs-search` `tree-replace-leaf-regex` `analyze-call-graph` `analyze-effects-graph` `analyze-count-calls`
+
+### 第四批：P0–P3（15）
+
+- **P0**：`show-pkg` `show-ns` `list-defs-by-tag` `validate-file` `bump-version` `edit-ns-doc`
+- **P1**：`search-project` `search-def-regex` `search-expr` `list-host-procs`
+- **P2**：`analyze-check-types` `analyze-weak-types`（依赖 `type_coverage` 提取）
+- **P3**：`docs-agents` `docs-read` `docs-sections`
+
+### Core 声明 + 预处理
+
+- core 可选参数 schema 用 `(:rest :dynamic)`，勿写 `:rest $ :dynamic`（EDN 解析失败）
+- 预处理：`is_registered_proc` 必须在 `has_def_code` 之前，避免 core 元数据 stub 被当作普通 def 编译（`preprocess/mod.rs`）
+
+## 验证
+
+```bash
+python3 scripts/gen_calcit_cli_core.py
+unset CARGO_TARGET_DIR && cargo fmt
+cargo clippy --all-targets -- -D warnings
+cargo test --bin cr
+./target/debug/cr calcit/test.cirru exec << 'EOF'
+calcit.cli/show-pkg $ {} (:file-path |calcit/test.cirru)
+calcit.cli/validate-file $ {} (:file-path |calcit/test.cirru)
+EOF
+```

package/editing-history/archived/2026-06-29-typed-calcit-cli-schemas.md

@@ -0,0 +1,23 @@
+# calcit.cli 选项 map 类型化 schema（Rust spec 直检）
+
+## 变更概要
+
+- 选项 spec 收敛到 `src/builtins/cli_options.rs`（Rust 单一来源），注册时写入 `RegisteredProcDescriptor.cli_options`。
+- preprocess 直接读 Rust spec 校验 options map，不再生成 defstruct / 不做 map→record 转换。
+- core 中 `:args` 仍由脚本生成 inline 类型 map（供 query/docs），校验走 Rust 而非 Calcit 类型系统。
+
+## 后续优化（Rust spec 直检）
+
+- preprocess 热路径改用 `registered_proc_cli_options()`，不再 clone 整个 `RegisteredProcDescriptor`。
+- `registered_proc_has_tag` 同样改为只读 map 查询。
+- `check_cli_options_map` 与 `resolve_cli_args` 共用 `collect_validation_errors`，preprocess 侧用引用收集 map 条目，避免多余 clone。
+- Registered 调用检查复用已有的 `processed_args`，去掉重复 `ys.drop_left()` 和 `alias` clone。
+
+## 验证案例（cr eval）
+
+| 案例 | 结果 |
+|------|------|
+| `:file-pth` 拼写错误 | `W_CLI_OPTION_UNKNOWN_KEY` |
+| 缺少 `:file-path` | `W_CLI_OPTION_MISSING_REQUIRED` |
+| `:lines \|bad` 类型错误 | `W_CLI_OPTION_TYPE_MISMATCH` |
+| 正确调用 | Check passed |

package/editing-history/archived/20260630-duplication-analysis.md

@@ -0,0 +1,116 @@
+# calcit.cli 与 CLI handlers 重复代码分析与重构方案
+
+时间: 2026-06-30
+作者: AI Agent
+
+## 现状
+
+### 两套独立实现
+
+| 方面 | `injection/calcit_cli*.rs` | `cli_handlers/*.rs` |
+|------|---------------------------|---------------------|
+| 代码量 | ~2714 行 | ~5967 行 |
+| 入口 | `fn(xs: Vec<Calcit>, _: &CallStackList) -> Result<Calcit, CalcitErr>` | `fn(opts: &SpecificCommandStruct, snapshot_file: &str) -> Result<(), String>` |
+| 参数解析 | `resolve_cli_args()` → `ResolvedCliArgs` (从 Calcit Map 中提取) | argh 自动解析 CLI 参数到结构体 |
+| 输出 | `Calcit::Str(...)` 返回给 Calcit 运行时 | `println!()` 直接输出 |
+| 快照加载 | `load_calcit_snapshot()` | `load_snapshot()` |
+| 快照保存 | `save_calcit_snapshot()` | `save_snapshot()` |
+
+### 完全重复的辅助函数
+
+| 函数 | injection/ 位置 | cli_handlers/ 位置 |
+|------|----------------|-------------------|
+| load_snapshot | calcit_cli.rs:1155 | edit.rs:101 |
+| save_snapshot | calcit_cli.rs:1217 | edit.rs:109 |
+| parse_path | calcit_cli.rs:933 | common.rs:182 |
+| navigate_to_node | calcit_cli.rs:905 | edit.rs:1267 |
+| parse_target | calcit_cli_args.rs (复用 cli_options) | edit.rs:22 |
+| check_ns_editable | calcit_cli.rs:1033 | edit.rs:114 |
+| apply_operation_at_path | calcit_cli_tree.rs | edit.rs:1152 |
+| process_node_with_references | calcit_cli_tree.rs | edit.rs:1290 |
+
+## 推荐的桥接方案
+
+### 方案: 提取共享核心 + 让 calcit.cli 代理到 cli_handlers
+
+不直接让 `calcit.cli` procs 调用 `cli_handlers`（因为接口类型不同），而是:
+
+1. **将核心业务逻辑（load → modify → save）提取到共享函数**，放在 `snapshot.rs` 或新建 `src/snapshot_ops.rs`
+2. **`cli_handlers` 调用共享函数**
+3. **`calcit.cli` 内部转发到共享函数**，而不是自己再实现一遍
+
+### 关键接口对齐
+
+calcit.cli proc 的处理流程:
+```
+Vec<Calcit> → resolve_cli_args() → ResolvedCliArgs → 提取参数 → 业务逻辑 → Calcit
+```
+
+CLI handler 的处理流程:
+```
+CLI struct → 提取参数 → 业务逻辑 → println!
+```
+
+共同点: 都需要 `(file_path, target, path, code)` 等参数, 都调用 `load_snapshot` / `save_snapshot` / `navigate_to_path` / `apply_operation_at_path`
+
+### 具体步骤
+
+1. 把 `load_snapshot`, `save_snapshot`, `navigate_to_path`, `parse_path`, `check_ns_editable`, `apply_operation_at_path`, `process_node_with_references` 等辅助函数统一放到 `src/snapshot_ops.rs` (或 `src/bin/cli_handlers/ops.rs`)
+2. 把每个业务操作（如 tree-replace、show-def、list-defs）提取为纯函数:
+   ```rust
+   pub fn op_tree_replace(snapshot: &mut Snapshot, ns: &str, def: &str, path: &[usize], new_node: &Cirru) -> Result<(), String>
+   pub fn op_show_def(snapshot: &Snapshot, ns: &str, def: &str) -> Result<String, String>
+   ```
+3. `calcit.cli` 的每个 proc handler 变成薄薄的代理层:
+   ```rust
+   pub fn tree_replace(xs: Vec<Calcit>, _cs: &CallStackList) -> Result<Calcit, CalcitErr> {
+     let args = resolve_cli_args("calcit.cli/tree-replace", &xs, TREE_REPLACE)?;
+     let mut snapshot = load_snapshot(&args.file_path()?)?;
+     let (ns, def) = args.target("target")?;
+     let path = parse_path(&args.string("path")?, false)?;
+     let code = args.cirru_quote("code")?;
+     ops::op_tree_replace(&mut snapshot, &ns, &def, &path, &code)?;
+     save_snapshot(&snapshot, &args.file_path()?)?;
+     Ok(Calcit::Str(Arc::from("replaced")))
+   }
+   ```
+4. CLI handlers 也变成薄代理:
+   ```rust
+   fn handle_replace(opts: &TreeReplaceCommand, snapshot_file: &str) -> Result<(), String> {
+     let (ns, def) = parse_target(&opts.target)?;
+     let path = parse_path(&opts.path)?;
+     let code = parse_input_to_cirru(...)?;
+     let mut snapshot = load_snapshot(snapshot_file)?;
+     ops::op_tree_replace(&mut snapshot, ns, def, &path, &code)?;
+     save_snapshot(&snapshot, snapshot_file)?;
+     // print preview...
+   }
+   ```
+
+### 收益
+- 消除 ~2000 行重复代码
+- 修复 bug 只需改一处
+- 新功能只需写一次共享逻辑
+
+### 风险
+- 大规模重构需要充分测试
+- 需要迁移 `calcit_cli_tree.rs` 中的复杂逻辑（rewrite with references）
+- `calcit.cli` 的 `CalcitErr` 错误类型和 `cli_handlers` 的 `String` 错误类型需要对齐
+
+## 代码规模统计
+
+```
+src/bin/injection/
+  calcit_cli.rs         1297 行  ← 需要拆解: 辅助函数 + proc handlers
+  calcit_cli_extra.rs    846 行  ← 同上
+  calcit_cli_tree.rs     232 行  ← 纯辅助函数, 可整体移出
+  calcit_cli_args.rs     147 行  ← 桥接层, 保留
+  calcit_cli_specs.rs    192 行  ← 参数规格定义, 保留
+  mod.rs                 ~60 行  ← 注册代码, 保留
+
+src/bin/cli_handlers/
+  edit.rs              2026 行  ← 辅助函数 + handler 逻辑
+  tree.rs              1433 行  ← handler 逻辑
+  query.rs             2135 行  ← handler 逻辑
+  common.rs             373 行  ← 工具函数
+```

package/lib/js-cirru.mjs

@@ -433,14 +433,12 @@ export let format_cirru_edn = (data, useInline = true) => {
         return "\ndo nil" + "\n";
     }
     if (typeof data === "string") {
-        return "\ndo " + to_cirru_edn(data) + "\n";
+        let quoted = writeCirruCode([[to_cirru_edn(data)]], { useInline: useInline }).trim();
+        return "\ndo " + quoted + "\n";
     }
     if (typeof data === "boolean") {
         return "\ndo " + to_cirru_edn(data) + "\n";
     }
-    if (typeof data === "string") {
-        return "\ndo " + to_cirru_edn(data) + "\n";
-    }
     if (data instanceof CalcitSymbol) {
         return "\ndo " + to_cirru_edn(data) + "\n";
     }

package/lib/package.json

@@ -1,6 +1,6 @@
 {
     "name": "@calcit/procs",
-    "version": "0.12.47",
+    "version": "0.12.48",
     "main": "./lib/calcit.procs.mjs",
     "devDependencies": {
         "@types/node": "^25.7.0",

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@calcit/procs",
-  "version": "0.12.47",
+  "version": "0.12.48",
   "main": "./lib/calcit.procs.mjs",
   "devDependencies": {
     "@types/node": "^25.7.0",

package/ts-src/js-cirru.mts

@@ -437,14 +437,12 @@ export let format_cirru_edn = (data: CalcitValue, useInline: boolean = true): st
     return "\ndo nil" + "\n";
   }
   if (typeof data === "string") {
-    return "\ndo " + to_cirru_edn(data) + "\n";
+    let quoted = writeCirruCode([[to_cirru_edn(data)]], { useInline: useInline }).trim();
+    return "\ndo " + quoted + "\n";
   }
   if (typeof data === "boolean") {
     return "\ndo " + to_cirru_edn(data) + "\n";
   }
-  if (typeof data === "string") {
-    return "\ndo " + to_cirru_edn(data) + "\n";
-  }
   if (data instanceof CalcitSymbol) {
     return "\ndo " + to_cirru_edn(data) + "\n";
   }