Searched refs:line_no (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ExtUtils/
H A Dxsubpp232 my $line_no = $. + 1;
329 $line_no = 1;
339 ++ $line_no;
340 $line =~ s|^\#line\s+---(?=\s)|#line $line_no|;
369 print("#line ", $line_no[@line_no - @line -1], " \"$filename\"\n")
765 LineNo => \@line_no,
814 @line_no = @{ $data->{LineNo} } ;
953 @line_no = () ;
990 push(@line_no,
[all...]

Completed in 19 milliseconds