use Inline C => Config =>
BUILD_NOISY =>1,
LD => 'g++ -static-libgcc',
INC => '-IC:/MinGW/msys/1.0/local/include';
use Inline C => <<'EOC';
SV * foo(SV * x, SV * y) {
return newSVnv(SvNV(x) * SvNV(y));
}
EOC
$x = foo(2.3, 1.1);
print $x, "\n";
####
C:\_32\pscrpt\inline>objdump -x _Inline/lib/auto/try_pl_0a36/try_pl_0a36.dll | grep "DLL Name"
DLL Name: KERNEL32.dll
DLL Name: msvcrt.dll
DLL Name: perl516.dll
####
C:\_32\pscrpt\inline>objdump -x _Inline/lib/auto/try_pl_0a36/try_pl_0a36.dll | grep "DLL Name"
DLL Name: libgcc_s_dw2-1.dll
DLL Name: KERNEL32.dll
DLL Name: msvcrt.dll
DLL Name: perl516.dll