1 use ExtUtils::MakeMaker;
5 my $e = $Config{'exe_ext'};
6 my $o = $Config{'obj_ext'};
7 my $exeout_flag = '-o ';
8 my $core = grep { $_ eq 'PERL_CORE=1' } @ARGV;
9 if ($^O eq 'MSWin32') {
10 if ($Config{'cc'} =~ /^cl/i) {
13 elsif ($Config{'cc'} =~ /^bcc/i) {
20 VERSION_FROM => "B.pm",
21 PL_FILES => { 'defsubs_h.PL' => 'defsubs.h' },
23 FILES => "perl$e *$o B.c defsubs.h *~"
30 "\nLIBS = $Config::Config{libs}\n"
35 return File::Spec->catdir(File::Spec->updir,
38 return File::Spec->catdir($Config::Config{archlibexp}, "CORE");
43 my $headerpath = headerpath();
44 my @headers = map { File::Spec->catfile($headerpath, $_) } qw(op.h cop.h);
45 my $noecho = shift->{NOECHO};
48 B\$(OBJ_EXT) : defsubs.h
50 defsubs.h :: @headers defsubs_h.PL
51 \$(PERL) -I\$(INST_ARCHLIB) -I\$(INST_LIB) -I\$(PERL_ARCHLIB) -I\$(PERL_LIB) defsubs_h.PL defsubs.h $headerpath
56 my $text = shift->SUPER::processPL(@_);
57 # Append our extra parameter
58 $text =~ s/^\t.*defsubs_h\.PL.*/$& . ' ' . headerpath()/me;