diff options
author | Attila Molnar <attilamolnar@hush.com> | 2014-10-27 15:26:20 +0100 |
---|---|---|
committer | Attila Molnar <attilamolnar@hush.com> | 2014-10-27 15:26:20 +0100 |
commit | 3a3ff949670c61a4a8856e1391222e156eb1cd17 (patch) | |
tree | fd8023fefa4829ceea428ec424608ef9aace1d9a /make/unit-cc.pl | |
parent | cba05046ce20eed4c429093296eb481bf95d7e07 (diff) | |
parent | c99a43968f6a04c7d5d3038b4e39d14c22aa6e89 (diff) |
Merge insp20
Diffstat (limited to 'make/unit-cc.pl')
-rwxr-xr-x | make/unit-cc.pl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/make/unit-cc.pl b/make/unit-cc.pl index 77f97a3f2..66e9b15dc 100755 --- a/make/unit-cc.pl +++ b/make/unit-cc.pl @@ -30,6 +30,22 @@ my $type = shift; my $out = shift; my $verbose = ($type =~ s/-v$//); +## BEGIN HACK: REMOVE IN 2.2! +sub read_config_cache { + my %cfg = (); + open(CACHE, '../.config.cache') or return %cfg; + while (my $line = <CACHE>) { + next if $line =~ /^\s*($|\#)/; + my ($key, $value) = ($line =~ /^(\S+)="(.*)"$/); + $cfg{$key} = $value; + } + close(CACHE); + return %cfg; +} + +our %config = read_config_cache(); +## END HACK + if ($type eq 'gen-ld') { do_static_find(@ARGV); } elsif ($type eq 'static-ld') { |