Lines Matching refs:fname
62 my ($fname, $incpath) = @_;
66 $dname = $fname;
69 $isincflg = $fname =~ /inc.flg$/;
72 $newpath = "$incpath, from $fname:";
74 $newpath = "from $fname:";
77 if (open INC, "<$fname") {
98 warn "$fname:$firstline: $1 isn't a file\n" if ! -f $expfile;
103 warn "$fname:$firstline: $dir isn't a directory\n";
105 warn "$fname:$firstline: $dir is unnecessary\n";
107 warn "$fname:$firstline: $dir has no SCCS objects ",
116 warn "$fname:$firstline: $1 isn't a file\n";
120 warn "$0: $fname:$firstline: unknown entry: $text\n";
126 warn "$0: $fname: $!\n";