Tree 在tcl中创建树

我想在tcl中创建一个AVL树。我读到，在tcl中，我们不能像在C中那样拥有包含自身引用的结构

struct tree{
    tree *treelink;
}

---

我希望能够在不使用OTcl的情况下创建树。有可能吗？怎么可能？

你很幸运。大约一周前我写了一篇。代码足够长，我不会在这里重复它，但请随意使用它并进行修改。

---

但我不会在生产中使用它。数组和字典提供相同的密钥抽象操作（插入、删除、查找、更新、枚举），并且与它们的内置实现配合得很好。

该代码上的许可证正式为GFDL，因为它位于RC上，但我同意把它认为是在TCL风味的BSD许可证下。哦，是你写的代码。非常感谢。你太棒了！！但我遇到的问题是“PackageRequiredTcloo”在ubuntu中出现错误“找不到包TclOO”。我还没有完全能够正确安装它。@Chhama代码应该相对容易适应Itcl、XOTcl或Snit；它实际上并没有使用任何非常花哨的东西（最花哨的部分？特殊的root

nil

sentinel，这只是一个特殊的对象）。谢谢，我安装了tcl 8.6，代码成功地用它运行。我必须用TCL8.6重新安装ns2，我想我会没事的。再次感谢。