Lines Matching +full:platform +full:- +full:name

1 package platform::Unix;
9 require platform::BASE;
10 @ISA = qw(platform::BASE);
16 sub dsoext              { $target{dso_extension} || platform->shlibextsimple()
30 # Other extra that aren't defined in platform::BASE
45     # Non-installed libraries are *always* static, and their names remain
47     my $in_libname = platform::BASE->staticname($_[1]);
49         if $unified_info{attributes}->{libraries}->{$_[1]}->{noinst};
51     # We currently return the same name anyway...  but we might choose to
53     return platform::BASE->staticname($_[1]);
57     return platform::BASE::__concat(platform::BASE->sharedname($_[1]),
58                                     ($_[0]->shlibvariant() // ''));
62     return platform::BASE::__isshared($_[1]) ? $_[1] : undef;
66     # This function returns the simplified shared library name (no version
67     # or variant in the shared library file name) if the simple variants of
68     # the base name or the suffix differ from the full variants of the same.
70     # Note: if $_[1] isn't a shared library name, then $_[0]->sharedname()
71     # and $_[0]->sharedname_simple() will return undef.  This needs being
73     my $name = $_[0]->sharedname($_[1]);
74     my $simplename = $_[0]->sharedname_simple($_[1]);
75     my $ext = $_[0]->shlibext();
76     my $simpleext = $_[0]->shlibextsimple();
78     return undef unless defined $simplename && defined $name;
79     return undef if ($name eq $simplename && $ext eq $simpleext);
80     return platform::BASE::__concat($simplename, $simpleext);