Lines Matching refs:soff

1698 	my $soff = $off;
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) {
1816 	my $statement = substr($blk, $soff, $off - $soff + 1);
1817 	my $condition = substr($blk, $soff, $coff - $soff + 1);
1822 	#print "coff<$coff> soff<$off> loff<$loff>\n";