Commit | Line | Data |
1c1947d5 |
1 | |
2 | package ExtUtils::MM_Haiku; |
3 | |
4 | use strict; |
5 | |
6 | =head1 NAME |
7 | |
8 | ExtUtils::MM_Haiku - methods to override UN*X behaviour in ExtUtils::MakeMaker |
9 | |
10 | =head1 SYNOPSIS |
11 | |
12 | use ExtUtils::MM_Haiku; # Done internally by ExtUtils::MakeMaker if needed |
13 | |
14 | =head1 DESCRIPTION |
15 | |
16 | See ExtUtils::MM_Unix for a documentation of the methods provided |
17 | there. This package overrides the implementation of these methods, not |
18 | the semantics. |
19 | |
20 | =over 4 |
21 | |
22 | =cut |
23 | |
24 | use ExtUtils::MakeMaker::Config; |
25 | use File::Spec; |
26 | require ExtUtils::MM_Any; |
27 | require ExtUtils::MM_Unix; |
28 | |
29 | use vars qw(@ISA $VERSION); |
30 | @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix ); |
31 | $VERSION = '6.42'; |
32 | |
33 | |
34 | =item os_flavor |
35 | |
36 | Haiku is Haiku. |
37 | |
38 | =cut |
39 | |
40 | sub os_flavor { |
41 | return('Haiku'); |
42 | } |
43 | |
44 | =item init_linker |
45 | |
46 | libperl.a equivalent to be linked to dynamic extensions. |
47 | |
48 | =cut |
49 | |
50 | sub init_linker { |
51 | my($self) = shift; |
52 | |
53 | $self->{PERL_ARCHIVE} ||= |
54 | File::Spec->catdir('$(PERL_INC)',$Config{libperl}); |
55 | $self->{PERL_ARCHIVE_AFTER} ||= ''; |
56 | $self->{EXPORT_LIST} ||= ''; |
57 | } |
58 | |
59 | =back |
60 | |
61 | 1; |
62 | __END__ |
63 | |