TclOO：重命名方法

Question

我想将方法 foo 重命名为 Foo 但保留旧方法 (foo) 以避免重命名所有已使用的方法。
我认为使用此函数配置我的对象 renamemethod fromName toName 不是我的解决方案，因为此解决方案将删除我的旧方法。
我想这样做，但我想问一下这是否正确:

method foo {args} {
    # do something... with $args
}

method Foo {args} {
    # The first letter in capital letter...
    my foo $args
}

export Foo

我不认为它很漂亮，但我不知道该怎么做。

Answer 1

您可以使用forward命令：

forward Foo my foo

你觉得那个更漂亮吗？

TclOO：重命名方法

TclOO : Rename method

tcl