mirror of
https://github.com/netsurf-browser/netsurf
synced 2024-11-24 23:39:51 +03:00
linktrace: It'd help if I'd added the tool
Signed-off-by: Daniel Silverstone <dsilvers@digital-scurf.org>
This commit is contained in:
parent
72b20fbd45
commit
a4bda322a9
18
tools/linktrace-to-depfile.pl
Normal file
18
tools/linktrace-to-depfile.pl
Normal file
@ -0,0 +1,18 @@
|
||||
#!/usr/bin/perl -w
|
||||
|
||||
use strict;
|
||||
use Cwd qw(abs_path);
|
||||
|
||||
my %deps;
|
||||
|
||||
while (my $line = <>) {
|
||||
chomp $line;
|
||||
if ($line =~ /\(([^)]+)/) {
|
||||
$deps{abs_path($1)} = 1;
|
||||
}
|
||||
}
|
||||
|
||||
my @deps = keys %deps;
|
||||
|
||||
print join("\t\\\n\t", @deps), "\n";
|
||||
|
Loading…
Reference in New Issue
Block a user