1 1.1 christos package platform::Windows::cppbuilder; 2 1.1 christos 3 1.1 christos use vars qw(@ISA); 4 1.1 christos 5 1.1 christos require platform::Windows::MSVC; 6 1.1 christos @ISA = qw(platform::Windows::MSVC); 7 1.1 christos 8 1.1 christos sub pdbext { '.tds' } 9 1.1 christos 10 1.1 christos # C++Builder's Clang-based compilers prepend an underscore to __cdecl-convention 11 1.1 christos # C functions, and the linker needs those as the InternalName in the .def file. 12 1.1 christos sub export2internal { 13 1.1 christos return "_$_[1]"; 14 1.1 christos } 15 1.1 christos 16 1.1 christos 1; 17