2 use ExtUtils::MakeMaker;
4 my $is_mswin = $^O eq 'MSWin32';
5 my $is_netware = $^O eq 'NetWare';
6 my $is_vms = $^O eq 'VMS';
11 DEFINE => '-DLIBC="$(LIBC)"',
12 SKIP => [qw(dynamic dynamic_lib dynamic_bs)],
13 XSPROTOARG => '-noprototypes', # XXX remove later?
14 VERSION_FROM => 'DynaLoader_pm.PL',
15 PL_FILES => {'DynaLoader_pm.PL'=>'DynaLoader.pm'},
16 PM => {'DynaLoader.pm' => '$(INST_LIBDIR)/DynaLoader.pm'},
17 depend => { 'DynaLoader$(OBJ_EXT)' => 'dlutils.c',
18 'DynaLoader.c' => 'DynaLoader.xs'},
19 clean => {FILES => 'DynaLoader.c DynaLoader.xs DynaLoader.pm'},
24 my $flags = shift->SUPER::cflags(@_);
25 if ($flags =~ /-DUSEIMPORTLIB/m) {
26 $flags =~ s/-DUSEIMPORTLIB/-UUSEIMPORTLIB/m;
34 if ($is_mswin || $is_netware || $is_vms) {
39 # Perform very simple tests just to check for major gaffs.
40 # We can\'t do much more for platforms we are not executing on.
43 do $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(XSUBPP) $(XSUBPPARGS) $$i > /dev/null; \
49 DynaLoader.xs: $(DLSRC)
57 if ($is_mswin || $is_netware) {
58 $object = '$(PERL_SRC)\\$(OBJECT)';
60 $object = '$(PERL_SRC)$(OBJECT)';
62 $object = '$(PERL_SRC)/$(OBJECT)';
67 $object : \$(FIRST_MAKEFILE) \$(OBJECT)
69 \$(CP) \$(OBJECT) $object