mirror of
https://github.com/DrBeef/Raze.git
synced 2024-11-16 09:21:12 +00:00
25 lines
515 B
Perl
Executable file
25 lines
515 B
Perl
Executable file
#!/usr/bin/perl -w
|
|
|
|
use strict;
|
|
|
|
my $obj = shift;
|
|
my $src = shift;
|
|
my $inc = shift;
|
|
|
|
my @srcd = ();
|
|
my @incd = ();
|
|
print("# Automatically generated by processdeps.pl\n");
|
|
while (<>) {
|
|
if (/^(\S+?)\.o:/) {
|
|
print( map " \$($src)$_", @srcd );
|
|
print( map " \$($inc)$_", @incd );
|
|
print("\n\$($obj)/$1\.\$o\E:");
|
|
@srcd = ();
|
|
@incd = ();
|
|
}
|
|
push @srcd, /$src(\/\S+)/og;
|
|
push @incd, /$inc(\/\S+)/og;
|
|
}
|
|
print( map " \$($src)$_", @srcd );
|
|
print( map " \$($inc)$_", @incd );
|
|
print("\n");
|