diff options
author | Freya Murphy <freya@freyacat.org> | 2025-03-26 23:21:44 -0400 |
---|---|---|
committer | Freya Murphy <freya@freyacat.org> | 2025-03-26 23:21:44 -0400 |
commit | fbdc3d9e1198d30cd669d8e2e4e5fa34b3d5f104 (patch) | |
tree | 7a8c45c76c28eb7c6d9576d1f2d62060624f4c9a /util/mergedep.pl | |
parent | fix symbols (diff) | |
download | comus-fbdc3d9e1198d30cd669d8e2e4e5fa34b3d5f104.tar.gz comus-fbdc3d9e1198d30cd669d8e2e4e5fa34b3d5f104.tar.bz2 comus-fbdc3d9e1198d30cd669d8e2e4e5fa34b3d5f104.zip |
remove unused
Diffstat (limited to '')
-rw-r--r-- | util/mergedep.pl | 86 |
1 files changed, 0 insertions, 86 deletions
diff --git a/util/mergedep.pl b/util/mergedep.pl deleted file mode 100644 index 1730d53..0000000 --- a/util/mergedep.pl +++ /dev/null @@ -1,86 +0,0 @@ -#!/usr/bin/perl -# Copyright 2003 Bryan Ford -# Distributed under the GNU General Public License. -# -# Usage: mergedep <main-depfile> [<new-depfiles> ...] -# -# This script merges the contents of all <new-depfiles> specified -# on the command line into the single file <main-depfile>, -# which may or may not previously exist. -# Dependencies in the <new-depfiles> will override -# any existing dependencies for the same targets in <main-depfile>. -# The <new-depfiles> are deleted after <main-depfile> is updated. -# -# The <new-depfiles> are typically generated by GCC with the -MD option, -# and the <main-depfile> is typically included from a Makefile, -# as shown here for GNU 'make': -# -# .deps: $(wildcard *.d) -# perl mergedep $@ $^ -# -include .deps -# -# This script properly handles multiple dependencies per <new-depfile>, -# including dependencies having no target, -# so it is compatible with GCC3's -MP option. -# - -sub readdeps { - my $filename = shift; - - open(DEPFILE, $filename) or return 0; - while (<DEPFILE>) { - if (/([^:]*):([^\\:]*)([\\]?)$/) { - my $target = $1; - my $deplines = $2; - my $slash = $3; - while ($slash ne '') { - $_ = <DEPFILE>; - defined($_) or die - "Unterminated dependency in $filename"; - /(^[ \t][^\\]*)([\\]?)$/ or die - "Bad continuation line in $filename"; - $deplines = "$deplines\\\n$1"; - $slash = $2; - } - #print "DEPENDENCY [[$target]]: [[$deplines]]\n"; - $dephash{$target} = $deplines; - } elsif (/^[#]?[ \t]*$/) { - # ignore blank lines and comments - } else { - die "Bad dependency line in $filename: $_"; - } - } - close DEPFILE; - return 1; -} - - -if ($#ARGV < 0) { - print "Usage: mergedep <main-depfile> [<new-depfiles> ..]\n"; - exit(1); -} - -%dephash = (); - -# Read the main dependency file -$maindeps = $ARGV[0]; -readdeps($maindeps); - -# Read and merge in the new dependency files -foreach $i (1 .. $#ARGV) { - readdeps($ARGV[$i]) or die "Can't open $ARGV[$i]"; -} - -# Update the main dependency file -open(DEPFILE, ">$maindeps.tmp") or die "Can't open output file $maindeps.tmp"; -foreach $target (keys %dephash) { - print DEPFILE "$target:$dephash{$target}"; -} -close DEPFILE; -rename("$maindeps.tmp", "$maindeps") or die "Can't overwrite $maindeps"; - -# Finally, delete the new dependency files -foreach $i (1 .. $#ARGV) { - unlink($ARGV[$i]) or print "Error removing $ARGV[$i]\n"; -} - |