| Subject: | Test for Inline::C fails in Win32 distribution |
Line 28 in the module tests if Inline::C is available and working.
This test fails on Win32 systems due to over-escaping the $@ variable.
The existing line, which does not work on Win32:
my $inline_c_ok = `$path -e "require Inline::C; eval { Inline->import(C => q[int foo() { return 0; }]) }; print \\\$\@ ? 0 : 1"`;
This line does work on Win32 systems (note difference in $@ variable escapement):
my $inline_c_ok = `$path -e "require Inline::C; eval { Inline->import(C => q[int foo() { return 0; }]) }; print \$\@ ? 0 : 1"`;
Perhaps the phrase should be replaced by an OS-specific variable, as in:
my $Result = ($osname eq 'MSWin32') ? "\$\@" : "\\\$\@";
my $inline_c_ok = ... $Result ...;