在tcl中创建树

Question

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

struct tree{
    tree *treelink;
}

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

Answer 1

你很幸运。大约一周前我为Rosetta Code写了一个。代码足够长，我不会在这里重复它，但随意采取它并适应。 我不会在生产中使用它。数组和字典提供相同的关键抽象操作（插入，删除，查找，更新，枚举），并且可以很好地使用它们的内置实现。