Lines Matching refs:fname
29 my $fname = shift;
30 my @lines = split(/^/m, `cat $fname`);
36 my $fname = shift;
39 FileSave($fname, $data);
44 my $fname = shift;
46 if ($fname =~ s/(.*)\.c$/$1.o/) {
61 my $fname = shift;
70 `/bin/mv -f $fname $fname.misaved` && die "failed to rename $fname";
71 save_lines($fname, $lines);
73 my $out = test_compile($fname);
79 print "$fname: not removing system include $line\n";
81 print "$fname: removing $line\n";
85 print "$fname: might be able to remove $line\n";
90 `/bin/mv -f $fname.misaved $fname` && die "failed to restore $fname";
95 my $fname = shift;
96 my @lines = load_lines($fname);
99 my $original = test_compile($fname);
102 print "Failed to compile $fname\n";
106 print "Processing $fname (with $num_lines lines)\n";
121 test_include($fname, \@lines, $i, $original);
158 my $fname = $ARGV[$i];
159 process_file($fname);