package platform::Windows::MSVC; use strict; use warnings; use Carp; use vars qw(@ISA); require platform::Windows; @ISA = qw(platform::Windows); # Assume someone set @INC right before loading this module use configdata; sub pdbext { '.pdb' } sub staticlibpdb { return platform::BASE::__concat($_[0]->staticname($_[1]), $_[0]->pdbext()); } sub sharedlibpdb { return platform::BASE::__concat($_[0]->sharedname($_[1]), $_[0]->pdbext()); } sub dsopdb { return platform::BASE::__concat($_[0]->dsoname($_[1]), $_[0]->pdbext()); } sub binpdb { return platform::BASE::__concat($_[0]->binname($_[1]), $_[0]->pdbext()); } 1;