Last change
on this file since 104078 was 104078, checked in by vboxsync, 11 months ago |
openssl-3.1.5: Applied and adjusted our OpenSSL changes to 3.1.4. bugref:10638
|
File size:
1.1 KB
|
Line | |
---|
1 | package platform::Windows::MSVC;
|
---|
2 |
|
---|
3 | use strict;
|
---|
4 | use warnings;
|
---|
5 | use Carp;
|
---|
6 |
|
---|
7 | use vars qw(@ISA);
|
---|
8 |
|
---|
9 | require platform::Windows;
|
---|
10 | @ISA = qw(platform::Windows);
|
---|
11 |
|
---|
12 | # Assume someone set @INC right before loading this module
|
---|
13 | use configdata;
|
---|
14 |
|
---|
15 | sub pdbext { '.pdb' }
|
---|
16 |
|
---|
17 | # It's possible that this variant of |sharedname| should be in Windows.pm.
|
---|
18 | # However, this variant was VC only in 1.1.1, so we maintain that here until
|
---|
19 | # further notice.
|
---|
20 | sub sharedname {
|
---|
21 | return platform::BASE::__concat(platform::BASE->sharedname($_[1]),
|
---|
22 | "-",
|
---|
23 | $_[0]->shlib_version_as_filename(),
|
---|
24 | ($target{multilib} // '' ),
|
---|
25 | ($_[0]->shlibvariant() // ''));
|
---|
26 | }
|
---|
27 |
|
---|
28 | sub staticlibpdb {
|
---|
29 | return platform::BASE::__concat($_[0]->staticname($_[1]), $_[0]->pdbext());
|
---|
30 | }
|
---|
31 |
|
---|
32 | sub sharedlibpdb {
|
---|
33 | return platform::BASE::__concat($_[0]->sharedname($_[1]), $_[0]->pdbext());
|
---|
34 | }
|
---|
35 |
|
---|
36 | sub dsopdb {
|
---|
37 | return platform::BASE::__concat($_[0]->dsoname($_[1]), $_[0]->pdbext());
|
---|
38 | }
|
---|
39 |
|
---|
40 | sub binpdb {
|
---|
41 | return platform::BASE::__concat($_[0]->binname($_[1]), $_[0]->pdbext());
|
---|
42 | }
|
---|
43 |
|
---|
44 | 1;
|
---|
Note:
See
TracBrowser
for help on using the repository browser.