Unit testing 测试复合模式

您知道Smalltalk中经过良好测试的开源复合示例吗

我想回顾一下Smalltalk中复合模式的示例实现。任何方言都可以，我对源代码特别感兴趣，包括单元测试用例。描述我正在寻找的、可在我的应用程序中重复使用的常见测试片段

---

设计良好的实现也很有用，因为我想了解组合测试是如何构造的。

组合模式在Smalltalk中非常常见，我怀疑几乎任何大小合理的应用程序都有一个或多个此设计模式的用途。我知道的一些包含大量测试的软件包包括：

• 重构引擎：重构引擎包含几十个组合，其中最突出的是AST模型。它附带了一个很好的测试集合，几乎可以在所有的Smalltalk方言中使用

• Seaside：这个web应用程序框架为请求处理程序、小部件、html标记、配置等建模。。。作为复合对象。同样，它附带了大量的测试，可以在许多Smalltalk平台上使用

• Pier：这个内容管理系统有各种组合来为嵌套页面及其内容建模。有数百项测试验证了这些复合结构的构造、破坏和性能。测试是跨类的层次结构进行的，许多测试在不同类型的节点上重用