2019-02-05 04:28:43 +08:00
|
|
|
package platform::AIX;
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
use warnings;
|
|
|
|
use Carp;
|
|
|
|
|
|
|
|
use vars qw(@ISA);
|
|
|
|
|
|
|
|
require platform::Unix;
|
|
|
|
@ISA = qw(platform::Unix);
|
|
|
|
|
|
|
|
# Assume someone set @INC right before loading this module
|
|
|
|
use configdata;
|
|
|
|
|
2019-05-25 17:02:59 +08:00
|
|
|
sub dsoext { '.so' }
|
2019-02-05 04:28:43 +08:00
|
|
|
sub shlibextsimple { '.a' }
|
|
|
|
|
|
|
|
# In shared mode, the default static library names clashes with the final
|
|
|
|
# "simple" full shared library name, so we add '_a' to the basename of the
|
|
|
|
# static libraries in that case.
|
|
|
|
sub staticname {
|
|
|
|
# Non-installed libraries are *always* static, and their names remain
|
|
|
|
# the same, except for the mandatory extension
|
|
|
|
my $in_libname = platform::BASE->staticname($_[1]);
|
2021-06-16 12:09:41 +08:00
|
|
|
return $in_libname
|
|
|
|
if $unified_info{attributes}->{libraries}->{$_[1]}->{noinst};
|
2019-02-05 04:28:43 +08:00
|
|
|
|
2022-04-01 00:32:29 +08:00
|
|
|
return platform::BASE->staticname($_[1]) . ($disabled{shared} ? '' : '_a');
|
2019-02-05 04:28:43 +08:00
|
|
|
}
|