output stuff closer to what's needed for Makefiles...
This commit is contained in:
parent
7c503fca0a
commit
8e755d35c1
@ -1,5 +1,5 @@
|
|||||||
#! /usr/bin/perl
|
#! /usr/bin/perl
|
||||||
# $OpenBSD: make-plist,v 1.148 2010/06/25 12:02:18 espie Exp $
|
# $OpenBSD: make-plist,v 1.149 2010/06/28 11:24:01 espie Exp $
|
||||||
# Copyright (c) 2004-2008 Marc Espie <espie@openbsd.org>
|
# Copyright (c) 2004-2008 Marc Espie <espie@openbsd.org>
|
||||||
#
|
#
|
||||||
# Permission to use, copy, modify, and distribute this software for any
|
# Permission to use, copy, modify, and distribute this software for any
|
||||||
@ -80,14 +80,19 @@ sub reverse
|
|||||||
return $_;
|
return $_;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
my $first_warn = 1;
|
||||||
sub reverse_with_lib
|
sub reverse_with_lib
|
||||||
{
|
{
|
||||||
my ($self, $_) = @_;
|
my ($self, $_) = @_;
|
||||||
if (m/^(.*?)lib([^\/]+)\.so\.(\d+\.\d+)$/) {
|
if (m/^(.*?)lib([^\/]+)\.so\.(\d+\.\d+)$/) {
|
||||||
my ($path, $name, $version) = ($1, $2, $3);
|
my ($path, $name, $version) = ($1, $2, $3);
|
||||||
if (!defined $self->{l}->{$name}) {
|
if (!defined $self->{l}->{$name}) {
|
||||||
print STDERR "WARNING: unregistered shared lib: $name "
|
if ($first_warn) {
|
||||||
. "(version: $version)\n";
|
print STDERR "WARNING: unregistered shared lib(s)\n";
|
||||||
|
$first_warn = 0;
|
||||||
|
}
|
||||||
|
print STDERR "SHARED_LIBS +=\t$name ",
|
||||||
|
' 'x (25-length($name)), "0.0 # $version\n";
|
||||||
$self->{l}->{$name} = $version;
|
$self->{l}->{$name} = $version;
|
||||||
} elsif ($self->{l}->{$name} ne $version) {
|
} elsif ($self->{l}->{$name} ne $version) {
|
||||||
print STDERR "WARNING: version mismatch for lib: $name "
|
print STDERR "WARNING: version mismatch for lib: $name "
|
||||||
|
Loading…
x
Reference in New Issue
Block a user