Lines Matching refs:matchInfo
52 upvar $matchInfoVar matchInfo
54 set length [expr [clength $matchInfo(line)] + 1]
55 set line [string trimright $matchInfo(line)]
58 set nextLine [gets $matchInfo(handle)]
68 keylset pkgInfo offset $matchInfo(offset)
90 if {[catch {llength $matchInfo(line)}] ||
91 ([llength $matchInfo(line)] < 2)} {
92 error "invalid package header \"$matchInfo(line)\""
97 set pkgInfo [TclX::ParsePkgHeader matchInfo]
107 [clength $matchInfo(line)]+1]
117 [clength $matchInfo(line)]+1]