1 package platform::mingw;
9 require platform::Unix;
10 @ISA = qw(platform::Unix);
12 # Assume someone set @INC right before loading this module
21 # Other extra that aren't defined in platform::BASE
22 sub resext { '.res.obj' }
23 sub shlibext { '.dll' }
24 sub shlibextimport { $target{shared_import_extension} || '.dll.a' }
25 sub shlibextsimple { undef }
26 sub makedepcmd { $disabled{makedepend} ? undef : $config{makedepcmd} }
28 (my $sover_filename = $config{shlib_version}) =~ s|\.|_|g;
29 sub shlib_version_as_filename {
30 return $sover_filename;
33 return platform::BASE::__concat(platform::BASE->sharedname($_[1]),
35 $_[0]->shlib_version_as_filename(),
36 ($config{target} eq "mingw64"
40 # With Mingw and other DLL producers, there isn't any "simpler" shared
41 # library name. However, there is a static import library.
42 sub sharedlib_simple {
46 sub sharedlib_import {
47 return platform::BASE::__concat(platform::BASE->sharedname($_[1]),
48 $_[0]->shlibextimport());