oop.tcl

来自「linux 下的源代码分析阅读器 red hat公司新版」· TCL 代码 · 共 12 行

proc About {} {
    return "Testing OOP features"
}

proc Test {} {
    test {tix} {arg}
    test {tixWidgetClass} {arg}
    test {tixClass} {arg}
    test {tixNoteBook} {arg}
    test {tixAppContext} {arg}
}