1
1

Exclude *.o files with absolute path.

Этот коммит содержится в:
Pavel Roskin 2003-10-14 23:10:25 +00:00
родитель 49ca3dc449
Коммит 07d3a2cdaa

Просмотреть файл

@ -23,8 +23,8 @@ while (1) {
last unless $next_line;
$line = $next_line;
$next_line = <MAP>;
next unless ($line =~ /^[A-Za-z_][A-Za-z0-9_]* +[^ ]+\.o$/ or
$line =~ /^[A-Za-z_][A-Za-z0-9_]* +[^ ]+\.a\([^ ]+\.o\)$/);
next unless ($line =~ m{^[A-Za-z_][A-Za-z0-9_]* +[^ /][^ ]+\.o$} or
$line =~ m{^[A-Za-z_][A-Za-z0-9_]* +[^ ]+\.a\([^ ]+\.o\)$});
if (!$next_line or ($next_line !~ /^ /)) {
print $line;
}