GNU Cim（Simula预处理器）：如何在VIRTUAL PROCEDURE中使用INNER？

嘿，我对Simula 67的inner扩展逻辑和Cim的虚拟过程兼容问题还算熟悉，来帮你搞定这个报错！

首先得明确：Cim对Simula 67的INNER机制是支持的，但因为要兼容标准编译器，必须严格遵循语法规则，你的报错大概率是语法细节没处理对。下面一步步讲正确的实现方式和常见坑点：

1. 基类的正确声明（必须带%nocomment） #

Cim要求声明虚拟过程时添加%nocomment修饰符，这是兼容标准编译器的关键。同时，你需要在基类过程中用INNER标记出派生类可以补充实现的位置——就像Simula 67里的占位符一样。

示例基类代码：

CLASS BaseProcessor;
VIRTUAL PROCEDURE HandleTask %nocomment;
BEGIN
  WRITE("Base: 初始化任务环境");
  INNER; // 这里是派生类自定义逻辑的插入点
  WRITE("Base: 清理任务环境");
END;
END BaseProcessor;

2. 派生类的扩展实现 #

派生类重写虚拟过程时，不需要再加%nocomment，直接实现你要插入到基类INNER位置的逻辑即可。Cim会自动把派生类的过程体嵌入到基类的INNER标记处，执行顺序和Simula 67完全一致：基类INNER之前的代码 → 派生类的全部逻辑 → 基类INNER之后的代码。

示例派生类代码：

CLASS FileProcessor EXTENDS BaseProcessor;
VIRTUAL PROCEDURE HandleTask;
BEGIN
  WRITE("Derived: 读取本地文件数据");
  WRITE("Derived: 解析文件内容");
END;
END FileProcessor;

3. 调用测试与预期输出 #

当你调用派生类的虚拟过程时，执行流程会按照Simula的逻辑走：

BEGIN
  REF(BaseProcessor) processor := NEW(FileProcessor);
  processor.HandleTask();
END;

预期输出：

Base: 初始化任务环境
Derived: 读取本地文件数据
Derived: 解析文件内容
Base: 清理任务环境

4. 常见报错排查（针对你遇到的“xyz.si...”错误） #

这个错误通常和语法不规范有关，优先检查这几点：

• 基类的虚拟过程是否漏加了%nocomment修饰符？这是Cim识别Simula式虚拟过程的必要条件。
• 派生类的虚拟过程签名是否和基类完全一致？包括参数、返回值（如果有的话）必须匹配。
• 基类过程中是否忘记写INNER关键字？没有这个标记，派生类的逻辑无法正确嵌入。

如果还是报错，建议把你的代码和报错信息对比上面的示例，大概率能找到问题所在。

内容的提问来源于stack exchange，提问作者greybeard