• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10.1/tcl-105/tcl_ext/tclx/tclx/tests/

Lines Matching refs:matchInfo

61     global testFH matchInfo
64 list line $matchInfo(line)
69 list offset $matchInfo(offset)
74 list bytesread $matchInfo(bytesread)
79 list linenum $matchInfo(linenum)
83 list handle $matchInfo(handle)
90 global matchInfo matchCnt chkMatchCnt testFH
148 set cmd "global matchInfo; ValMatch [list $scanInfo] 1.1"
158 global matchCnt testFH matchInfo
163 set matchInfo(handle)
168 global matchInfo matchCnt chkMatchCnt testFH
301 upvar $matchInfoVar matchInfo
303 set idx [expr $matchInfo(linenum) - 1]
307 set matchInfo(submatch0)
310 set matchInfo(subindex0)
316 set matchInfo(submatch1)
319 set matchInfo(subindex1)
323 list [info exists matchInfo(submatch2)] \
324 [info exists matchInfo(subindex2)]
332 ChkSubMatch 4 matchInfo
336 ChkSubMatch 5 matchInfo
358 if {!([info exists matchInfo(submatch$idx)] ||
359 [info exists matchInfo(subindex$idx)])} continue
362 lappend this [info exists matchInfo(submatch$idx)]
363 lappend this [info exists matchInfo(subindex$idx)]
364 if [info exists matchInfo(submatch$idx)] {
365 lappend this $matchInfo(submatch$idx)
367 if [info exists matchInfo(subindex$idx)] {
368 lappend this $matchInfo(subindex$idx)
432 if [cequal [scancontext copyfile $matchInfo(context)] $testChkFH] {
433 scancontext copyfile $matchInfo(context) $testChk2FH
434 } elseif [cequal [scancontext copyfile $matchInfo(context)] $testChk2FH] {
435 scancontext copyfile $matchInfo(context) $testChkFH
438 scancontext copyfile $matchInfo(context)
480 lappend linesMatched $matchInfo(line)
513 lappend linesMatched $matchInfo(line)
528 unset matchCnt chkMatchCnt matchInfo testFH test2FH testChkFH testChk2FH