Lines Matching refs:line

22 while {[gets $in line]} {
23   if {[regexp $BEGIN $line]} break
24   puts $out1 $line
37   while {[gets $in line]>=0} {
39     append buf $line\n
40     if {[regexp $end $line]} break
64 while {[regexp $BEGIN $line]} {
67   gather_one_file $line buf n
75   while {[gets $in line]>=0} {
76     if {[regexp $BEGIN $line]} break
82     puts $out1 $line