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