Lines Matching refs:col
139 scan [$w index insert] %d.%d row col
149 scan [$w index insert] %d.%d row col
159 scan [$w index insert] %d.%d row col
181 scan [$w index insert] %d.%d row col
213 scan [$w index insert] %d.%d row col
314 foreach col $x(*) {
315 append res $sep$x($col)
323 foreach col $x(*) {
332 foreach col $x(*) {
333 if {![info exists cw($col)] || $cw($col)<[string length $x($col)]} {
334 set cw($col) [string length $x($col)]
336 lappend y $x($col)
344 foreach col $x(*) {
345 if {![info exists cw($col)] || $cw($col)<[string length $col]} {
346 set cw($col) [string length $col]
348 lappend hdr $col
349 lappend ln [string range $dash 1 $cw($col)]
358 foreach col $x(*) {
362 append format " %-$cw($col)s"
392 foreach col $x(*) {append res "$col = $x($col)\n"}
423 scan [$w index insert] %d.%d row col