1N/Aeval 'use ExtUtils::MakeMaker::Coverage';
1N/A# create a typemap for Perl 5.6 1N/A open(
TYPEMAP,
">typemap")
or die "fatal: can't write typemap: $!";
1N/A# create a lib/ dir in order to avoid warnings in Test::Distribution 1N/A# virtual paths given to EU::MM 1N/A# detect when to use Win32::EvenLog 1N/A print " * Win32::EventLog detected.\n";
1N/A Win32 =>
0,
"Win32::TieRegistry" =>
0,
"Win32::EventLog" =>
0;
1N/A # recreate the DLL from its uuencoded form if it's not here 1N/A # read the uuencoded data 1N/A or die "fatal: Can't read file '$name\_dll.uu': $!";
1N/A or die "fatal: Can't write DLL '$name.dll': $!";
1N/A ***
You're running on a Win32 system, but you lack the Win32::EventLog\a 1N/A# detect when being built in Perl core 1N/Aif (
grep { $_
eq 'PERL_CORE=1' } @
ARGV) {
1N/A# on pre-5.6 Perls, add warnings::compat to the prereq modules 1N/A AUTHOR =>
'Sebastien Aperghis-Tramoni <sebastien@aperghis.net>',
1N/A 'File::Basename' =>
0,
1N/A# find a default value for _PATH_LOG 1N/A # The /dev/log STREAMS log driver on this platform has permissions 1N/A # and ownership `crw-r----- root sys'. /dev/conslog has more liberal 1N/A # Mac OS X puts it at a different path. 1N/A # On HP-UX, /dev/log isn't a unix domain socket but a named pipe. 1N/A # Most unixes have a unix domain socket /dev/log. 1N/A# if possible, generate the code that handles the constants with 1N/A# ExtUtils::Constant, otherwise use cached copy in fallback/ 1N/A # standard facilities 1N/A # Mac OS X specific facilities 1N/A # modern BSD specific facilities 1N/A # IRIX specific facilities 1N/A open(
MACROS,
'>macros.all')
or warn "warning: Can't write 'macros.all': $!\n";
1N/A foreach my $
file (
'const-c.inc',
'const-xs.inc') {