Lines Matching refs:line_no
232 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, $lastline_no) ;
1003 pop(@line), pop(@line_no) while @line && $line[-1] eq "";
1095 push (@BootCode, "#line $line_no[@line_no - @line] \"$filename\"")
1311 push(@line_no, $line_no[-1]);
1702 my $line_no = $line_no[@line_no - @line -1] ;
1704 print STDERR "@_ in $filename, line $line_no\n" ;