Commit | Line | Data |
f6d6199c |
1 | package ExtUtils::MM_Win95; |
2 | |
3 | use vars qw($VERSION @ISA); |
4 | $VERSION = 0.01; |
5 | |
6 | require ExtUtils::MM_Win32; |
7 | @ISA = qw(ExtUtils::MM_Win32); |
8 | |
9 | |
10 | # a few workarounds for command.com (very basic) |
11 | |
12 | sub xs_c { |
13 | my($self) = shift; |
14 | return '' unless $self->needs_linking(); |
15 | ' |
16 | .xs.c: |
17 | $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(XSUBPP) \\ |
18 | $(XSPROTOARG) $(XSUBPPARGS) $*.xs > $*.c |
19 | ' |
20 | } |
21 | |
22 | sub xs_cpp { |
23 | my($self) = shift; |
24 | return '' unless $self->needs_linking(); |
25 | ' |
26 | .xs.cpp: |
27 | $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(XSUBPP) \\ |
28 | $(XSPROTOARG) $(XSUBPPARGS) $*.xs > $*.cpp |
29 | '; |
30 | } |
31 | |
32 | # many makes are too dumb to use xs_c then c_o |
33 | sub xs_o { |
34 | my($self) = shift; |
35 | return '' unless $self->needs_linking(); |
36 | ' |
37 | .xs$(OBJ_EXT): |
38 | $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(XSUBPP) \\ |
39 | $(XSPROTOARG) $(XSUBPPARGS) $*.xs > $*.c |
40 | $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.c |
41 | '; |
42 | } |
4da32025 |
43 | |
44 | 1; |