Lines Matching refs:pos

2090 	my $pos = 0;
2103 	for ($pos = 0; $pos < $len; $pos++) {
2104 		my $string = substr($line, $pos);
2106 			$pos += length($1) - 1;
2107 		} elsif (substr($line, $pos, 1) eq '(') {
2108 			$last_openparen = $pos;
2942 			my $pos = pos_last_openparen($rest);
2943 			if ($pos >= 0) {
2948 					"\t" x ($pos / 8) .
2949 					" "  x ($pos % 8);
2950 				my $goodspaceindent = $oldindent . " "  x $pos;