forked from bai/curriculum-project-hub
sjfhsjfh
ebcb3a7589
教研工程文件根放 .cph-version(内容=面向的 cph 版本)。cph 加载时比对自身版本
(CARGO_PKG_VERSION),不相容报 CphVersionMismatch error 并拒绝。当前判定为版本完全
相等(MVP);判定逻辑孤立在 versions_compatible 单谓词,后续可放宽为 semver 区间而
不动诊断分类/spec/CLI。
spec(7 类诊断,原 6 类):
- Diagnostic.lean: DiagKind 增 cphVersionMismatch(error 级),分类注释 6→7
- Pipeline.lean: load 阶段含 .cph-version 兼容性判定
- Courseware.lean: ADR 区间 →0016
实现:
- cph-diag: DiagCode::CphVersionMismatch("E-CPH-VERSION")
- cph-model: load() 解析 manifest 成功后 check_cph_version;versions_compatible
谓词(完全相等);CPH_VERSION const。missing .cph-version 暂跳过(迁移期 OPEN);
空文件报 error
- examples/TH-141、valid/mini fixture、KenKen 课各加 .cph-version=0.0.2
测试:cph-model 4 个版本门测试;全 workspace 53 passed;lake 25 jobs 绿。
负向验证:9.9.9 .cph-version → E-CPH-VERSION error + check 拒绝(exit 1)。
bump: workspace.package 0.0.1→0.0.2;cph --version 报 cph 0.0.2;README 同步
(含版本契约说明)。
Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
55 lines
2.4 KiB
Lean4
55 lines
2.4 KiB
Lean4
import Spec.Courseware.Check.Diagnostic
|
|
|
|
/-!
|
|
# Pipeline —— checker 检查管线的阶段与序(ADR-0010)
|
|
|
|
checker 的 `check` 按**固定顺序**跑五个阶段,逐阶段收集诊断;`compile` 阶段有**门控**。
|
|
顺序与门控是契约——它决定用户看到哪些诊断(藏在缺文件背后的语法错,在文件补齐前不
|
|
显示,这是有意的)。每阶段的**算法**不进 Lean(宪法第 5 条深度上限):只钉**阶段、序、
|
|
门控**。阶段对应上游模块:`load`←`cph-model`;`structural`←part 路径/未知 kind;
|
|
`schema`←`cph-schema`;`compile`←`cph-typst`(模型外设施);`coverage`←`renderIgnored`。
|
|
-/
|
|
|
|
namespace Spec.Courseware
|
|
|
|
/-- 检查管线的**阶段**(`PINNED` 5 阶段, ADR-0010)。
|
|
|
|
- `load` —— 解析 manifest + 各 element.toml。**含 `.cph-version` 兼容性判定**
|
|
(ADR-0016:工程根 `.cph-version` 与 CLI 版本不相容 ⇒ `cphVersionMismatch` error)。
|
|
硬失败(无法解析 lesson)则**停**整条管线。
|
|
- `structural` —— part 路径存在、无 `..`、kind 已知且一致。此处判缺的 part 后续跳过。
|
|
- `schema` —— 每个"存在且 kind 已知"的 part 按其 kind schema 校验。
|
|
- `compile` —— 模型外设施阶段(typst 编译)。**门控:仅当前序零 error 才跑**。
|
|
- `coverage` —— 语义型 warning(`renderIgnored`);**不**受门控,总跑。 -/
|
|
inductive Phase where
|
|
| load
|
|
| structural
|
|
| schema
|
|
| compile
|
|
| coverage
|
|
deriving DecidableEq
|
|
|
|
/-- 管线阶段的**执行序**(`PINNED`, ADR-0010)。`order p` 越小越先跑。序是契约:
|
|
`compile`(3)排在 `structural`(1)/`schema`(2)之后,正因前者门控于后者无 error。 -/
|
|
def Phase.order : Phase → Nat
|
|
| .load => 0
|
|
| .structural => 1
|
|
| .schema => 2
|
|
| .compile => 3
|
|
| .coverage => 4
|
|
|
|
/-- 某阶段是否**受"前序零 error"门控**(`PINNED`, ADR-0010)。唯 `compile` 受门控:藏在
|
|
结构/schema 错背后的编译错,在前者修好前不显示——有意降噪。 -/
|
|
def Phase.gated : Phase → Bool
|
|
| .compile => true
|
|
| _ => false
|
|
|
|
/-- 管线在 `load` 硬失败时**停**(`PINNED`, ADR-0010)。`load` 拿不到可解析 lesson 时,
|
|
无 lesson 可喂下游,整条管线终止——唯一会截断后续所有阶段的情形(区别于 `compile`
|
|
门控只跳过自己)。 -/
|
|
def Phase.haltsPipelineOnFailure : Phase → Bool
|
|
| .load => true
|
|
| _ => false
|
|
|
|
end Spec.Courseware
|