Select Code to Download

use warnings;

...
use Inline C => q{simple_double simple(simple_double); };

print simple(1.032);

.
.
...

 at autowrap.pl line 11
BEGIN failed--compilation aborted at autowrap.pl line 11.

#define simple_double double
simple_double simple(simple_double d);

simple_double T_S_DOUBLE

...
OUTPUT
T_S_DOUBLE
          sv_setnv($arg, (simple_double)$var);

use ExtUtils::MakeMaker;
my %options = (       
...

# Remove the Makefile dependency. Causes problems on a few systems.
sub MY::makefile { '' }