Lines Matching refs:coff

1699 	my $coff = $off - 1;
1765 			$coff = $off + length($1) - 1;
1767 			#warn "CSB: mark coff<$coff> soff<$soff> 1<$1>\n";
1768 			#warn "[" . substr($blk, $soff, $coff - $soff + 1) . "]\n";
1779 			if ($level == 0 && $coff < $soff) {
1780 				$coff = $off;
1782 				#warn "CSB: mark coff<$coff>\n";
1817 	my $condition = substr($blk, $soff, $coff - $soff + 1);
1822 	#print "coff<$coff> soff<$off> loff<$loff>\n";