摘要：
set aa 12class te {public proc t1public method a1constructor {args} {uplevel 1 {puts $aaset aa 3puts $aa}}}body te::a1 {args} {uplevel 1 { set aa 4puts $aa}}body te::t1 {args} {uplevel 1 { set aa 5puts $aa}}te .e.e a1te::t1 阅读全文
posted @ 2011-08-19 09:50
greencolor
阅读(133)
评论(0)
推荐(0)
摘要：
set aa 12class te {public proc t1public method a1constructor {args} {upvar aa kkset kk [expr $kk + 2 ] puts $kk}}body te::a1 {args} {upvar aa k1set k1 [ expr $k1 + 3 ]puts $k1}body te::t1 {args} {upvar aa k2set k2 [ expr $k2 +4 ]puts $k2}te .e.e a1te::t1 阅读全文
posted @ 2011-08-19 09:42
greencolor
阅读(130)
评论(0)
推荐(0)
摘要：
set aa 12class te {public proc t1public method a1constructor {args} {global aaputs $aa}}body te::a1 {args} {global aaputs $aa}body te::t1 {args} {global aaputs $aa}te .e.e a1te::t1 阅读全文
posted @ 2011-08-19 09:38
greencolor
阅读(111)
评论(0)
推荐(0)
浙公网安备 33010602011771号